邢唷>  q y欹C 鳵bbjbj.r濢hr濢h0 XXphF" %() C!E!E!E!E!E!E$篐pKPEE]8*%%8*8*EEXX P2n.n.n.8*X Cn.8* Cn.n.:2,63R緓]J+2 鯞訣<F2 繩 ,繩3繩38*8*n.8*8*8*8*8*EEEE-8*8*8*F8*8*8*8*繩8*8*8*8*8*8*8*8*8* b :  CONTROL Forms.TextBox.1 \s  CONTROL Forms.TextBox.1 \s  CONTROL Forms.TextBox.1 \s  CONTROL Forms.TextBox.1 \s  CONTROL Forms.TextBox.1 \s  CONTROL Forms.TextBox.1 \s  CONTROL Forms.TextBox.1 \s  CONTROL Forms.TextBox.1 \s  CONTROL Forms.TextBox.1 \s   CONTROL Forms.CommandButton.1 \s 3u鲖fNkX橯ek y橆v鶺,g酧o`03u鲖篘鶺,g酧o`0槝膥bXT酧o`0蟸9崅i梴惽 Nb楕v擽 c當kX0頞9e0 y橆v鶺,g酧o`  CONTROL Forms.CommandButton.1 \s  3u鲖篘鶺,g酧o`  CONTROL Forms.CommandButton.1 \s  槝膥bXT酧o`  CONTROL Forms.CommandButton.1 \s  蟸9崉槜{  CONTROL Forms.CommandButton.1 \s  CONTROL Forms.TextBox.1 \s  CONTROL Forms.TextBox.1 \s 鲖耂A~c儭RNy楧嵮憽{t濺誰kX橯 (W3u鲖fNhyOf[16 l蟚f[N噀Sf[17 癳麜f[N O璬f[18 fN啓0臽N噀.sf[19 Ye瞼f[20 胈tf[21 SO瞼褃f[22 邁f[23 /n硂餝顣槝xvz24 齎E栴晿xvz25 蒘f[褃/鼅Txvz0 40xvz筫T cgq 0齎h鉔x 0-N Nf[褃 T饄蔛鉔xkX橯 俌 g Nf[褃 cgq孨f[褃kX橯0kX橯筫誰俌 O汯fWSSg騍7703020  03u 蒘f[褃/鼅Txvz 剉槝 亯 愰bgY N*N鴙sQxvz筫T孨f[褃 S靊t錧{|孨f[褃 0 50xvz{|+R 愰b 鶺@xxvz 0 擽(uxvz 0 諎寶裇U\ vQ-NKNNkX橯0(W>yO褃f[啒遅 諎寶裇U\/fc奲惽忷W@xxvz0擽(uxvz穬梍剉鍂茓l徹Sb颯錘瀃絜剉RS靊:N蹚L埨h寶孴膵0O瀃絜:y儁橆v 剉菑 z0(Wxvz{|+R剉 愰b N擽觺Ty橆v;N;e筫T蹚L坣x歔0 60g葉b済b__ c NRb済b__kX橯W刓O0簨噀0═鈰JT05uP[鶴Hrir孴vQ諲亯鑜fwQSOb済b__ 0 70俌3u鲖篘 gE-Mail0Kb:g 鲖kX橯y橆vT鹼篘剉E-Mail0Kb:g 錘縊嶯b霳N╜諷梍蔛鰁剉T鹼0 80槝膥;N亯bXT酧o`gYkX橯9篘0 90 ,g槝xvz剉t簨孴瀃E枖^(u鱊

yO褃f[xvzy橆v 3u 鲖 膵 fN y 顅 {| +R CONTROL Forms.Label.1 \s f[ 褃 钑 {|  CONTROL Forms.Label.1 \s   槝 T 饄  CONTROL Forms.Label.1 \s  y橆v#嵑N CONTROL Forms.Label.1 \s @b (W f[ !h   CONTROL Forms.Label.1 \s f[ !h 鉔 x CONTROL Forms.Label.1 \s 3u 鲖 錯 g CONTROL Forms.Label.1 \s  Ye 瞼 钀 >y O 褃 f[ 鳶 6R 3u鲖篘酧o`覻 T'` +R鶴ut^gL 饄@b(W钀钑L gTf[哠gTf[MOY韹韹蛓E-Mail惎0W@W異 Kb :g鶹歔5u輯 3u鲖\O:N#嵑Nb舃w錘 N>y褃xvzy橆v臽礠錘蔛孾b臽礠y橆veg恘{|+R槝 T饄y橆v鱏 yb芉鰁魰/f&T孾b3u鲖,g篘褟 Nt^eg;N亯xvzb済鑜f Rir剉t^0gb鶴Hr>y0鶴Hr錯g N梍燫u  !"#$@ABCD`abcd逖迮警E啪攬排緔m排綹R排綜j#莋 h 5丆JUVjh 5丆JUj#莋 h 5丆JUVjh 5丆JUj#莋 h 5丆JUVjh 5丆JUj#莋 h 5丆JUVjh 5丆JUj#莋 h 5丆JUV h#`5丆Jjh#`5丆JU&jh#`5丆JUmHnHsHtH3jh#`B*CJ PJUmHnHo(phsHtH$ % & M N  f ( 68$d a$$7d\]7`a$ & F hdG$H$ & F hdhG$H$ & F hdhG$H$ & F Hdh & F hdhG$H$dG$H$     ! " # $ % & ' I J K L M 翳栳移梃岱栳湊梃醽u鑜ll栳]Q鑜j`h 5丆JUj#莋 h 5丆JUVh#`5丆Jo(jih 5丆JUj#莋 h 5丆JUVj h 5丆JUj#莋 h 5丆JUVj h 5丆JUj#莋 h 5丆JUVj8 h 5丆JUj#莋 h 5丆JUV h#`5丆Jjh#`5丆JUj}h 5丆JUM N   d f z | " $ & ( 8 : < d 黛祆祆拊玫撳燹預栟祆崄yyj^亶靵yjh OJQJUj#莋 h OJQJUVh#`OJQJjh#`OJQJUh#`OJQJo(jKh CJOJQJU!j#莋 h CJOJQJUVjh CJOJQJU!j#莋 h CJOJQJUVh#`CJOJQJjh#`CJOJQJUh#`CJOJQJo(h#`5丆Jo( & ( * , . f h j l d  痄靨排丟燙艣徧剓剟剟q膛舃V虅剟juh 5丆JUj#莋 h 5丆JUVh#`CJOJQJh#`OJQJo(h#`CJOJQJo(jh 5丆JUj#莋 h 5丆JUVjh 5丆JUj#莋 h 5丆JUV h#`5丆Jjh#`5丆JUjh#`OJQJUjh OJQJUj#莋 h OJQJUV "&(,.24688:\dZb$&(d@DhldjlHJ*,.46嘮嘮嘮哌移移移乙移破移移移移移移移移移乙乙乙乙移乙乙乙乙乙乙乙乙破煉h#`CJOJQJo( h#`o(h#`CJOJPJQJh#`CJOJPJQJo(h#`CJ$OJPJQJh#`CJ$OJPJQJo(h#`OJQJF8:(lJ,6RThjl~ $G$H$If$a$4d `40d `06PRTdfhjl|~  $&(鯫潷潷潷儋少鼎蓹欃檶少賧i蒧寣贆Th#`CJOJPJo(h#`CJ OJPJj"h CJ OJPJUo($j#莋 h CJ OJPJUVo(h#`>*CJOJPJo(h#`>*CJ OJPJo(j h CJ OJPJUo($j#莋 h CJ OJPJUVo(jh#`CJ OJPJUo(h#`CJ OJPJo(h#`CJ4PJo(h#`OJQJo(h#`CJ0PJo( &(ZMkd$$$If4斃08 #A4a8f4 $G$H$IfMkd"$$If4斃08 #A4a8f4(*^`bdfhjvxz皰衣鷥瀼皰|l餩_錞TT皰A$j#莋 h CJ OJPJUVo(h#`CJOJPJo(h#`>*CJ OJPJo(j]'h CJ OJPJUo($j#莋 h CJ OJPJUVo(h#`>*@CJ OJPJo(h#`@CJ OJPJo(h#`>*CJOJPJo(h#`CJ OJPJj0%h CJ OJPJUo($j#莋 h CJ OJPJUVo(h#`CJ OJPJo(jh#`CJ OJPJUo((fhjxJMkd#)$$If4斃08 #A4a8f4Kkd&$$If408 #A4a8f4 $G$H$If$&dG$H$IfP  ^`rNMkd-$$If4斃08 #A4a8f4 d,$G$H$IfMkdj+$$If4斃08 #A4a8f4 $G$H$If   "VXZ\^`dprt疣佑熱噯單鄻樔熱噯卽鄻榩pppeeYh#`CJOJPJQJh#`CJ OJQJo( h#`o(j.h CJ OJPJUo($j#莋 h CJ OJPJUVo(h#`>*CJ OJPJo(j+h CJ OJPJUo($j#莋 h CJ OJPJUVo(h#`CJ OJPJo(h#`>*CJOJPJo(jh#`CJ OJPJUo(j)h CJ OJPJUo($Ifd $dG$H$a$# ^# Mkd/$$If4斃08 #A4a8f4 &(*,246>@BJLNPXZ\hjlnvxz|  "$&(*,.02468:<蝽邋眄眄眄眄碥茼眄眄眄眄眄眄眄眄眄眄眄眄仨眄眄眄眄眄碡眄眄眄眄眄眄眄眄眄眄眄眄眄眄眄h#`h#`OJQJo(h#`OJQJ h#`o(h#`CJOJPJQJo(U(*||||||w||||Ff`2 $$Ifa$ykdR0$$If4##  覽044 J` 覽aJf4p 覽 *,46+"" $$Ifa$kd~4$$If4旞謀! #!8 (覽覽覽覽044 J` 覽aJf4p(覽覽覽覽6@BLNPZ\jlFf6 $$Ifa$ lnxz+"" $$Ifa$kd9$$If4旞謀! #!8 (覽覽覽覽044 J` 覽aJf4p(覽覽覽覽z|g^^^^^^YT$a$Ffa< $$Ifa$kd/:$$If4旞0!#! 覽覽044 J` 覽aJf4p覽覽  ckd>$$If4旞##044 lalf4 $$Ifa$bYYYY $$Ifa$kd>$$If4旞謀#8044 lalf4 "$&(bYYYY $$Ifa$kd?$$If4旞謀#8044 lalf4(*,.02bYYYY $$Ifa$kd;@$$If4旞謀#8044 lalf42468:<bYYYY $$Ifa$kd軥$$If4旞謀#8044 lalf4<>dMTTTTT T"T$T*T,T6T8T@TBTHTJTRTTT\T^TdTfThTjTlTnTpTrTtTvTxTzT|T~TT俆凾員圱奣孴嶵怲扵擳朤楾歍淭濼燭═猅琓甌癟睺碩禩窽篢糡綯繲耇腡芓萒蔜蘐蜹蠺襎訲諸豑赥躎酊h#`Uhk: h#`o(_<>bY $$Ifa$kdA$$If4旞謀#8044 lalf4TTT1,$a$ckd橞$$If4攩##044 lalf4$Ifckd!B$$If4擜##044 lalf4 槝膥;N亯bXT臽礠蔛~{ T覻 TL饄/L鶴u錯gN N錧\OUSMOR錧臽礠~{ T 錘 NbXT褟 Nt^egN,g槝 gsQ剉;N亯xvzb済 鑜f Rir剉t^0gb鶴Hr>y0鶴Hr錯g N梍燫u  Bh陙dk_ N N梍鶴皊3u鲖篘*N篘珟齆酧o` &TR3u鲖fN\O焇 槝 T饄xvz筫T蔛鉔xxvz{|+RR孾b鰁魰g葉b済b__3u鲖蟸9;`潣(NCQ)vQ諲eg恘蟸9(NCQ) N0,g槝xvz剉t簨孴瀃E枖^(u鱊

<protectFlag>false</protectFlag></EPlugger_Data>     PAGE  PAGE 10 ╜皊(W颯錘ck8^蹚L坘X ╜皊(W颯錘 N Oy橆v3u鲖fN{槫N1uf[!h褃xt钀钑蚫\O 俌済╜梺夘O9e匭筟鲖筽鸔 頞9e3u鲖fN c當 1u嶯*g /T(u廩 ╜皊(W N齹ck8^kX橯噀chbSbpS噀ch 鲖9hnc錘 Nek蚫\O 俌済╜/fWord2000,Word XP, Word 2003(u7b 鲖奲Word廩剉塠hQ'`緥:N:"-N" 筫誰: Word軆US->錧wQ->廩->塠hQ'`->塠hQ,緥n:N"-N" sQ頃,g噀ch 蛻癳Sb_ 筽鸔"/T(u廩" c當 俌済╜/fWord2007,Word2010(u7b 筽鸔word鎉 N覊"塠hQf婮T"Y" 恲"-N剉"/T(udk匭筟" 俌済╜/fWord2013(u7b 筽鸔word N筫臑r"塠hQf婮T"T剉"/T(u匭筟" 筽鸔word鎉 N覊 噀鯪 軆US-> 恲->酧鸑-N胈->酧鸑-N胈緥n->廩緥n (W骃 愰b  /T(u@b g廩 sQ頃,g噀ch 蛻癳Sb_ 峇筽鸔word骃 N覊剉茐!j_ 蜰 桘嬈夻V 9e:N u榖椘夻V 孾bkXT 筽鸔 纇錱kX匭筟v^軴噀ch c當 錘纇錱kX匭筟/f&T&{T亯Blv^鵞,g3u鲖fN蹚L堓O0:N哊2朾k3u鲖fN珗諲篘醷9e 颯錘(W軴菑 z-N緥n芠x FO鲖br皨錘縊(W頞9e3u鲖fN鰁O(u0纇錱孾bT Mb颯錘(W3uQ賨 N O3u鲖fN0 TT"T$T,T8TBTJTTT^TfThTjTxooooooojoFf3E $$Ifa$wkd C$$If4斒##  覽04` 覽af4p 覽 刬$If`刬$a$ jTlTnTpTrTtTvTxTzT|T~TT俆凾員圱奣孴嶵怲扵擳朤楾歍淭濼Ff匬Ff縇Ff鵋 $$Ifa$濼燭═猅琓甌癟睺碩禩窽篢糡綯繲耇腡芓萒蔜蘐蜹蠺襎Ff譡FfXFfKT $$Ifa$襎訲諸豑赥躎轙郥釺銽鎀鑄闠霻頣餞騎鬞鯰鳷鶷VU$If$a$Ff)gFfccFf漘 $$Ifa$躎轙郥釺銽鎀鑄闠霻頣餞騎鬞鯰鳷鶷JURUTUVUXUZU\U^U`UbUhU淯濽燯║猆琔甎糢綰繳耈蔝蘒蜺赨躑轚郩霼頤餟騏黆VVV VV V"V$V&VxVzV|V~VV俈刅哣圴奦孷嶸怴扸擵朧榁歏淰濾燰╒猇琕甐癡睼碫禫竀篤鰍蝥鯔鰍楮楮h#`B*o(phh諯h#` h#`o(\VUXUZU\U^U1,$a$ckd雐$$If4斦##044 lalf4$Ifckdyi$$If4>##044 lalf4^UbU燯猆琔甎綰繳Skd]j$$If4旊0p#pl 覽覽044 l` 覽alf4p覽覽$If $$Ifa$$a$繳耈蘒蜺躑轚g^^^^ $$Ifa$kd%k$$If4斍0p#pl 覽覽044 l` 覽alf4p覽覽轚郩頤餟+"" $$Ifa$kd韐$$If4斖謀pl#p pp (覽覽覽覽044 l` 覽alf4p(覽覽覽覽餟騏V V V"Vg^^^^ $$Ifa$kd飈$$If4斖0p#pl 覽覽044 l` 覽alf4p覽覽"V$V&VzV+)#$Ifkd穖$$If4斖謀pl#p pp (覽覽覽覽044 l` 覽alf4p(覽覽覽覽zV|V~VV俈刅哣圴奦孷嶸怴扸擵朧榁歏淰$If^kd筺$$If##044 lal淰濾燰╒猇琕甐癡睼碫禫竀篤糣綱繴耉$If篤糣綱繴耉腣芕萔蔞蘓蜼蠽襐訴諺豓赩躒轛郪釼銿鎂鑆闢霽頥餠騐鬡鯲鳹鶹黇WWWWW W WWWWWWWWWW W"W`WhWjWlWnWpWrWtWvWxWzW|W~WW俉刉哤圵奧學嶹怶扺擶朩榃歐淲濿燱╓猈琖甒癢礤弼h#`CJaJh#`CJaJo(h#` h#`o(Z耉腣芕萔蔞蘓蜼蠽襐訴諺豓赩躒轛郪釼銿$If^kd!o$$If##044 lal銿鎂鑆闢霽頥餠騐鬡鯲鳹鶹黇WWWWW W WWWWWW$IfWWWW W"W6Zkd鮫$$If04a $$Ifa$$a$`kd塷$$If斻4##044 lal"WjWlWnWpWrWtWvWxWzW|W~WW俉刉哤圵奧akdjp$$If##044 lal$If奧學嶹怶扺擶朩榃歐淲濿燱╓猈琖甒癢瞁碬禬竁篧糤網繵耊腤$If癢瞁碬禬竁篧糤網繵耊腤芖萕蔠蘔蜽蠾襑訵諻豔赪躓轜郬釽鋀鎃鑇闣霿頦餡騑黈XJXLXNXPXRXTXVXXXZX\X^X`XbXdXfXhXjXlXnXpXrXtXvXxXzX|X~XX俋刋哫圶奨孹嶺怷扻擷朮榅歑淴瀀燲╔猉琗甔癤瞂碭禭竂篨糥綳眄眥h#`CJaJo(h#` h#`o(^腤芖萕蔠蘔蜽蠾襑訵諻豔赪躓轜郬釽鋀鎃ckd譸$$If攊/##044 lal$If鎃鑇霿頦餡騑LXZkdHq$$If04a$IfLXNXPXRXTXVXXXZX\X^X`XbXdXfXhXjXlXnX$If`kd絨$$If敂##044 lalnXpXrXtXvXxXzX|X~XX俋刋哫圶奨孹嶺怷扻擷朮榅歑淴瀀燲╔$If╔猉琗甔癤瞂碭禭竂篨糥綳繶耎腦芚萖蔢蘕蝀蠿襒$If綳繶耎腦芚萖蔢蘕蝀蠿襒訶諼豖赬躕轝郮釾Y"Y$Y&Y(Y*Y,Y.YHYJYLYPYRY^Y`YdYfYhYtYvYxYzY|YY俌刌哬圷奩嶻怸扽擸朰榊淵瀁燳甕癥瞃碮禮竃腨芛萗蔣蘗餣験鯵鳼鶼黋ZZZ Z ZZ鯫眄鰍鮎hA "jh#`UmHnHo(sHtHh諯h#`CJaJo(h#` h#`o(S襒訶豖躕轝郮釾6Zkd時$$If04a $$Ifa$$a$`kd)r$$If-1##044 lal釾&Y(Y*Y,Y.Y72$a$`kdvs$$If###044 lal`kd s$$If敂##044 lal$If.YJYLYRY`YfY}ttt $$Ifa$|kd鈙$$If4攽##  覽044 l` 覽alf4p 覽$IffYhYvYxYzYJA8A $$Ifa$ $$Ifa$kd媡$$If敭諪 # 覽覽覽0    44 l` 覽alp覽覽覽zY|Y刌哬圷J;2) $$Ifa$ $$Ifa$$劋$IfWD`劋a$kdvu$$If敭諪 # 覽覽覽0    44 l` 覽alp覽覽覽圷奩扽擸朰J;2) $$Ifa$ $$Ifa$$劋$IfWD`劋a$kdav$$If敭諪 # 覽覽覽0    44 l` 覽alp覽覽覽朰榊燳J;2) $$Ifa$ $$Ifa$$劋$IfVD^劋a$kdLw$$If敭諪 # 覽覽覽0    44 l` 覽alp覽覽覽癥瞃碮JA8A $$Ifa$ $$Ifa$kd7x$$If敭諪 # 覽覽覽0    44 l` 覽alp覽覽覽碮禮芛萗蔣JA8A $$Ifa$ $$Ifa$kd"y$$If敭諪 # 覽覽覽0    44 l` 覽alp覽覽覽蔣蘗験鳼ZZZJAAAAA $$Ifa$kd z$$If敭諪 # 覽覽覽0    44 l` 覽alp覽覽覽ZZZZZZZZ Z,Z.Z0Z2Z4Z6Z8Z>Z@ZJZLZNZPZ*[,[.[>[@[B[H[J[P[R[T[V[X[Z[^[n[p[r[t[v[鶾\R\T\V\f\h\猏琝瞈碶篭糪綷繺耚腬芢萛 ]]鯢鰍鰍楮鰍慫扛j#莋 h 5丆JUV h#`5丆Jjh#`5丆JUh#`5丆Jo(&jh#`5丆JUmHnHsHtHh#`B*o(phhA h#` h#`o(?ZZ kd鴝$$If4敭謗j F#RNH 2覽覽覽覽覽044 l` 覽alp2覽覽覽覽覽Z Z.Z0Z2Z4Z $$Ifa$4Z6Z kd3|$$If4敭謗j F#RNH 2覽覽覽覽覽044 l` 覽alp2覽覽覽覽覽6Z@ZLZNZPZ,[.[@[zjYHH凞刞d\$If]凞`刞凞劙d\$If]凞`劙刬dh$G$H$If^刬ykdn}$$If4,##  覽044 l` 覽alf4p 覽$If$a$@[V[X[Z[p[oi$Ifykd ~$$If4擿 ##  覽044 l` 覽alf4p 覽$If$剒d4$If`剒a$p[r[t[v[T\V\h\ufZI劋刕d4$If]劋`刕 劋$IfWD`劋劋d\$IfWD`劋 刢$If`刢$Ifykd獈$$If4##  覽044 l` 覽alf4p 覽h\糪綷繺腬芢]擼kZZZH劆dh$G$H$If]劆$劆dhG$H$]劆a$ykdH$$If4旪 ##  覽044 l` 覽alf4p 覽$If$劋剼d4$If]劋`剼a$]]]]^]抅擼朷榏歖淽瀅燷╙猐琞甝癩瞉碷禲竇篯芣萞蔧蘛蝅衇襗註謁豜赸躚鑍闿頬餧騗鬩鯹鴀鷀^^^^^0^H^J^翳噅栽栽倘忍熱倘忍熱哪哪級級哪北哪哪級跡級北葨枛枛臇姈h#`5丅*CJphh#`5丅*CJo(phh#`0JmHnHsHtH h#`o( h#`0Jjh#`Uh#`h99jh99Uh#`CJOJQJo(h#`5丆Jo(jh#`5丆JUjh 5丆JU6擼朷榏淽瀅╙猐甝癩瞉碷禲竇蔧蘛蝅刪]刪匋&`#$ &dP$劆dhG$H$]劆a$8kd/$$If4旍4af4蝅衇襗註謁豜赸騗鬩鯹鴀^^^L^x^z^腲_ & F dd &dP匋&`#$刪]刪J^L^v^x^z^耝腲__*_,_r_t_v_淿瀇鷂` ` `(`*`Z`\`腵芵aaa a"ava鷄bbbb蝌蠑後後後後後後後後後後後後疹適適釔h#`CJOJQJo(h99h#`5丅*o(phh#`5丅*CJphh#`5丅*CJo(phh#`h#`5丅*CJo(ph%_,_t_瀇 `*`\`芵VJJ>> & F d & F dM & F dE苺p骹) 劋劋d^劋`劋M & F dE苺p骹)芵aa a"abbbb$劆dhG$H$]劆a$d匎d^匎 & F d70182P/R 皞. 捌A!拔"盃#悹$悹%癝班 愋A0P182P/R 皞. 捌A!拔"盃#悹$悹%癝班 愋Dp: 00182P/R 皞. 捌A!拔"盃#悹$悹%癝班 愋4182P/R 皞. 捌A!拔"盃#悹$悹%癝班 愋: 00182P/R 皞. 捌A!拔"盃#悹$悹%癝班 愋7 0182P/R 皞. 捌A!拔"盃#悹$悹%癝班 愋: 00182P/R 皞. 捌A!拔"盃#悹$悹%癝班 愋4182P/R 皞. 捌A!拔"盃#悹$悹%癝班 愋: 00182P/R 皞. 捌A!拔"盃#悹$悹%癝班 愋4182P/R 皞. 捌A!拔"盃#悹$悹%癝班 愋: 00182P/R 皞. 捌A!拔"盃#悹$悹%癝班 愋4182P/R 皞. 捌A!拔"盃#悹$悹%癝班 愋: 00182P/R 皞. 捌A!拔"盃#悹$悹%癝班 愋7 0182P/R 皞. 捌A!拔"盃#悹$悹%癝班 愋Dd c餬 4 c $A ? ?3"`?2餏丙j'a頒0E陔 8"Dd`!丙j'a頒0E陔 8$$mQ;n翽渳&|b態C妕閨 Xh箓 俽$dQFJ憍3 V惑fv <` x2 D4 '寴y泐1h婷g|撉枒"钑u]钄栶:Vp辵g42$J~媖飉懌,薧%薦祿)[2躸@^X興UCUS欝>21 鵽_2嫳優燐奩障UA癤o稪蹕?兏i巧飽閨??窨Dd h餬  c $A? ?3"`?2 鱦R汲 +饂s鳑@d`!癘鱦R汲 +饂s鳑r$鴟mP[0 sR捭棈慀 >窾o誯p瀆缞綁Q "5uS籌mX`唵Y; 堵渰悛m}C :b牲銶)匟鼖A鏇81邐譍橰鈏TZGQ+漳&e螜鰨+^薸尲Z贄禦'e▁;?+ya疅 ]噺 柿蹎!霚a誄"鱻7澤)fDd h餬  c $A? ?3"`?2餛娸簻Ι pp-d`!%娸簻Ι pp$鴟mQ;n翽渳6 21燢G庛 X碶 @YHPD|3喞揱皖涃醍 5 聶泉虂哠Eㄩ0DD=2'訝>杈|` 1e鲓齙欑9硧8睵!vSE流嬕紕_c鋮蕮Oe殾7e疝qzPYqO/燵樣鍮_澧B鬭潄τ9蜲駛鈳煄E#鬵孂 噠l稤6bq3舼l檍L痆棋T14B7堎璂骬8=9腔Dd c餬 6 c $A? ?3"`?2艷窱(#d`!鸛艷窱(#r$$mP!藔}蠐'=]褑跣鑾 氬0剱0L { >0癹'a;A屝1 戣-霙7頝$爓p赲稷嶨疄〥s鏈ILN雝摢w 艹斠湣s/KO鞅23ピ湵訊?葩鼵g鴽舶犐咁uP侸餼`岐顏,4繒軙$C0徎Dd c餬 8 c $A? ?3"`?2艷窱(#d`!鸛艷窱(#r$$mP!藔}蠐'=]褑跣鑾 氬0剱0L { >0癹'a;A屝1 戣-霙7頝$爓p赲稷嶨疄〥s鏈ILN雝摢w 艹斠湣s/KO鞅23ピ湵訊?葩鼵g鴽舶犐咁uP侸餼`岐顏,4繒軙$C0徎Dd c餬 : c $A? ?3"`?2艷窱(#| m`!鸛艷窱(#r$$mP!藔}蠐'=]褑跣鑾 氬0剱0L { >0癹'a;A屝1 戣-霙7頝$爓p赲稷嶨疄〥s鏈ILN雝摢w 艹斠湣s/KO鞅23ピ湵訊?葩鼵g鴽舶犐咁uP侸餼`岐顏,4繒軙$C0徎Dd c餬 < c $A? ?3"`?2艷窱(#7 m`!鸛艷窱(#r$$mP!藔}蠐'=]褑跣鑾 氬0剱0L { >0癹'a;A屝1 戣-霙7頝$爓p赲稷嶨疄〥s鏈ILN雝摢w 艹斠湣s/KO鞅23ピ湵訊?葩鼵g鴽舶犐咁uP侸餼`岐顏,4繒軙$C0徎Dd c餬 > c $A? ?3"`?2艷窱(# m`!鸛艷窱(#r$$mP!藔}蠐'=]褑跣鑾 氬0剱0L { >0癹'a;A屝1 戣-霙7頝$爓p赲稷嶨疄〥s鏈ILN雝摢w 艹斠湣s/KO鞅23ピ湵訊?葩鼵g鴽舶犐咁uP侸餼`岐顏,4繒軙$C0忳Dd 餬 A c $A? ?3"`?2餉uV 竈8[fm`!uV 竈8[f懩$$mQK罖}=壙#爦 ;;菓 じ-G葈(w eoc鰖B藼WMW鳑骱3/孕cb濰氺亷3莫"V4槦糛UV茻l!眅剤*e杄J紥*m 8锘3象J%縀m飋VBFrame'chooseYearMonth 饊)緓];.緓]foxCompObjaVBFrame*UserfrmChooseSchoolCode0;.緓]喱0緓]f_1741104117覌B糊 `亟x]亟x]CompObjsObjInfoOCXNAME #(-27<=>?@BGHIJKLMNPTVWXYZ[\]_cefghijklnrtuvwxyz{} 覌B糊 `Microsoft Forms 2.0 文字框Embedded ObjectForms.TextBox.19瞦status@H,0@"媅SO{    - ! !牋- ! !灃contents<_1741104116 覌B糊 `亟x]亟x]PRINTzCompObj s- ! !iii- ! !  . 2 ' 覌B糊 `Microsoft Forms 2.0 文字框Embedded ObjectForms.TextBox.19瞦docStatusH,{@"媅SOObjInfo OCXNAME contents4_1741104115覌B糊 `亟x]亟x]PRINTCompObjsObjInfoOCXNAME{   - ! !牋- ! !灃- ! !iii- ! !  . 2 @"宋體9vv@楢蘺v9v-  2  ' 覌B糊 `Microsoft Forms 2.0 文字框Embedded ObjectForms.TextBox.19瞦docPassword @H,{eplugger@"媅SO 覌B糊 `Microsoft Forms 2.0 文字框Embedded ObjectForms.TextBox.19瞦contents@_1741104114 覌B糊 `亟x]亟x]CompObjsObjInfoOCXNAME contents!4_1741104113覌B糊 `亟x]亟x]CompObj"spsdH,@"媅SO 覌B糊 `Microsoft Forms 2.0 文字框Embedded ObjectForms.TextBox.19瞦sqrxxXmlStrH,@"媅SO 覌B糊 `Microsoft Forms 2.0 文字框EObjInfo$OCXNAME%contents&4_1741104112$!覌B糊 `亟x]亟x]CompObj'sObjInfo ")OCXNAME#*contents+4mbedded ObjectForms.TextBox.19瞦sqxmxxXmlStrH,@"媅SO 覌B糊 `Microsoft Forms 2.0 文字框Embedded ObjectForms.TextBox.19瞦jfgsxxXmlStr_1741104111&覌B糊 `亟x]亟x]CompObj,sObjInfo%'.OCXNAME(/^!' contents04_1741104110W+覌B糊 `亟x]亟x]CompObj1sObjInfo*,3H,@"媅SO 覌B糊 `Microsoft Forms 2.0 文字框Embedded ObjectForms.TextBox.19瞦cyzkxxXmlStrH,@"媅SO 覌B糊 `Microsoft Forms 2.0 文字框Embedded ObjectForms.TextBox.19瞦OCXNAME-4contents54_17411041090覌B糊 `亟x]亟x]CompObj6sObjInfo/18OCXNAME29contents:0_17411041089.5@2譱甕RcontentsSD_1741104106K3A@2譱甕俳x]PRINTzCompObjRUs(.覽[筽鸔dkYkX]D u"媅SO    - ! !牋- ! !灃- ! !iii- ! !  . 2 ' 覌B糊 `Microsoft Forms 2.0 文字框Embedded ObjectForms.TextBox.19瞦jfgsXmlStrH,@"媅SO    - ! !牋- ! !灃ObjInfoOCXNAMETVcontents4_1741104102o?Y覌B糊 `>俳x]>俳x]PRINTzCompObjX[sObjInfoOCXNAMEZ\- ! !iii- ! !  . 2 ' 覌B糊 `Microsoft Forms 2.0 文字框Embedded ObjectForms.TextBox.19瞦feeYearXmlStrH,@"媅SOcontents4_1741104101_@2譱甕俳x]>俳x]PRINTPCompObj^a{ $,  iii- ! !- ! !牋- ! !灃- ! !覽- !- !  覽.@"宋體9vv@剌蘺v9v- ,2 檢查填報內容並保護文檔-' @2譱甕俳x]>俳x]PRINTCompObjdgoObjInfoOCXNAMEfh$   c- !c  c.@"仿宋_utf-8@p?蘺v9v- 2 c ' #瀸棸暈-?@Microsoft Forms 2.0 標簽Embedded ObjectForms.Label.19瞦projectType$/ $$5;"N媅_GB2312O(   - !  .@"仿宋_utf-8@p?蘺v9v- 2  'contentsP_1741104099k#瀸棸暈-?@>俳x]>俳x]PRINTCompObjjmo #瀸棸暈-?@Microsoft Forms 2.0 標簽Embedded ObjectForms.Label.19瞦subject$/ O($5;"N媅_GB2312,   - !  ObjInfoOCXNAMElncontentsP_1741104098{cq#瀸棸暈-?@>俳x]>俳x]PRINTCompObjpsoObjInfoOCXNAMErt.@"仿宋_utf-8@p?蘺v9v-  2   ' #瀸棸暈-?@Microsoft Forms 2.0 標簽Embedded ObjectForms.Label.19瞦projectName$/ ,$5;"N媅contentsP_1741104097w#瀸棸暈-?@>俳x]>俳x]PRINTCompObjvyo_GB23122i({   - !  .@"仿宋_utf-8@p?蘺v9v- 2  ' #瀸棸暈-?@Microsoft Forms 2.0 標簽Embedded ObjectForms.Label.19瞦ObjInfoOCXNAMExzcontentsP_1741104096u}#瀸棸暈-?@>俳x]>俳x]applyer$/ i({$5;"N媅_GB2312M.{   - !  .@"仿宋_utf-8@;蘺v9v- 2 (蓋章)PRINT$CompObj|oObjInfoOCXNAME~-' #瀸棸暈-?@Microsoft Forms 2.0 標簽Embedded ObjectForms.Label.19瞦schoolName +講鄗 M.{$5;"N媅_GB2312 4   contentsL_1741104095#瀸棸暈-?@>俳x]>俳x]PRINTCompObjo- !  .@"仿宋_utf-8@p?蘺v9v- 2  ' #瀸棸暈-?@Microsoft Forms 2.0 標簽Embedded ObjectForms.Label.19瞦schoolCodeObjInfoOCXNAMEcontentsL_1741104094#瀸棸暈-?@>俳x]>俳x] + 4$5;"N媅_GB2312  {   - !  .@"仿宋_utf-8@p?蘺v9v- 2  ' #瀸棸暈-?@Microsoft Forms 2.0 標簽EmbPRINTCompObjoObjInfoOCXNAMEedded ObjectForms.Label.19瞦applyDate + p$5;"N媅_GB2312 @2譱甕纄答 -R╤芮悙E嫄(闃綈銑湹鯡焯zwOlG}鑙鞋蔥鋡(⑥掗栟6R樕矊烌╣l%;xG 慓0)漵對J墄]瘜k 紊敔,"(Mぼ G]螤桁焨]x瘜3AY杄P6":y喯t8硢we珙P)Fk7蠻y蠄簺磑蟆腡筈 C霳灙W凋銫傷獻.%W屷_M_╉o璒魀!2V楳88~?菗駇鮲w痰4T蚤瞿9絳僀:Dd 餬 Q c $A? ?3"`? 2饎|徤翗pz2峩嬤`m`!餢|徤翗pz2峩嬤0wHL&mQ籒聾溄K靹W"$ 殍pF%\!Z迅徟? 6奃H慶W洮祑gg只{6`;$鐲O僨&揩F踔L裝赧戲L杄魯L=隸/9 =0D!簍Kl1+%鈛2%"S偛(姞4憆妣w!竸謚6鈛2頑pAeY朅賵斲>9饊F軙]篊葒迚{F暫]轄B鈖騔姐磿!淢颬軭每毦R圻Z熻`%:6楳88{甠>菗馛5}z<,朲*阾G鉁= ~=D;Dd 餬  c $A? ?3"`? 2饏艎n麥]I芩'灆賉滋ad`!餣艎n麥]I芩'灆賉滋0wHL'mQ籒聾溄K靹W"$ MJ.#缊爡Op卙態E>,Z凞H慶W洮祑gg只{6`;$鐲O僨&繈F鯑L棸舳戲L杄魯縊=隸+倭;z`$x|t冴Jr跣魰鄴助D )柋耹耰FX派c9瀸錸穱鸖蚥、N'伍寇疌J;Dd 餬  c $A? ?3"`? 2饏艎n麥]I芩'灆賉滋ac`!餣艎n麥]I芩'灆賉滋0wHL'mQ籒聾溄K靹W"$ MJ.#缊爡Op卙態E>,Z凞H慶W洮祑gg只{6`;$鐲O僨&繈F鯑L棸舳戲L杄魯縊=隸+倭;z`$x|t冴Jr跣魰鄴助D )柋耹耰FX派c9瀸錸穱鸖蚥🦸🏻‍♂️、N'伍寇疌JDd 餬  c $A? ?3"`?2W圷纜ea=N掀i?c`!疔W圷纜ea=N掀ir$$mPB!藗g :閔鞀甞煮.虤狉p=,!$ 陌籚讀掚韮墡X砱灨;戶冩喟:酇番灘益菓鏾:N勻 9MSs哊W紉爊境x韉)ユ対.t3麚硒7eaA褐 T偡獸W承?湘X`8~Dd 餬   c $A? ?3"`?2W圷纜ea=N掀id`!疔W圷纜ea=N掀ir$$mPB!藗g :閔鞀甞煮.虤狉p=,!$ 陌籚讀掚韮墡X砱灨;戶冩喟:酇番灘益菓鏾:N勻 9MSs哊W紉爊境x韉)ユ対.t3麚硒7eaA褐 T偡獸W承?湘X`8~HDd 餬 K c $A? ?3"`?2饞n撒鶳亂蝸pi焬nm`!餱n撒鶳亂蝸pi焬籋穰4峈罦聾}砳襐艣炮((訡o搡;鶃?郩?!-簸J6 & 褳破=xp$3o逈潩崰 x貎蛽|~"-惪!,d`!皰證c*y趕W跥瓵>惪 mOA熨醺sR%馧DT9憟掵 qU~@ 鼑TI)?"慡島%治鯔蘴b裏8礃e緣#Tw]釅:2縔 !d跁>濸р焸8ss鉦鏛P^!Y艫 N楇}絑τI/p烇q踃哬旕[x癨3=7搔5閘 zj燱D傔傱>{8lq$$If8!vh#v#vA:V 4斃,55A/ 4 a8f4Dd $ h餬 0 c $A ? ?3"`?24hxZ^訵 zr[.d`!疰4hxZ^訵 zr鴟mOA瑸褙誕僚壞:9熱/6.|pW釭\躀F遮婦OΗ籖m嘈fJ嫁"旟&N孭蕕p'輜庶f%凘慉:鑄鷛B潑 饊iRh坦o3A9x箛dQ[,08]鮦橬')坷y廄mcfQ苚崍r8鬈$浿T嬺*瑭乛 ~弙ZjWq$$If8!vh#v#vA:V 4斃,55A/ 4 a8f4$$If!vh#v#:V 4  覽0,5#4 J` 覽aJf4p 覽_$$If!vh#v!#v#v8#vt#v#vp:V 4 <覽覽覽覽覽覽0,5!5585t55p4 J` 覽aJf4p<覽覽覽覽覽覽kd0$$If4謭! l#!8tp <覽覽覽覽覽覽044 J` 覽aJf4p<覽覽覽覽覽覽$$If!vh#v!#v#v8#v:V 4旞 (覽覽覽覽0,5!55854 J` 覽aJf4p(覽覽覽覽_$$If!vh#v!#v#v8#vt#v#vp:V 4旞 <覽覽覽覽覽覽0,5!5585t55p4 J` 覽aJf4p<覽覽覽覽覽覽kd5$$If4旞謭! l#!8tp <覽覽覽覽覽覽044 J` 覽aJf4p<覽覽覽覽覽覽$$If!vh#v!#v#v8#v:V 4旞 (覽覽覽覽0,5!55854 J` 覽aJf4p(覽覽覽覽$$If!vh#v!#v:V 4旞 覽覽0,5!54 J` 覽aJf4p覽覽_$$If!vh#v!#v#v8#vt#v#vp:V 4旞 <覽覽覽覽覽覽0,5!5585t55p4 J` 覽aJf4p<覽覽覽覽覽覽kd;$$If4旞謭! l#!8tp <覽覽覽覽覽覽044 J` 覽aJf4p<覽覽覽覽覽覽v$$If!vh#v#:V 4旞0,5#alf4$$If!vh#v#v#v#v8:V 4旞0,55558alf4$$If!vh#v#v#v#v8:V 4旞0,55558alf4$$If!vh#v#v#v#v8:V 4旞0,55558alf4$$If!vh#v#v#v#v8:V 4旞0,55558alf4$$If!vh#v#v#v#v8:V 4旞0,55558alf4v$$If!vh#v#:V 4擜0,5#alf4p$$If!vh#v#:V 4攩05#alf4$$If!vh#v#:V 4斒  覽0,5#4 ` 覽af4p 覽t$$If!vh#v#v8#v#vR#v#v:V 斦 諪覽覽覽覽覽覽覽0,55855R554 ` 覽ap諪覽覽覽覽覽覽覽Nkd紺$$If斦譃 !#88R 諪覽覽覽覽覽覽覽04` 覽ap諪覽覽覽覽覽覽覽t$$If!vh#v#v8#v#vR#v#v:V 斂 諪覽覽覽覽覽覽覽0,55855R554 ` 覽ap諪覽覽覽覽覽覽覽Nkd僄$$If斂譃 !#88R 諪覽覽覽覽覽覽覽04` 覽ap諪覽覽覽覽覽覽覽t$$If!vh#v#v8#v#vR#v#v:V 敜 諪覽覽覽覽覽覽覽0,55855R554 ` 覽ap諪覽覽覽覽覽覽覽NkdIK$$If敜譃 !#88R 諪覽覽覽覽覽覽覽04` 覽ap諪覽覽覽覽覽覽覽t$$If!vh#v#v8#v#vR#v#v:V 敜 諪覽覽覽覽覽覽覽0,55855R554 ` 覽ap諪覽覽覽覽覽覽覽NkdO$$If敜譃 !#88R 諪覽覽覽覽覽覽覽04` 覽ap諪覽覽覽覽覽覽覽t$$If!vh#v#v8#v#vR#v#v:V 敜 諪覽覽覽覽覽覽覽0,55855R554 ` 覽ap諪覽覽覽覽覽覽覽Nkd誖$$If敜譃 !#88R 諪覽覽覽覽覽覽覽04` 覽ap諪覽覽覽覽覽覽覽t$$If!vh#v#v8#v#vR#v#v:V 敜 諪覽覽覽覽覽覽覽0,55855R554 ` 覽ap諪覽覽覽覽覽覽覽Nkd沄$$If敜譃 !#88R 諪覽覽覽覽覽覽覽04` 覽ap諪覽覽覽覽覽覽覽t$$If!vh#v#v8#v#vR#v#v:V 敜 諪覽覽覽覽覽覽覽0,55855R554 ` 覽ap諪覽覽覽覽覽覽覽NkdaZ$$If敜譃 !#88R 諪覽覽覽覽覽覽覽04` 覽ap諪覽覽覽覽覽覽覽t$$If!vh#v#v8#v#vR#v#v:V 敜 諪覽覽覽覽覽覽覽0,55855R554 ` 覽ap諪覽覽覽覽覽覽覽Nkd'^$$If敜譃 !#88R 諪覽覽覽覽覽覽覽04` 覽ap諪覽覽覽覽覽覽覽t$$If!vh#v#v8#v#vR#v#v:V 敜 諪覽覽覽覽覽覽覽0,55855R554 ` 覽ap諪覽覽覽覽覽覽覽Nkd韆$$If敜譃 !#88R 諪覽覽覽覽覽覽覽04` 覽ap諪覽覽覽覽覽覽覽t$$If!vh#v#v8#v#vR#v#v:V 敜 諪覽覽覽覽覽覽覽0,55855R554 ` 覽ap諪覽覽覽覽覽覽覽Nkd砮$$If敜譃 !#88R 諪覽覽覽覽覽覽覽04` 覽ap諪覽覽覽覽覽覽覽p$$If!vh#v#:V 4>05#alf4p$$If!vh#v#:V 4斦05#alf4$$If!vh#vp#vl:V 4旊 覽覽0,5p5l` 覽alf4p覽覽$$If!vh#vp#vl:V 4斍 覽覽0,5p5l` 覽alf4p覽覽$$If!vh#vp#v #vp:V 4斖 (覽覽覽覽0,5p5 5p` 覽alf4p(覽覽覽覽$$If!vh#vp#vl:V 4斖 覽覽0,5p5l` 覽alf4p覽覽$$If!vh#vp#v #vp:V 4斖 (覽覽覽覽0,5p5 5p` 覽alf4p(覽覽覽覽f$$If!vh#v#:V 05#alf$$If!vh#v#:V 05#alj$$If!vh#v#:V 斻405#als$$If桘!vh#v:V 054 ak$$If!vh#v#:V 05#alo$$If!vh#v#:V 攊/05#als$$If桘!vh#v:V 054 aj$$If!vh#v#:V 敂05#alj$$If!vh#v#:V -105#als$$If桘!vh#v:V 054 aj$$If!vh#v#:V 敂05#alj$$If!vh#v#:V #05#al$$If!vh#v#:V 4攽  覽0,5#` 覽alf4p 覽$$If!vh#v#v#v:V 敭 覽覽覽0,555` 覽alp覽覽覽$$If!vh#v#v#v:V 敭 覽覽覽0,555` 覽alp覽覽覽$$If!vh#v#v#v:V 敭 覽覽覽0,555` 覽alp覽覽覽$$If!vh#v#v#v:V 敭 覽覽覽0,555` 覽alp覽覽覽$$If!vh#v#v#v:V 敭 覽覽覽0,555` 覽alp覽覽覽$$If!vh#v#v#v:V 敭 覽覽覽0,555` 覽alp覽覽覽$$If!vh#v#v#v:V 敭 覽覽覽0,555` 覽alp覽覽覽9$$If!vh#v#vR#v#vN#vH :V 4敭 2覽覽覽覽覽0+,55R55N5H ` 覽alp2覽覽覽覽覽9$$If!vh#v#vR#v#vN#vH :V 4敭 2覽覽覽覽覽0+,55R55N5H ` 覽alp2覽覽覽覽覽$$If!vh#v#:V 4,  覽05#` 覽alf4p 覽$$If!vh#v#:V 4擿  覽05#` 覽alf4p 覽$$If!vh#v#:V 4  覽05#` 覽alf4p 覽$$If!vh#v#:V 4旪  覽05#` 覽alf4p 覽IDd 餬 @ c $A? ?3"`?2饟j7H*6嘯 Ho*m`!餲j7H*6嘯 H烪穰5峈盝肞=鰩I[7嫷QPups霟8珇BP:閻jC?@p愢P7蟷癟 緋搟=緹嫚 x貒蛽|~棈"戥?@ABCDEFGHIJKLMNOPRSTUVWXYZ[\^_`abcdefghijlmnopqrstuvwxyz{|}~朱寶瑞30Microsoft Office Word@ 舢@n牨吧@芇猇x@R祒] g  脹諟.摋+,D脹諟.摋+,  `h 教育部社科司 l XpxDocumentSummaryInformation8xMacros恦誚x]R緓]VBA恦誚x]`%緓]ThisDocument5S$ @Google.Documents.DocumentIdGoogle.Documents.RevisionId$Google.Documents.PreviousRevisionIdGoogle.Documents.PluginVersion(Google.Documents.MergeIncapabilityFlagsGoogle.Documents.TrackingKSOProductBuildVer ICV014o3czMqQnsvO9HHzJug9goTJ4vMhLwXzvlZ7tbWEjy800747848799964191432181897620338399037772.0.1974.7364true2052-11.1.0.11294$B5B8723999974F55917AEEC0B9BD0DDFrU $`D$`H$A`L$`P$`T $`X$A`\$``$`d$ `5$A `9$*\Rffff*0d6622c1ef*\R8005*#42*\R1*#91*\R8005*#44*\R0*#17*\R0*#1$*\Rffff*0c6622c1ea*\R1*#155*\R1*#152*\R1*#c6*\R4*#228@PH PT\0dl`t |p @ P@p   "  ( 0" H (Px     , J@H FP " (  (088px "! :  " .: @ H  Xp x    (:3'    0)P)h )) $))) )8)P)h)) ; N"0.8 P ` p+  R"P.X p  +     Y#$%&0)*+,-./"123456i8C:;<=>?@AB7DEFGHIJKLMNOPQRSTUVWX[\]_`bcdefghZkzmnopqrstuvwxj{|}~[! #C$證 Gr/R 譬鶨O_鉆zpjpe#罿F喀/琁嗜&L紝袡LdZxx0btnCheckProtect1, 24, 12, MSForms, CommandButton!applyDate, 23, 13, MSForms, Label"schoolCode, 22, 14, MSForms, Label"schoolName, 21, 15, MSForms, Labelapplyer, 20, 16, MSForms, Label#projectName, 19, 17, MSForms, Labelsubject, 18, 18, MSForms, Label#projectType, 17, 19, MSForms, Label/btnCheckProtect, 16, 20, MSForms, CommandButton'feeYearXmlStr, 15, 21, MSForms, TextBox$jfgsXmlStr, 14, 22, MSForms, TextBox)jfgsTitle, 13, 23, MSForms, CommandButton+memberTitle, 12, 24, MSForms, CommandButton,chargerTitle, 11, 25, MSForms, CommandButton,projectTitle, 10, 26, MSForms, CommandButton-btnEditProtect, 9, 27, MSForms, CommandButton!baseData, 8, 28, MSForms, TextBox%cyzkxxXmlStr, 7, 29, MSForms, TextBox%jfgsxxXmlStr, 6, 30, MSForms, TextBox%sqxmxxXmlStr, 5, 31, MSForms, TextBox$sqrxxXmlStr, 4, 32, MSForms, TextBoxpsd, 3, 33, MSForms, TextBox$docPassword, 2, 34, MSForms, TextBox"docStatus, 1, 35, MSForms, TextBoxstatus, 0, 36, MSForms, TextBox嗜&L紝袡LdZx 譬鶨O_鉆zpjME, @S"SS"<ss {>"B@@:彈出設置密碼對話框,保證其他人不能更改文檔🤙,除了超級管理員kd,填報內容已通過檢查,請點擊修改申請書按鈕修改 <提示...A:k`oX編輯填報內容按鈕 *!2!d1, 表示鎖住狀態 *!D!FAHd JB@@kd填報內容未通過檢查🧒🏼,可直接修改 <提示...A:AHkox文檔關閉時清空常量緩存H *!N(F T Text Box 4 %P(R *B@Vo Z Text Box 4 %P(R/隱藏提示]X ^.\ 載入常量文件]p ^.` `(b `(d `(f `(h *!j \base.dat `%嚴重異常🙅🏿‍♀️🚴🏿‍♀️:申請書當前所在文件夾內找不到base.dat文件👸🏻,無法加載學校、學科代碼表等數據!請先將申請書壓縮包內的base.dat復製到當前文件夾𓀋,再重新打開申請書👒。 l找不到數據源,部分數據無法獲得A@:d@ `!n *!N(Fk  !p rA@6k隱藏表示狀態和密碼的控件文檔狀態 0:非保護 1:保護? *!2(? *!2(t 文檔保護密碼? *!D(? *!D(t填報內容的XML格式的字符串數據? *!v(? *!v(t? *!x(? *!x(t? *!z(? *!z(t? *!|(? *!|(t *!2A~ *!B@Ho G-----------------------項目基本信息填報-------------------------------- *!2G|j B@HA@6 B@@ *!x[點擊此處填報] (dH[點擊此處修改] (k A@6oL-----------------------申報人信息填報--------------------------------------- *!2G|j B@HA@6 B@@ *!v[點擊此處填報] (d([點擊此處修改] (kA@6oO------------------------以下是課題組主要成員情況的行填報----------------------- *!2G|j B@HA@6 B@@ *!|[點擊此處填報] (d[點擊此處修改] (kA@6oH *!2G|j B@HA@6 B@@ *![點擊此處填報] (d@[點擊此處修改] (kA@6o打印前作些頁面上的處理,]]] !t' !'] *!2!d1&請註意🌂👜:本文檔在提交之前必須檢查保護。 % "現在文檔還未檢查,仍要繼續打印嗎🙎🏿‍♂️🎸? '    文檔未檢查保護$:'   !p A6A~k|k 隱藏表樣式A~A@6  *%!(  *%!(  *%!(  *!! *%!(  *!! *%!(A@6k 隱藏檢查按鈕? (t? (]( $.' B@  !' k B@  (沒有裝有打印機或別的錯誤,請檢查打印機! 打印錯誤A@: !p A6kX *!2!d1A~A@6  *%!(  *%!(  *%!(  *!! *%!(  *!! *%!(A@6k`  (t  (k80 !p A6k *!2!d1A~A@6  *%!(  *%!(  *%!(  *!! *%!(  *!! *%!(A@6k  (t  (oH FilePrint Macro 打印活動文檔 *Bo FilePrintDefault Macro 以默認方式打印當前文檔 *Bo 根據全文件名返回路徑]H]`  %'     %\y k   %'i` xoP H 詼Attribute VB_Name = "ThisDocument" 孊as1Normal.VGlobal!猄paclFalse reatablPre declaId濼ru BExposeTemplateDeriv$Custom iz凜1Control亸btnCheckProtect1, 24, 12, MSF媠, CommandButt on崱%appl靬DN!3!! LabelschoolCode>1B,佂@015H/]B-er@ 0,6hprojSL19@7hs靧bA@ 8;鑄ypK1fw |<2>F鍆feeYearXm豯St繭A]2@_TextBoxX}癹fgs@|2墲aTitl丄2 N鉥membe~r羅_!A孒_c癶arg 2iP邿%;d22 RC@E憫2/ * ,請點擊修改申請書$ q '#鴇嗉5O)鸓"鱛"3V"1_"Z".valu"A2unlock`┓unL@2-"%",可直,接"   '!關閉時清空常懶炕捍鍷A醴牠1On Error Res喙 N鄠Sj;bDhh SMeP,apes ("2=1 4") .Visi竚s唎4O.Savp$ 胈Open  0Cx睟 '隱藏1+盕rootEl6ea!GO搖Set = Get冎#3'載入0文件#Qxm蘬c@t 乀.asyncpRO -id_O鄋Parsㄎ EresolveE鄕tern愐` .p`erveW餳ite呎75 Load(!Path + "\"r. ")E霺#1 "嚴重異#恒F當前所在!夾膧謖也壞藉Q,無法釉匱🦿!⒀Э拼氡淼仁藎∏胂冉壓縮包內的5復頻絨3,僦匭麓蚩3。翹Cri鄑ical癧S源,部分帽q獲得寫a隑3P3%XMLu<Not 5Don衽膚d@lowOe襦繤ields m熲~y2/憊Qv和gp的控*rD 0:非眳 1:廰 剕Wid @= 0.75R幍 ThisDocument.status.Height = 0. 75 '牡當;っ藶H 鋚sd.Width jD蔡畋諶蕕腦ML格式的字符@串數據jsqrxxXmlSh 噝 Wi鴇th吿C 啪ErrHandl0e: 罬el踄趭亳$剄k;_kWk 遤6u _j 樳[遡!b _i説蔏 ah牑籫 Sub FilePrintB(嗍' '' MacroA打印活動文掂胠俍 ?`蟖q Defaul 以默@認方式等鼻nt伹 f根據全文件名返回路徑 Public Fun" G嚕ath(ByVal strFullName As St@%g)GC! Dim iIn tegerntxLenNP= VBA.(慣~For= To 1@ep <-13a IMi耫, i,*@T"\O Exi紅 w鍎N饌蠐pc ft\  vate6 &皨jP!廮C k&__SRP_2(__SRP_3%unLockWin* sqrxxWin9[C5X P L黤h%L黤h%L黤h%L ch%L:8 $ 4l8 *FX%L( 黤<]3/86X(3'棹':< N((:hNXX 6X(棹%'LWX%x $ x,x5X瀨 <l瀨敲S+恂X 5X)?齤h%x $ x,x)?齤h%x $ x,x)?齤h%x $ Px,x)?齤h%x $ Px,x)?齤h%x $ x,x)?齤h%x $ x,x)?齤h%x $ x,x)?齤h%x $ x,x)?齤h%x $ x,x)?齤h%x $ x,x)?齤h%x $ x,x)?齤h%x $ x,x;x $ xaX(h]/(黇+恂 x6Xx $ x x,LP(8xTX(棹 +x $ xaX(h]3x5X0X4 +FX 5X$+x $ xaX:h]3x5X:h%X4,:h%X4,+FX 5XH$ xXH +x $ xaX(h]3x5X0XX +FX 5X$+x $ xaX:h]3x5X:h%XX,:h%XX,+FX 5XH$ xXH0   0 H  0   0 H  0   0   0 x  < L D h       4 X ` p     x         | TT8\dt    Q ay  `Y 9 Ey$ `=, `A0$ `h $@< #@,L 9"@ D Y!@Ph i @ @ @ @ @ ! @rU 0Q y Q@ 1Q9Y y .Q.  1Y  8a `  @!$$ Ha"" P##T`` \a  `I da  ` l!! ta ` | 1 ` y       a9`  a y  a `I    ) Q ay  `Y 9 Ey1   A u  9m - a Au M  -aMAu-a   -a9  9 MM9AuMWWW0   0 @  0   tK!:h%x $ x,x:D:hNHHx Dx 0D )xD5H  $ 8t$ xDHK:T:hNXXx Dx 0T )xTI i @I4  @8IX  @DI`  @\Ip @t @ A@I i@hx @ @ @ @ )@ I @ i @(InLGrR$xME(SPSSS0{9D39F879-FB37-4EBA-9479-21D823AC8E9A}{5B09D797-BF55-4376-B8B0-DD7A82CFCA3F}(gr X  %侢0 %b8Xx8X`8X8X8X88榱"f  "(8 @P"X    "  "]@8 !F !F *!D!FAH A@r@d(輸入密碼錯誤📒👊🏻,請重新輸入A@: (F B@kXoPX A@ro0  $'o鞅Attribute VB_Name = "unLockWin" " Bas0{9D39F879-FB37-4E BA-9421D823AC8E9A}{5B09D797-BF55-4376-B8B0-DD7A82CFCA3F} dGlobal!婼pacoFalse 奀reatablPre declaId訲ru BExpose0TemplateDerivCustoHmiz婦 P" tmpPW@D As S竛唃 Sub Btn_Clic@k() If pwd.value <> " " And = ThisDocument.ps0Then!#Catll1l雬 Unload MF E耏AMsgBox "輸朊藶氪砦螅脛匭~鋁n )徧S╡tF'sCE/銲f A?MC纁ancelNCH+!_ChangeBPD]= text2NoCNFi爈ter(@ ,De繸rU $ `T$A `X$ `\$ ``$ `d,A `h )  , `l$ $ `p, `t  $A 21-36A2-11CF-8053-00AA006009FA}#2.0#0#C:\WINDOWS\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#42*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#C:\WINDOWS\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#44*\R8005*#44$*\Rffff*0N6622c1e9*\R0*#f*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#C:\WINDOWS\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#46$*\Rffff*0e6622c1ef$*\Rffff*0c6622c1ea2 L P T X \ ` d h l p t x | T6 Gr帇擒C43.Vl蠫[肝 g栞1fD緕S歪茭*8佊1,N沘賫{鉿}x8佊1,N沘賫{鉿}帇擒C43ME$@SPSSS11>" 8!n *!v(F A@rop A@roP  $'o(H $J (Fo NxGX'NjoPrivate Sub IDCardNo_Change(): tmpIDCardNo = textBoxNoCNFilter(IDCardNo, tmpIDCardNo)End Sub@Private Sub IDCardNo_Exit(ByVal Cancel As MSForms.ReturnBoolean)- birthday.value = getCIDBirthday(IDCardNo)End SubFPrivate Sub IDCardNo_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)( If KeyAscii = 120 Then KeyAscii = 88End Sub  $T'oX  N %Z$X'No  $T'o  N % %G'Njoh  $T'oX  N % %G'Njo Af男,女,$j (hg教授,副教授,講師,助教,研究員,副研究員,助理研究員,研究實習員,高級實驗師,實驗師,助理實驗師,實驗員,高級工程師,工程師,助理工程師,技術員,高級農藝師,農藝師,助理農藝師,農業技術員,高級獸醫師,獸醫師,助理獸醫師,獸醫技術員,高級畜牧師,畜牧師,助理畜牧師,畜牧技術員,高級經濟師,經濟師,助理經濟師,經濟員,高級會計師,會計師,助理會計師,會計員,高級統計師,統計師,助理統計師,統計員,編審,副編審,編輯,助理編輯,技術編輯,助理技術編輯,技術設計員,研究館員,副研究館員,館員,助理館員,管理員,主任醫師,副主任醫師,主治醫師,醫師,醫士,主任藥師,副主任藥師,主管藥師,藥師,藥士,主任護師,副主任護師,主管護師,護師,護士,主任技師,副主任技師,主管技師,技師,技士,$j 6(h/博士研究生,碩士研究生,本科生,大專生,中專生,其他,$j (h博士,碩士,學士,其他,$j (h 1234567890 % - % . % ' *!v!F]P ^.l *!v!F lBn l!r wapplyer,gender,birthday,IDCardNo,title,division,duty,eduLevel,eduDegree,language,email,address,postalCode,telOffice,telApk !F $(& B@oh'4 _applyer,gender,IDCardNo,title,division,eduLevel,eduDegree,language,address,postalCode,email,telY姓名,性別,身份證號,職稱,所在部門,最後學歷,最後學位,外語語種,通訊地址,郵政編碼,E-Mail,手機$tzk] !F$x'v v v <警告...A: B@z0k( !F %  !F@ % 申請者信息中 E-Mail 格式錯誤 <警告...A: B@zk !F$z !F %申請者信息中 郵編 格式錯誤 <警告...A: B@zk !F$z申請者信息中 固定電話 格式錯誤 <警告...A: B@z k  !F$z申請者信息中 手機 格式錯誤 <警告...A: B@z( k '4i  淶Attribute VB_Name = "sqrxxWin"  鳥as|0{D4F9562E-6C05-47D0-A200-155BB8CEEC1C}{DD96670B-6631-4406-BE7A-53CDE1DCFA2A} dGlobaBl奡pacoFalse 奀re atablPr@edeclaI"d覶ru BEx0pose0TemplateDerivCust恛miz婦 P $ tmpPostalCod@e As S絥g TelO8ffi{Email IDCardNogNu mbersConst cho繧0Labe亯選擇@o/D lea聄 清空 F Sub btn_kt_delete_Click () If MsgBox("真的要境鍬悸穡", vb(Yes6+@Question, "A ...")*羵 Thenapplyer.衯alu翋"&!gendbi纑thday 匶 'Etitle烈 divis-utSeduLevelR Degrelanguagaddre約s f鋀te!W2With6isDocu@ment.R e.T羗s(2DD%,.Cell(2, 2)ext!U穲;4# 6}3_C_4? # ? $ 5達C_! 6? # ~7_A E榥d 丮鐑Th∟駞卌ap翄!JeN(K鉐B鑈ml`糝[*瀤.En!ZH雅 %ShetF``sI鴉 困a堵BD旴tn8N狾z. c'\KS逴E zE c餸flagYp10'3Y郺Bou= (1910) & "-f"P998=M onthD`WSh|owu CommandB纔tton11 g(check`Form(d),dExit AUKKq0s,?K j'}/Ik / 廘 鑛 +m _M dfn衜╫閜疦 +r? WlO Jv颫 峸/ 纗揋寋-GQQ 7C* Dim rootEle眥bject M= Ge>t~cp>s`H.cA胑("Cha rger"$G'昵胝噝畔Call makeXML(t, Me啷,S7,4,%,2,e0,-,e+(,e&,B,d!,,邞 痜琭 . 丼Unload 骺c噢R2跼漡鈅nge5紣蠒 t@欚糔oCNFilter(,1遺P(V71 _X(ByVa@l Canc笊MSa[s.Retu爎nBoo衛n$[OgetCID獵_Ke2yP鎠sAsciiA);Intep&4衑= 120be 888'箎//Q -敹'End Sub'Privatex IDCardNo_Exit(ByVal Cancel As MSForms.ReturnBoolean) birthday.value = ge爐CIDB,(^KeyPressAscii咺ntegDer咺f += 120 Thern 88s園postalCode_Change(+乶tmpP ntextBoxFilter(, , Fal黶e%;^-|P!zOnly"Nu刴b PVBA.纔(E )%)telOE騎= 婥 翧?,▅A>@|4In Str(g "2"聄 191Di m 憌Object>= G 0 A 綨0ot (脩1, h@)7 "申請噝畔⒅  格式錯0N  } !,Item(鐎 w7EOrPe6_ l _ P 尤時? ly1o tr; 2鵣l3 袷(固定電芑盁  P亥飶 4 / / 塊#!; /1  iO煉T桜__SRP_aa__SRP_bQfundsWinlXsqxmxxWin韁 !=  A=  a=  =  =  =  =  >  !>   A> (( `Q  W    W    W    _  0   0   0 @  Pl郎x$ x$ x0   0 H  0   0   0 X  0   0   0 h  0   l=xx xICppCtt`  `' '@x! x 2tpx6@ `ICppCtt`  `' '@x! x 2tpx6@ `ICppCtt`  `' '@x! x 2tpx6@ `ICpp Ctt`  `' '@x! x 2tpx6@ ``:P ` `麛@-  麛. 麛瘙`#t龖H/t6 `@ 瘙+x $ xa`:P]鸃x5`: 忐*x $ xa`%忐x5`?忐W`鼖Cttl=棹棹`4xx  /t)x棹5`@`x! x `:P]<@黇棹! 棹 8)x棹5`x! x x((忐4 tpx棹`@ 瘙0 h  XXXtt | | x x grU /慉:y/ D盇1BqB!@ Yy y22yII6A::92::;9;:L!y Pa$Aa; T!y; X!; ```  I  \!; `1%aY% d!; ha$A/ l % pa$A/ t!/ ``  x!+  ` `  |!+  ` `I   &  &  Q&  i&  & `  !;  '  1'  I'  a' ! < !)< a$AA<  y'  '  '  '    q(  Y<   `  <   `  <  <  <  <   = `x, `|  $ `,  `  $I `( `#nrU $`T$A`X$`\$`` " " 8@H 4P  " "  "  0@0Hx "  "  "+ *$# H +Ph p*(# E$\$\0 E8 Xh 6p"    6( *` "   t衳Gro)A|e!虳H-H嶇g脊XTWE/o磈ǔ$壗ロ玙dI攁濹%⒑k鹮bLH礏摱芨肗xME@SPSSS< 0> @> @`> > > > >" ?? ? " (?0?H? " P?X?p? B  x??4??? Z?0@8@*@@*p@ 燖 繞 郂 :A >@A :A D繟 8B 8@B"xB&燘 &菳&養&C @CHCXC]Dsubject,fee,fee_note,orderNo ]D year,feeYear ]@]@H ]@駾(]@P]@p ]@x]@ ]@Private fee7_tmp As StringPrivate fee8_tmp As StringPrivate fee9_tmp As StringPrivate fee10_tmp As StringPrivate fee11_tmp As String]@]@ ]@]D $!修改這裏要同時pub_check的checkAll]Dh !F %請先填寫申請經費總額!A@: (Fko !F % (Fk $Z $Z .00 % (Fo  $T'oX(  $T'o0h *!!F] ^. *!!F Bn ProjectApplyBudget |Ak *!!F] ^. *!!F Bn ProjectApplyBudgetYear ~Ak8 *! %7"! !d$ (F7"! !d$ (Fq !F$Z  (& B@o0解析xml賦值給對應編號的控件(控件名末尾字從0開始)]x]]]] ,$j''   %   $  % % $. $ %%!d (Fh  'PoH校驗$4G|j !!F工程科技人才培養研究專項 !!F一般項目 !F `你填報的申報類別為 “工程科技人才培養研究專項(一般項目)” 該類別要求申請經費總額不超過 10 萬元A@:|Hk@ !!F工程科技人才培養研究專項 !!F重點項目 !F `你填報的申報類別為 “工程科技人才培養研究專項(重點項目)” 該類別要求申請經費總額不超過 20 萬元A@:|pkh !!F 中國特色社會主義理論體系研究專項 !F \你填報的申報類別為 “中國特色社會主義理論體系研究專項” 該類別要求申請經費總額不超過 10 萬元A@:|k !!F 中國特色社會主義理論體系研究專項 !F [你填報的申報類別為 “中國特色社會主義理論體系研究專項” 該類別要求申請經費總額不低於 8 萬元A@:|k高校思想政治工作專項 !!F高校思想政治工作專項 !!F 思想政治工作 !F d你填報的申報類別為 “高校思想政治工作專項 的 思想政治工作課題” 該類別要求申請經費總額不超過 10 萬元A@:|kIf sqxmxxWin.projectType.value = "高校思想政治工作專項" And sqxmxxWin.projectSubType.value = "二類" And applyTotalFee.value > 2 Theni MsgBox ("你填報的申報類別為 “高校思想政治工作專項 的 二類課題” 該類別要求申請經費總額不超過 2 萬元") Exit SubEnd IfIf sqxmxxWin.projectType.value = "高校思想政治工作專項" And sqxmxxWin.projectSubType.value = "輔導員骨幹專項" And applyTotalFee.value > 2 Thens MsgBox ("你填報的申報類別為 “高校思想政治工作專項 的 輔導員骨幹專項課題” 該類別要求申請經費總額不超過 2 萬元") Exit SubEnd If教育廉政理論研究專項 !!F高校輔導員研究 !F I你填報的申報類別為 “高校輔導員研究” 該類別要求申請經費總額不超過 2 萬元A@:|k !F$Z  !F$Z !F$Z %殭櫃櫃? +間接費用 不能超出 申請經費總額 的40% 請修改A@:|0k(k  !F$Z % !F$Z !F$Z !F$Z %0申請經費總額 與 申請經費年度預算的合計值 不相等A@:|kx !F$Z !F$Z % !F$Z %)直接費用與間接費用之和不等於申請經費總額 A@:|k !F$Z !F$Z 其中外撥金額不應大於申請經費總額A@:|k If Val(fee4.value) > 0 Then` If VBA.Format(Val(fee3.value) / Val(fee9.value)) - 0.2 > 0 And fee_note3.value = "" Thenh MsgBox ("當 會議費/差旅費/國際合作與交流費 超過 直接費用 的20%時,必須提供詳細的測算說明。") fee_note3.SetFocus Exit Sub End If End If0 If InStr(fee_note1, "版面費") <> Empty Then MsgBox ("你填寫的預算說明中出現“版面費”字樣的描述,根據《高等學校哲學社會科學繁榮計劃專項資金管理辦法》具體執行有關事項問答🚣🏽‍♂️,項目資金不得列支論文發表版面費,請修改") fee_note1.SetFocus Exit Sub End If/ If InStr(fee_note2, "版面費") <> Empty Then MsgBox ("你填寫的預算說明中出現“版面費”字樣的描述💗,根據《高等學校哲學社會科學繁榮計劃專項資金管理辦法》具體執行有關事項問答🤷🏻‍♂️,項目資金不得列支論文發表版面費,請修改") fee_note2.SetFocus Exit Sub End If/ If InStr(fee_note3, "版面費") <> Empty Then MsgBox ("你填寫的預算說明中出現“版面費”字樣的描述𓀘,根據《高等學校哲學社會科學繁榮計劃專項資金管理辦法》具體執行有關事項問答,項目資金不得列支論文發表版面費♧,請修改") fee_note3.SetFocus Exit Sub End If/ If InStr(fee_note4, "版面費") <> Empty Then MsgBox ("你填寫的預算說明中出現“版面費”字樣的描述🙆🏻‍♂️,根據《高等學校哲學社會科學繁榮計劃專項資金管理辦法》具體執行有關事項問答,項目資金不得列支論文發表版面費,請修改") fee_note4.SetFocus Exit Sub End If/ If InStr(fee_note5, "版面費") <> Empty Then MsgBox ("你填寫的預算說明中出現“版面費”字樣的描述🫷🏻,根據《高等學校哲學社會科學繁榮計劃專項資金管理辦法》具體執行有關事項問答,項目資金不得列支論文發表版面費☛,請修改") fee_note5.SetFocus Exit Sub End If/ If InStr(fee_note6, "版面費") <> Empty Then MsgBox ("你填寫的預算說明中出現“版面費”字樣的描述👨,根據《高等學校哲學社會科學繁榮計劃專項資金管理辦法》具體執行有關事項問答⏲,項目資金不得列支論文發表版面費,請修改") fee_note6.SetFocus Exit Sub End If/ If InStr(fee_note7, "版面費") <> Empty Then MsgBox ("你填寫的預算說明中出現“版面費”字樣的描述🫗🤵🏽,根據《高等學校哲學社會科學繁榮計劃專項資金管理辦法》具體執行有關事項問答,項目資金不得列支論文發表版面費,請修改") fee_note7.SetFocus Exit Sub End If/ If InStr(fee_note8, "版面費") <> Empty Then MsgBox ("你填寫的預算說明中出現“版面費”字樣的描述,根據《高等學校哲學社會科學繁榮計劃專項資金管理辦法》具體執行有關事項問答,項目資金不得列支論文發表版面費👶🏼,請修改") fee_note8.SetFocus Exit Sub End If0 If InStr(fee_note11, "版面費") <> Empty Then MsgBox ("你填寫的預算說明中出現“版面費”字樣的描述,根據《高等學校哲學社會科學繁榮計劃專項資金管理辦法》具體執行有關事項問答🧘🏻,項目資金不得列支論文發表版面費,請修改") fee_note11.SetFocus Exit Sub End If !FG (Fj !FG (Fj !FG (Fj !FG (Fj !FG (Fj !FG (Fj* If fee7.value = "" Then fee7.value = 0* If fee8.value = "" Then fee8.value = 0* If fee9.value = "" Then fee9.value = 0, If fee10.value = "" Then fee10.value = 0, If fee11.value = "" Then fee11.value = 0 格式化經費 !F0.00 % (F !F0.00 % (F !F0.00 % (F !F0.00 % (F !F0.00 % (F !F0.00 % (F/ fee7.value = VBA.Format(fee7.value, "0.00")/ fee8.value = VBA.Format(fee8.value, "0.00")/ fee9.value = VBA.Format(fee9.value, "0.00")1 fee10.value = VBA.Format(fee10.value, "0.00")1 fee11.value = VBA.Format(fee11.value, "0.00") !F0.00 % (F !F0.00 % (F !F0.00 % (F !F0.00 % (F !F0.00 % (F *!!  *% fee$!F7"! (d fee$!F7"! (d fee$!F7"! (d fee$!F7"! (d fee$!F7"! (d fee$!F7"! (dC .Cell(10, 2).Range.Text = getControl(Me, ("fee" & 7)).valueC .Cell(11, 2).Range.Text = getControl(Me, ("fee" & 8)).valueD .Cell(12, 2).Range.Text = getControl(Me, ("fee" & 10)).valueD .Cell(13, 2).Range.Text = getControl(Me, ("fee" & 11)).value fee_note4$!F7"! (d fee_note1$!F7"! (d fee_note2$!F7"! (d fee_note3$!F7"! (d fee_note5$!F7"! (d fee_note6$!F7"! (dE .Cell(10, 3).Range.Text = getControl(Me, ("fee_note7")).valueE .Cell(11, 3).Range.Text = getControl(Me, ("fee_note8")).valueF .Cell(12, 3).Range.Text = getControl(Me, ("fee_note10")).valueF .Cell(13, 3).Range.Text = getControl(Me, ("fee_note11")).value feeYear$!F7"! (d feeYear$!F7"! (d feeYear$!F7"! (dq *! % !F7"! (d !F7"! (dq(S ThisDocument.jfgsXmlStr.value = setListValue("1,2,3,4,5,6,7,8,9,10,11", attIds) 1,2,3,4,5,6 |$ *!(F1,2,3 ~$ *!(F A@roh0]p真的要刪除記錄嗎👒?   刪除...$:  *!!  *%  fee $(F fee_note $(F  feeYear $(F@7"! (d7"! (d7"! (d7"! (d7"! (d7"! (d# .Cell(9, 2).Range.Text = ""$ .Cell(10, 2).Range.Text = ""$ .Cell(11, 2).Range.Text = ""$ .Cell(12, 2).Range.Text = ""$ .Cell(13, 2).Range.Text = ""7"! (d7"! (d7"! (d7"! (d7"! (d7"! (d# .Cell(9, 3).Range.Text = ""$ .Cell(10, 3).Range.Text = ""$ .Cell(11, 3).Range.Text = ""$ .Cell(12, 3).Range.Text = ""$ .Cell(13, 3).Range.Text = ""7"! (d7"! (d7"! (dqx *! % (F (F7"! (d7"! (dqXML *!(F *!(F (& B@ko A@rox 從控件到XML]h]]]]] ,$j' ,$j']] ^.\](]@budget \%<.8']X     $ $ $. ' G  'j $ % %'ProjectApplyBudget \%<.  | A  8B@  'x 8!n'i` 從控件到XMLp]](]@]X]p] ,$j' ,$j']] ^.\]] budgetYear \%<.8']     $ $ $. ' G  'j $ % %'ProjectApplyBudgetYear \%<.  ~ A  8B@  'X 8!n'i@]]] ]( ]@ ,$j' ^.\    $  $. $ \%<. !F (d  B@h o` 計算總經費X ~fee9.value = VBA.Format(Val(fee1) + Val(fee2) + Val(fee3) + Val(fee4) + Val(fee5) + Val(fee6) + Val(fee7) + Val(fee8), "0.00") $Z $Z $Z 0.00 % (Fix 計算所占直接經費比例 !F !F %0 (F (F (F (F fee5_bl.value = 0# fee6_bl.value = 0# fee7_bl.value = 0# fee8_bl.value = 0# fee9_bl.value = 0#d $Z $Zd.00 % (F !F$.0 !F (Fk $Z $Zd.00 % (F !F$.0 !F (Fk( $Z $Zd.00 % (F !F$.0 !F (Fk $Z $Zd.00 % (F !F$.0 !F (Fk8 F fee5_bl.value = VBA.Format(Val(fee5) / Val(fee9) * 100, ".00"), If Left(fee5_bl.value, 1) = "." Then+ fee5_bl.value = "0" + fee5_bl.value End IfF fee6_bl.value = VBA.Format(Val(fee6) / Val(fee9) * 100, ".00"), If Left(fee6_bl.value, 1) = "." Then+ fee6_bl.value = "0" + fee6_bl.value End IfF fee7_bl.value = VBA.Format(Val(fee7) / Val(fee9) * 100, ".00"), If Left(fee7_bl.value, 1) = "." Then+ fee7_bl.value = "0" + fee7_bl.value End IfF fee8_bl.value = VBA.Format(Val(fee8) / Val(fee9) * 100, ".00"), If Left(fee8_bl.value, 1) = "." Then+ fee8_bl.value = "0" + fee8_bl.value End IfF fee9_bl.value = VBA.Format(Val(fee9) / Val(fee9) * 100, ".00"), If Left(fee9_bl.value, 1) = "." Then+ fee9_bl.value = "0" + fee9_bl.valuekko  $T'A Call caclProportiono8  $T'A Call caclProportiono`x  $T'A Call caclProportiono  $T'A Call caclProportiono  $T'A Call caclProportionop8  $T'A Call caclProportiono Private Sub fee7_Change()9 fee7_tmp = textBoxFilter(fee7, fee7_tmp, True, False) Call caclTotal ' Call caclProportionEnd SubPrivate Sub fee8_Change()9 fee8_tmp = textBoxFilter(fee8, fee8_tmp, True, False) Call caclTotal ' Call caclProportionEnd SubPrivate Sub fee9_Change()9 fee9_tmp = textBoxFilter(fee9, fee9_tmp, True, False) Call caclTotal ' Call caclProportionEnd Sub以下為年度預算信息x  $T'o  $T'o  $T'o8 '4 applyTotalFee 申請經費總額$tz8k0 feeYear1,feeYear2,feeYear3&年度預算經費,年度預算經費,年度預算經費$ z?k?  申請經費總額$"Gzj  其他來源經費$"Gzj 業務費$"Gzj 勞務費$"Gzj 設備費$"Gzj4 If exitFun(fee4, "設備費", 2) Then Exit Function8 If exitFun(fee5, "專家咨詢費", 2) Then Exit Function4 If exitFun(fee6, "勞務費", 2) Then Exit Function= If exitFun(fee7, "印刷費/宣傳費用", 2) Then Exit Function2 If exitFun(fee8, "其他", 2) Then Exit Function2If exitFun(fee9, "直接費用", 2) Then Exit Function 間接費用$"Gzj  其中外撥金額$"Gzj  年度預算經費$"Gzj  年度預算經費$"Gzj  年度預算經費$"Gzj'4i<<鴝Attribute VB_Name = "fundsWin"  鳥as|0{F1250B39-6D11-4C2C-A132-4FA7410A3FA2}{C1350E08-5A63-42BB-AA91-8F34E2BA9EB2} dGlobaBl奡pacoFalse 奀re atablPr@edeclaI"d覶ru BEx0pose0TemplateDerivCustomiz婦 P Const attIds伃subjec t,fee_note,orderNo_ye躠rY2applyTotalFee_tmp As Sngother羳Sourc 軥&123456V'I78910Z肎萖JO乬N,QRGC擛fIndex乭I ntege2 '修改這鏌眕ub_checkD的Allh鋋s# = 腵Sub dir@V鍷Click()H If 嘇.Format( Q.value)!W" Then#MsgBox ("請先填寫申請經費總額👩🏼‍🚒!~" Ac B End If `IoQhangeexp0!%繱5VB$Va耹 %) - K), ".00a!s*_CjkA= text.Fi恖terK, , 仸,肂2虋汐p幫K, O2 A=Us罌繮_Initializ =ThisDocument.jfgsXmlStr!3<> "mTDi靘 羖O舛<;Set= Ge唗 Call.loadXML(zH^getList郆ueTo羳~trol(@C(Pro葾A緽u鷇"8饊D 6Ac @u*郤A崗鹹:  QO鵒l(pA嚶t%With%"RC.T~s(62f>CellR(.(5, 2).t88.譕郤G4O !1 SdelBtn.En1 釐(14) > 0D1.F1sJT '解析xml賦值給對應編號的控件(A名末尾字從0開始 xPub癮8+(&s矅'$, itby釣Taging, tagQ顂74 (e熰w99qaconQ2!i廇srow}t吳f繢Item"Variant= Split鞞 ( 0(,A[= 1爎 Ea坈h A In 3".Ele酙sB鰕(罣1iQg To UBzo(F x匤= `礑Me, W (i) +瞸LTrim(kstr( ) A1D焒+ _ :).!`(0).T0NwX+/S剈b save/俖J'校驗鏎Pm(眽RO Exit+@sqxmxx鸚.bp3WTyp "工程科技人才培養研究專項" A皦child一般蟈钅浚Ee:10 `你畋ǖ納甌ɡ啾鷂 L“( 該髩棽懷過 萬元1,a6觘 > OOOOO重幍ON'> 2O象O(O蜘DOOE$$$中國特色社會主義理論體溝祘%"" ""拼厴緇嶂饕謇礪厶逑笛芯孔ㄏ睢 該類別要求申請經費總額不超過 10 萬元")  Exit Sub,End If If sqxmxxWin.projectType.value = "中" AUapplyTotalFe<< 8 Th eni昅sgBox ("你畋ǖ納甌偍暈 “ha伒陀6瞼'高校思想政治工作%帒垘 瑝9>乿hQQ$ 的 I課題?攣 '邟筀二類鯔I2葰'洉IAN2娵丆 僳' G頲逫輔導澇憊歉X?%烠\?%5% & &a(k&教育廉帷es#!!?" `麛 齢b(Val(0) > 0)k VBA.F ormat"fe別5愀) / u ) - 0.4A , f!間接延 不能`超出 尚@40% 請修羹漠! +"ㄑ eC1!) <>Y衑ar1e+b!酢23*J與F年度に愕暮霞浦 #相殿癇鳩74 o洀"饆) x直與e之和側壞扔諍 呥 厽&聞0 6 弇醽其中外瘃嵱Υ[ O O F 瞃爄Q 0 6 4.)Q.4!$4 9 3231惲_note翐"-aV%當 嵋櫸/差旅`國際獻饔虢渙p鞣 矟0620%時👨🏼‍🔧,必須提供詳細的測算浪得鰲 ' SetFoc饀s A9893InStr(1, "版面費")郋mpty0寫的3 中@出現“弊盅拿枋觶蕁陡叩妊U苧科學繁榮計劃o資鴯芾戇旆ā肪嚀逯蔥杏泄厥孿釵蝕穡`钅縬p.列支論文發表S,秋諯C .葉鸍2繣Z&2賽30(RA$$篳4/6p}4$$$乄5?H?H?H5H 面費,請修改") ' fee_note5.Set FocuspEx@it SubHE nd IfIf InStr(侤6, "版") <> Empty ThenbqMsgBox ("你填寫的預算說明中出現“A”字拿枋觶蕁陡叩妊U苧緇崢蒲Х比偌蘋ㄏ鈄式鴯芾戇旆ā肪嚀逯蔥杏泄厥孿釵蝕穡钅縼不得列支論文發表雰:6>7?HW恴7>H8?H悤8>H11H?$ll`ql帎11_$ 翂 @憖1.value = ""聨 0i2q粐j3qj4q粐j5qj6q飮`b)!789107C8'格式籤衙j>VBA.Format≡D @h0.00∴丟? ? G@ 鏎 嘇 "逷!teg!{te!te秫!+?e`C?</!"Year$`C(#_#c&#$ applyTotaplFee5X eAotherSpourc?puCLWithPVisD0ent.Tables(Th>.Count - fIndex唰A.Cell(3, 2).Range.TextPgetControl(M ("+" & 4))374?i?ee11?s5??32?3鳶 q3?3 ??15?3P??167RBG107_ 駤肀8_U210oe& od睙" '3+筠+蛑4" a+鱛?R1_ ,_鸰R2_T0,__齊3_TP,__R~5_Tp,__R6籜, r7 ,r8遶,r1`媐O ',Nl(Me, ("fee_note11")).value .Cell(15, 3).Range.Text = getContro扽ea纑" & 1惇4(2H5(H3H蹺nd With ThisDocument厁ables(6)i寑2孊applyTot`alFee▍ 崅other`Sourc峊'&奟jfgsXm0lStr7蝧e@tListV佺("1,2,3,4,5,6,7,8@,9,10,@|, attIds66"@樍(2D(9_y%肻Un纋oad MЯCSubA㏄rivate  delBtn_Click(Dim i As IntegerE禝f MsgBox("真的要刪除記錄嗎?@!vbYesNo + vbQuestion, "A ...")gX媏n廡儘JU.Count - fInd宔xD+纔For,= 1 To 6oD趇叺@$"" 債 N鄗& >3  `3,. 韋4l(0p/ 6? l(7xl(8br49劭—012\/G=0-25 5 5 5 5/5(牓鈽 蛯 1 5 (1 5(1T/-4戵O4m蕪_QmuV媓 tO玠侽s 縬e孠 p顄>)? 8Po D 'XM﨤 @=oq籿Y無G G鉱.Enad酨Fals衝AE1伆1.SetF爥唖c If qAq canc?q 焧Qq'從控紙到Pub`t Func 趧successR ow悆羥String, tagN衋mes7)# y Qr眕 |鲄f|UtQ1formItem Variantwy Q = S衟lit@(爛,"D{Zys  c兂QObjecX rootEl.e學 = xGet牚' m elet&a.cre`昫(p"bud7= 0col聦Q?z#厭P褝UB0恉(yw3Q厛08) 1廇O蕱(i)袧繕(i ))Gb f = i@刟s3= TrpJ0Then+ k 蹜V0= VBA.LTrim(睉str 峇=I"Pro&AA蔅jCall pmake`@Z(,返,pw(T#.怾end郼hild& "叻9F(.騂N錙H逬逬廢2Z↖颙黱g颙肣<颙#$n095)颙hW颙贕/>wId = SplitStr(successRo竤, ",") Dim control As ObjecthrootEl ement 岮z= 妽sPro翜繟pplyB巚 Call pma@keXML(, 丯attIds訽y,w=菾剱.append纁hild :墠F茿setListValue2@~E# End Function APublic SubG-par市, uf!A繳ser攎, i亸離ing47領2碗F搧Varian▂*a( 垗"墝酅d&"塊# 籮c丄a 瞚uf, 僫eW圔a'YRsH.T`c@.!Bg<N丒郆鉊'計算總經費翭riv鄿咺 caclT otal('fxee9乸AGa詔( S(`1!坉2h3h4h5hJ6h7h8) 90X.00叚 4lkkf 所 賈苯印!比嗬 P!%B!卲or羖!酀"" Or ")&"0"狻61_bl0#j2x3x4m'!W玜56789Else"-%) / %P$* 1000!Q0Left(V, )= ".e !+ 綞' Q#If* 1(/ `,, / 0 Z& W/  煀#/ :/ / f U/ d Z& W/ ( ,/ / / ' / ' Z& W/ o6馳徬,燨6 9) ,,w;N tV  , @PZo h o (zf Wo w 狪o eo o h o h zf 遅o j JSo 8OO"eeo h zf Wo j 闬o o h zf W9i[悴悹;~`$1_Change~Q"tmp m 偋cf (mastIn put(M "applyOFee", "申請經費總額")) The`5aExit 玨 If…J W@ %=,23鰽G,"mDe(, 3A息 Ae other SourcA*其肅叢戳 "1業務t費2/\29勞k `N"篩璞竬 "4 `.`"專 易裳?f w pf" K( e繾"印刷費/宣傳費觺肙C4郖L"`燵"oOE1'k蠻"p直接-3[O 其謤型獠餚;, o#懕s1AGa'97/)(QC+ ( SiN:3焔IT榱"f*\R5*#d$*\Rffff*0d6622c1ef*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#C:\WINDOWS\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#47*\R0*#1e*\R0*#1f*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#C:\WINDOWS\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#26*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#C:\WINDOWS\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#42*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#C:\WINDOWS\SysWOW64\FM20.DLL\2#Microsoft  |"GrECm鵆赫L恎蓻R(燩$貞DWЖiCp俊D乕;kz73巋脈".b\x3巋脈".b\Cm鵆赫L恎蓻R(ME @SPSSS1>"B.$@瀨 r8 @x TV@x @0 h @ X @H H @p 8 @ ( @ @ h 0Forms 2.0 Object Library*#44*\R0*#f*\R8005*#44$*\Rffff*0N6622c1e9*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#C:\WINDOWS\SysWOW64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#46$*\Rffff*0e6622c1ef$*\Rffff*0c6622c1ea2b48<@}DiHcLfP:T?X_\``ddehalxp~tyx|Fzj|@EGDG "   " ( 0 @P " X`px   , 60@P`p  @`h p  p  " , " 0@H P`h " px'  " '  "   "  ( 8 H X h(*x     JJ  *J  $-  H 4JX    0*   4   0 $*8  `  p  : ( 8 (( P ` " h p          " , 0 " 8  @ P " X ` " h  p  " 6 * : $8 (`         "   " :( h x         ( 8 H X h x        & ,8 h       8 X x     "  0 "8 @ P  dHII82IH+ *,;29 HA8$  %?3`p #x@  B  ,,, ,P,  B  4\ 6\P (608$@Ph    0P Xh   $8  @4P  *    &B@\MAo`@', *B@@cro B@Into($4S|k .B@% *!.(封面內容 * !F5(& .childType.caption = childType.value0 .projectSubType.caption = projectSubType.value 0!F50( .!F5.( 2!F52( 4!F54( 6!F(蓋章) 56(qh 項目表內容 *! % .!F7"! (d 8!F7"! (d :!F7"! (d <!F7"! (d >!F7"! (dq] ^.\]Project \%<.8 申請者信息 8 projectType,childType,projectSubType,projectName,subject,schoolCode,applyDate,schoolName,researchDirection,researchType,planFinishDate,lastProductMode,qtContentA> 8!n *!x(F A@ro` B請先選擇 學科門類 <警告...A: 0B@|k 0!F交叉學科/綜合研究 DB@@d', FB@@ko0',-'. JB@@oHp',-'. JB@@o PB@o B B (& T(& T(F !F工程科技人才培養研究專項 (& T(& T(FprojectSubType.List = Split("新科技革命和產業變革背景下工程教育的布局以及工程院校的分類與定位研究,工程科技人才的評價標準、評估體系研究,工程科技人才培養的質量保障體系建設研究,校企深度合作培養工程人才若幹問題研究,中國工程教育國際競爭力問題研究", ",")DprojectSubType.List = Split("面向經濟發展新形勢的新型工程科技人才培養戰略研究,行業特色型高校工程教育改革實踐與政策研究,面向工程技術人才的創新創業教育模式研究,工程應用導向的工程專業學位研究生培養模式改革,面向“一帶一路”的工程人才國際化能力培養體系研究,我國校企合作教育模式的最佳實踐與政策研究,工程教育師資隊伍建設研究", ",")工程教育強國戰略研究,人工智能與未來教育發展戰略研究,新時代中國特色工程教育體系及新工科發展戰略研究,中國特色工程人才國際勝任力及領導力培養戰略研究,$V (h (&一般項目,重點項目,$V (h, (X !F高校思想政治工作專項e (&思想政治工作,輔導員骨幹專項,$V (hx (XkX !F 中國特色社會主義理論體系研究專項 (&-projectSubType.List = Split("一類,二類", ",")x (Xk !F教育廉政理論研究專項 (&x (Xkx4If projectType.value = "科研誠信和學風建設專項" Then! projectSubType.Enabled = True1 projectSubType.List = Split("重大,一般", ",")" projectSubType.ListWidth = 120End Ifo0 ^!F \(& ^!F `(R ^!F \(b \B@d8嚕 \(b \(Fkop \!& \!F %f `(Ro jB@oo0 pB@oxp/ If subject.value = "交叉學科/綜合研究" Then# choosePertinentSubject.Show3 If subject.value = "交叉學科/綜合研究" Then subject.value = """ firstSubjectIndex = -1 Else End If Else 0!t'B End If 8(Fo'No真的要刪除記錄嗎?   刪除...$:  清空填報項 8(F :(F <(F >(F applyTotalFee.value = "" otherFeeSource.value = "" (F (F (F .(F 0(F 2(F 4(F 6(F清空最終成果形式 x(F z(F T(F |(F ~(F ^(F * 5( .childType.caption = " " % .projectSubType.caption = " " 50( 5.( 52( 54((蓋章)56(q 清空項目表格 *! %7"! (d7"! (d7"! (d7"! (d7"! (dq@清空XML填報內容 *!x(F $(& .B@k o X A@ro  AfprojectType.List = SplitStr("中國特色社會主義理論體系研究專項,高校思想政治工作專項,工程科技人才培養研究專項,教育廉政理論研究專項,科研誠信和學風建設專項", ",")projectType.List = SplitStr("中國特色社會主義理論體系研究專項,高校思想政治工作專項,工程科技人才培養研究專項,教育廉政理論研究專項", ",")]projectType.List = SplitStr("中國特色社會主義理論體系研究專項,工程科技人才培養研究專項", ",")/中國特色社會主義理論體系研究專項,高校輔導員研究,$j (h馬克思主義/思想政治教育,哲學,邏輯學,宗教學,語言學,中國文學,外國文學,藝術學,歷史學,考古學,經濟學,管理學,政治學,法學,社會學,民族學與文化學,新聞學與傳播學,圖書館、情報與文獻學,教育學,心理學,體育科學,統計學,港澳臺問題研究,國際問題研究,交叉學科/綜合研究,$j 0(h基礎研究,應用研究,試驗發展,$j :(h *!x!F] ^. *!x!F Bn]subject !r%%!d'  %交叉學科/綜合研究 % 交叉學科/綜合研究 % %交叉學科/綜合研究  0B@kh k`  0(F !r projectType,childType,projectSubType,projectName,schoolCode,applyDate,schoolName,researchDirection,researchType,planFinishDate,lastProductMode,qtContentAp >!FAk 0!t'B .!F $(& .B@oH  x! %G x(Fj  z! %G z(Fj  T! %G T(Fj  |! %G |(Fj  ~! %G ~(Fj \!F ^(FAZAdki'4 bprojectName,projectType,researchType,subject,researchDirection,schoolName,applyDate,planFinishDateQ課題名稱,項目類型,研究類別,學科門類,研究方向及代碼,所在學校,申報日期,計劃完成時間$tz(k . Or projectType.value = "高校思想政治工作專項" !F高校思想政治工作專項 !F工程科技人才培養研究專項 !F科研誠信和學風建設專項 您選擇的申報項目類別是“ !F ”,請選擇相應的項目子類🦩! <警告...A: B@zk !F工程科技人才培養研究專項 您選擇的申報項目類別是“ !F ”,請選擇相應的項目分類! <警告...A: B@z8k0d 4!F <!F %申請日期 應小於 計劃完成日期 <警告...A:zk ^!F \!F %f6最終成果形式選擇“其他”後必須填寫內容到後面的文本框中 <警告...A: \B@z0k(]'4 x!F 4 x! 👨🏻‍🦽、 '4k z!F 4 z! 🤡、 '4k T!F 4 T! 🛀🏽、 '4kp |!F 4 |! 、 '4k8 ~!F 4 ~! 、 '4k ^!F 4 \!F %f 、 '4k 4至少選擇一項 最終成果形式 <警告...A:zpkh 4 4 % % >(F'4i( 劮Attribute VB_Name = "sqxmxxWin" " Bas0{D524D550-FDEA-4407-ADCA-1757A7A8E006}{E2704369-BF1CJA1-815B-3B6B7A378B19} dGlobal!婼pacoFalse 奀reatablPre declaId訲ru BExpose0TemplateDerivCusto坢iz婦 P Sub applyD_Enter() CommandButton8.SetFocus End  #4_Click%codeflagt1.UserfrmChoq$SclC.ShowprojectType,5 If (checkForm() 耂) The唍;Exit5驜9IfJ"亅H"A ThisD@Ement., WidDth@293'封面內容鶅WiI>captionc@塁valA婣 ' .chi黮d  G sub乨.G%EM D翨0B莯g s  + "(蓋章)爚+a]a53'項目表8.Ra nge.T醡s(6Di! .Cell@(1, 2)e紉t;HAb2oresearch谼ir@dD. ".37?4MlanFinish羷s 4o lastProductMa{ *Dim ro otEle!i Axs O"MC!@徥= Get纍S-( .c臉e ("["5'申請者信息c Call ma@keXML(, Me, "$])z,Fn,ia<,鞤f,仦,鎂絥<,%b 縣2,l-,qtCont罀a姇c鑈mlSltr:'$.CU鄋load:總3幆first !A!,Index -1",MsgBox("請先≡ 學科門類", vbOKOnly 警告...5uHWjQ1o]e]pae)` "交叉A/綜合研究"| !CseP鄀rtind hk﨓瞼弌膐 "" en;=Dim  As Obj坋ctSet`= Get1Call.loa郿XML(淓剕咢ptrSu<AXi詎g1s=5:圗leB E"o) QS1ft,)zPAD2.Ad:d2 +嘕 En餯 If卂@T哤 BuTV嶵oControl (F. _, Me1磒roA,c餳ildBD@x乬,schoolCode,app纋yDate吰Dir@on, ,planF inishlastProduc鋞MA qt燼%m#VetChec鄈Box(僥T羒'first!郔ndex7e)bC(btn_kt_delete.Enabled~(D!a塺 鄋F1`ys a @ Priv $ Funct! ss ctedC宎pbyStr iS $TIn(, zz.c)0侾臘True螅 lw  @<閆 xbgr 釈 dzcb 昹l2l:= %g鍼i>瑋qtp鎁qt_Chang$0$\EE褿c乤`Form()痳B`qeaっf郪FHals?(m鄉I鄋put(﹡vDX}Ju$e鎤'zcg+{!菘翁餉稱,項目嘈,羛類眲,門類方向及代碼,所在,申報日期,計瓿墒奔"醀 齖Exit663/%' O r "高 K枷腭喒作專項"F3???:|= "工程科既瞬排嘌>1R0娦閑藕脫Х噻建設pb馮 SubA 傗RMsg慠"您裛≡竦鳥c鶚恰" +0"”,階相應的丄子類🧺! vbOKOnlyc警告...{yZ .鱌!1_ 焂PJ/究(髒k At尺分 V = 睂rDi鄁f("d6(, 7S恅= 揱嘋,a*申請5 應小於 51 } FQA儼*A Trim(霻R攠璟 最終硛曬問獎(“其他”後必須填寫內容到後面的文辣究蛑 ?w)練fl黙gM2>衴#j躎h倩b+(|&L1杧/@鐫ぅ5z梮鸼 ﹛sz鮴 U窗(/*4+ " 1|亰,至少,一項 Y-*6/mv耂S鋨僤 @> A棹`16`@ 棹9MP@` `:0N@@  鹴6@` -A:PN``@ @"M0@   :]36`@ +$'`MP@x! x x5`%lFPN``x! x x5`?W`鼖Cttl=瀨瀨`4xx  /t)x瀨5`3@`x! x ``t/tx6`@#`x! x `Uzx5`@`x! x `:P ]<@黇瀨! 瀨 8)x瀨5`x! x xD,(,tpx瀨`@ 棹0   0   @pP  H L D 88x?$`d$A`h$`l$`p$`t$A `x$ `|$ `$  `$I `,`  $`$ `$I`,`)0/(`#nrU~| y !!i! I!9@  i""Y"" # 7 8770   t ,Ex !!Fur] !!F'dh對不起🔨,請您選擇學校! 錯誤A@:|0k( :$j# %f' :$j# %f'  !2(F  !6(Fk A@ro]Ph] B@ !t'  SchoolCode `%%.'  %    %%!d:  %%!d  B@k  'oAoh ^.` `(b `(d `(f `(h *!N!F `%n *!j \base.dat `%嚴重異常:申請書當前所在文件夾內找不到base.dat文件,無法加載學校🎪、學科代碼表等數據🕶!請先將申請書壓縮包內的base.dat復製到當前文件夾,再重新打開申請書。 l 找不到數據文件,部分數據無法獲得A@:|kkAo@]'     + !"#$%&'()* ,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxz{|}~SchoolCode `%%  SchoolCode `%%%!d B@  '8i0(EAttribute VB_Name = "UserfrmChooseSclCo de" 窧as0{44ED2EF4-17F3-4AE6-A9F5-DD6FD319CBC6}{F8C8C031-C7E9-459A-8FD4-B5281BD57F6C} d@Global橲pacoFalse 奀reatablPredeHclaId釺膔u BExpv0TemplateDeriveCustomiz 婦 Public num1,2 As Integer P/3 xmlc箒 Object Sub btn_u円蜟ancel_C-k() Unload MuEnd> D1#OkDim a, JbA!S缐ngI刦 'flag繰1 ThenCA@Me.lbx_second.value <> "" bcA肭@a=1NJ E聟MsgBox "對不起🤸🏻‍♀️,請您選擇學校!", vbEx唌ation, "錯誤罓LpExit肙TI fa@BVBA.Trim(Spl4it@L(.:")(1)eb 0 sqxmxx`Win.s嗏腡= aG 撂 b E-_嗎7first_ChangeeJ{A6$ma6aown琕AhACle6a繺n .ListIndexASet n =.getElementsByT$agA("().繧tem(nd-A "0 Whi爟NoI .C dNs! Is hie\! Yn Mod< 2@蚛Ad瞕A ( .s A.Text `+ ":"0^)鐶峅n@ 1Adend Su? ~._Dbl亙匓yVal 銍:MSForms.ReturnB oo@6*Call槅霑!省 _InitializJ!== GetD oc.asy|nc 0洳/E@媔俤啷OnPar⒀resolve繣xtern荢 BperveEte豌!C BEAXML(Thisu.b@釪 演鉵)% /ぅL碖怭ath@9"\a :."艣嚴重異常🦄:申請書當前所在文件夾內找0不到E 🧑🏼‍🚒,無法加載、學科氡淼仁藎∏胂冉壓縮@包內的5竊粗頻絨3僦匭麓H蚩3。騏C鈘 calPSa部分圾竦脤W_W/r) 蠥un衴rsitBy(Func馷 **M﨤緾癈ep廐H廍1 V8.fC/NB&N9E/B/A$A5im` n, m 'o wn 'lbx_second.CXlea@3An[firsIndex Set *n=<.@#ElementsByHTag羱("(A").Item(謓80m@HWhi纻No.RC@dN@-s Is hingAIf n Mod 21 T8hen7Ad瞕A! (/.喩s(1).Text + ":"@ 0 74躮)7E9m9櫻" w(,m)_ >el&"乊IfW4Am`-1KWxend+(F AWn?醳&iki&_Dbl胵ByVal #tjMSForms.Retur0nBoo爀錣Ca鋖l衶OkC{(x} _Initi郺lizeey羖鍓= GetDoc .async癄^$焌!Ev@ d 抈OnPar飩resolveEx皌ern萊S p恊rve`Yteス#!B`TXML(ThisRu醾.b 螪.que) mvLCPath`;"j\ .@"MsgBox "現匾斐#荷昵朧櫚鼻八諼募夾內誤也壞紼 薹釉匱👩🏽‍🚀!⒀Э拼氡淼仁藎∏胂冉 壓縮包內的e復製結 c 🐝,再謤匭麓蚩猚。", vbCr?cal, " 源🎉,部 分a獲得@灬-eExit 闊R5)豣('Functio詎 A('鈊篸b6[N廯廯隢!8rg.髕ZftfOLq\_鏮_s(稬v HF2SF'a%酕厑顰e錋a, 鷅S@1n0!卲flag3n'@課題主q) 2 bcpVBA.IsNullp(Me.'N7穜a靼 &ER3?樑%0H $"  8H PX `B  px 08 h p  B   8H` P   8|@Gr禨xMEPSPSSS<<<< H0{111F8530-0669-4A60-ABAA-941FD427E858}{0647AB1B-4DE3-44D5-ABD5-C375219D206C}(0b` `刞 al  @劆 `劉`劋 xP)僃p% d @剸 ``剼ph@%侢p %J jHxHxHx0HxpHxH@p 榱"f Z " 0"8@P Xh&p N (Hj`     "  (0 "8 @ P ` p    (       P h  0 @ "X` p 2 (&0&X&   ] R]@H FA@rtwaoH]t] B@lor B' SubjectA `%%.''  %    %%!d:  %%!d  B@   %%      %%%!d :   %%%!d  B@k(  ''k  'oAox ^.` `(b `(d `(f `(h *!N!F `%n *!j \base.dat `%嚴重異常👨‍🦼:申請書當前所在文件夾內找不到base.dat文件🦘,無法加載學校🎁、學科代碼表等數據💆🏻‍♀️!請先將申請書壓縮包內的base.dat復製到當前文件夾,再重新打開申請書。 l找不到數據源,部分數據無法獲得A@:|XkPkHAo8Function getSubjectA() Dim n As Integer n = 0I While Not xmlcode.getElementsByTagName("SubjectA").Item(n) Is Nothing lbx_first.AddItem (xmlcode.getElementsByTagName("SubjectA").Item(n).Attributes(1).Text + xmlcode.getElementsByTagName("SubjectA").Item(n).Attributes(0).Text) n = n + 1 Wend End Function] , 課題主學科]( !!F %'d@ !!F'k( 請您選擇二級或三級學科代碼! 錯誤A@:|k :$j# %f' :$j# %f' ( ) !8(FkP FA@ro80鵲Attribute VB_Name = "UserfrmSubC@ode" 擝as0{111F8530-0669-4A60-ABAA-941FD427E858}{0647AB1B-4DE3`-44D5JC375219D206C} dGlobal怱pacAoFalse 奀reatablPredeclaId賂ru B繣xpose0Template DerivCu@stomiz婦  Public@ num1,2 As Inte纆er P/3` xmlc箒 O`bject btn_u 蜟a@ncel_C-k() Unload 嬥 En宒 &get AB D"$睒GrxME@00> ` Hi凓 ()凖HP%i`劺 `勂 `勡@劼 `勎 p` ([i兒 H)冄hp%i`勔`勎`勂 `勡`劼 +` H  l)冋hp%i冎@劺 +X` x)冇%i僋0i冓 Pi冘 `匉+`t i僋 + ` ( '' i僋Hi冓 hi冘 +T `  0)冇%i僃 i冓 0 i冘 `勪`勬`勡`匉+ `俐J  D)冇   %i僃`勪t`勬p`勡n`勱h @ ` Wi冾`勡`勷`勻 H ` t 6 `8瀨k i凐  ~p `k ##i凗 `勡J`劆.+8p ` ``勷`勎`劆`勡`剛 ``+p` SS`8 `劺 ` `刲 `剛 ` `劒 `劙 +z8`  ''ii僤` `劆`" +^`寧o  `,t +"` %% )冇%i儐i.`2`勡`4 陘@蕫xH陘.(@陘B @p p ( p 8P @  兌p p ( p 8P @   p p ( p 8P @   p p ( p 8P @   p p ( p 8P @   xXX`^x  $ <:@@d @T @D @4 p@($ @@ @X @p酤 @瀨 @軋 @寧 @ X @(@@xX@~l  h@*6D `h`H%X@f @T (@P @L @D @pB @@@ pp @ 0 (@, @* (@ pX(@6l  H*r@h@`H%(@d @T @D @4 @$ @ @ @酤 @瀨 @h @ d pHp`0xHH8H@`_   @\ @L @<    h @X @H p8 @(  xt xxh 8X @H h8 @(  X+榱"f*\R5*#2e*\R5*#5f$*\Rffff*0c6622c1ea*\R5*#3d*\R0*#14*\R5*#28*\R5*#29*\R1*#91*\R1*#155*\R1*#152*\R1*#10b*\R1*#10a*\R8005*#42* ("  8@HPX`h   ( "  HPX`h&  $B  @HP h x  nB  (B00x  R4@ x   B        0  @ P  ` p                   0  @  P  `  p                        0  @  P  `  p                        0  @  P  `  p                        0  @  P  `  p                      0 @ P ` p             0 @ P ` p             0 @ P ` p   B     (8 HX hx      ( 8 HP X` p     0B 4  (08@BH  6     (8@ HX  >`B  vV .H .Hh 7       B  08@H.P b  < @"`  F @(`(<  B  008 Fh " p0(( @Ph  B       .  08@H 6PB   .* - /   ( 0 @ P ` p * 2  9 $  #0@ )H )`x B h08@ HPX`h<pB     0 X@   F  ! ! j !! $窴 ! x郖 !""  "0"H"\X"" "B" # 0# p@## $! ! ~XL "## ###V$X$p$x$ $$0$ $ $B$ @% P% `%%%&&B & h& x& ~&''' 'B8' ' ' '0(8(@(H(B`( ( ( (P) "郘 X) M p))) ) &) `) (* H* rh* * (*  + x@+ + + + , , , , - - x. . @/ &P/fx///0 &0f0(1811 1T1P2`22 2 3 3 3 4  4 h5 5 6  06 6 7 7 7 7 p8 8  9 09 dH99R9:  ::h:P; X;H<rX<< < <  <t<p==== =~=(8> `> h>p>x>>> >B > >>>>">   ? ? (?8?   P?p? x?? ? $?"?2@8@  $P@"x@2燖谸  餈A A (A8APAhA  pA圓燗 ˋ窤蠥鐰 餉B B (B8BPBhB  pB 圔˙繠 谺養 C C  0C HChCC  >怌 蠧餋D 4D "HD .pD 8燚 &谼 EEE B  E(E8E@EHE PEpExEE圗‥癊窫 繣@蠩FF F (F8F@F@`F燜‵ 癋繤 菷$谾GGG G(G@GHGPGXG`G hGBG圙 怗&燝 菺vN谿PHXH  `HpH zxHB  鳫I I 68I pI xI I 怚業營<繧 JJJ (J 8JHJPJhJ >圝 菾 蠮 郕鐹餔 KF KhK pKK 圞怟楰燢↘ 燤] ]$eplugger_sinoss] ] ]駾(]P] .獲得Table中Cell裏的值 主要為了去掉最後的回車符   % %'i8設置下拉為選擇 不可以直接錄入]p  !  %ComboBox  (ko必填校驗't]0]H]`]x ,$j' ,$j']   $'  $. !F %f 必須填寫 $ <警告...A: B@zxkph'tiX必填校驗' ]P]h]] ,$j' ,$j']   $'  $. !F %f5必須按研究周期填寫年度預算經費🧗🏿‍♂️,沒有預算的年度請填 0 <警告...A:( B@zk' i!為某Element添加指定控件集合的信息]p]]]] ,$j' ^.\   $'  $. $ \%<. !F (d  B@o!為某Element添加指定控件集合的信息]]] ,$j']]   $'  $. $ %%!d'  (Fo在userForm中得到指定的控件對象]  ! !  .zpkh`.iPg控製textBox的數字輸入KeyAscii 為輸入的ascii碼canDecimal為是否可以錄入小數 canNegative為是否可以錄入負數]p 1234567890 % - % . % '  N % %G'Nj  N.G'Nj  N-G'Nj N. !d. %G'Njm"."點號只能出現一次 N-,""-"號必須放在第一位,且只能出現一次 !d- %'NdX (k@k8 N'Xi( N' N1KTF1'2KTF2'3KTF3'4KTF4'5KTF5'6KTF6'7KTF7'8KTF8'9KTF9'0KTF0'aKTa'bKTb'cKTc'dKTd'eKTe'fKTf'gKTg'hKTh'iKTi'jKTj'kKTk'lKTl'mKTm'nKTn'oKTo'pKTp'qKTq'rKTr'sKTs'tKTt'uKTu'vKTv'wKTw'xKTx'yKTy'zKTz'AKTA'BKTB'CKTC'DKTD'EKTE'FKTF'GKTG'HKTH'IKTI'JKTJ'KKTK'LKTL'MKTM'NKTN'OKTO'PKTP'QKTQ'RKTR'SKTS'TKTT'UKTU'VKTV'WKTW'XKTX'YKTY'ZKTZ'nHi@ N' N1KTF1'2KTF2'3KTF3'4KTF4'5KTF5'6KTF6'7KTF7'8KTF8'9KTF9'0KTF0'-KTF -'d 'k ✨。KTF .'dh 'kX nP iH )控製textbox change事件 讓其只可以輸入數字z'防止錄入漢字 用在TextBox的_Change方法上 F'T]P ]h ] ] 1234567890 % - % . % '  !F % !F  % %  $'   % F (Fz k   ' 'T  (Fi 7控製textbox change事件 自動轉換全角到半角不允許漢字輸入 F']8 ]P ]h ] >1234567890abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ % - % . % '  !F % !F  % %$'   % F (Fz0 k(   ' '  (Fi 設置DOC安全鎖定密碼 ] ] ](  *!2(F"讓文檔的狀態變為保護狀態  *!D(F[ ThisDocument.btnCheckProtect.caption = "修改申請書" '讓按鈕的說明由檢查保護變為修改申請書A~5 MsgBox "文檔校驗與加鎖成功!", vbInformation, "保護" Z Text Box 7 *%P(R Z Text Box 22 *%P(R *!( *!(t *!(& *!(&A@6  *%!(I&.BackgroundPatternColor = wdColorWhite  *%!(  *%!(  *!! *%!(  *!! *%!(4文檔校驗與加鎖成功!如確認無誤請交由科研處統一上傳!'  <保護A:A@6i解鎖@ *!2(F"讓文檔的狀態變為非保護狀態@ ThisDocument.btnCheckProtect.caption = "檢查填報內容並保護文檔"A~ T Text Box 7 *%P(R T Text Box 22 *%P(RA@6?false *!! *%%"! (d  *%!(J= wdColorGray10  *%!(  *%!(  *!! *%!(  *!! *%!(A@6? *!(? *!(t *!(& *!(&iX加/解 DOC安全鎖  * 5p r C@kd5p r r C@kkqi/控製填報內容狀態 true:填報狀態 flase:只讀狀態  *A@67(]@ 5!   7(d  7(kA@6 5(& 5(& 5(& 5(&讓自由填的formfields]X 5!  7(&  5(  Text Box 227P(R  *!( *!(td? *!(? *!(tkqxip 檢查填報內容p *!!I申請書格式已被人為破壞🍌💟,本申請書已不能正常上報🧑🏽‍🦰,請使用原申請書重新填寫。 < 嚴重警告...A:'8zk] ] ] ] ] 您的填寫有以下錯誤: % % '提示🌝:申請書有以下未填寫👨🏻‍🍼: % % '''人員信息 *!v!F  '   % , 申請人基本信息 未填寫 % % 'k` *%5 !7"! !d$ %f %$ '   '   % +, 申請者本人近三年來的主要研究成果 未填寫 % % 'kh n = n + 1 End If If VBA.Len(tmp) > 1200 Then私 n = n + 1荒 End If'q成員信息 *!|!F  '   % , 課題組主要成員情況 未填寫 % % 'k *%7"! !d$ %f %$ '   '   % 1, 成員近三年來與本課題有關的主要研究成果 未填寫 % % 'k 'qh課題信息 *!x!F  '   % , 項目基本信息 未填寫 % % ' *!v!Fe]( ]@ ^. *!x!F Bn projectType !r%%!d'kP *%7"! !d$ %f %$ '   '   % L, “一🚚、本課題研究的理論和實際應用價值🤳🏻,目前國內外研究的現狀和趨勢” 未填寫 % % 'k8'q( *%7"! !d$ %f %$ '   '   % @, “二🧑🏼‍🏫😡、本課題的研究目標、研究內容、擬突破的重點和難點” 未填寫 % % 'k 'q *%7"! !d$ %f %$ '   '   % R, “三🦹🏼‍♀️、本課題的研究思路和研究方法、計劃進度、前期研究基礎及資料準備情況” 未填寫 % % 'k'q *%7"! !d$ %f %$ '   '   % D, “四、本課題研究的中期成果、最終成果,研究成果的預計去向” 未填寫 % % 'k n = n + 1 End If'q表5 With ThisDocument.Tables(11)Y tmp = VB5Replace(VBA.Trim(getCellValue(.Cell(2, 1).Range.Text)), VBA.Chr(13), "") If tmp = "" Then i = i + 1k tips = tips + VBA.str(i) + ", 研究成果的預計去向及使用範圍 未填寫" + VBA.Chr(13) + VBA.Chr(13) End If" If VBA.Len(tmp) > 700 Then n = n + 1r mess = mess + VBA.str(n) + ", 研究成果的預計去向及使用範圍 不能大於700字" + VBA.Chr(13) + VBA.Chr(13) End If tmp = "" End With工程科技人才培養研究專項 If ThisDocument.projectType.caption = "工程科技人才培養研究專項" And ThisDocument.childType.caption = "一般項目" And Val(ThisDocument.Tables(6).Cell(5, 2).Range.Text) > 10 Then n = n + 1 mess = mess + VBA.str(n) + ", 你填報的申報類別為 “工程科技人才培養研究專項(一般項目)” 該類別要求申請經費總額不超過 10 萬元" + VBA.Chr(13) + VBA.Chr(13) End If If ThisDocument.projectType.caption = "工程科技人才培養研究專項" And ThisDocument.childType.caption = "重點項目" And Val(ThisDocument.Tables(6).Cell(5, 2).Range.Text) > 20 Then n = n + 1 mess = mess + VBA.str(n) + ", 你填報的申報類別為 “工程科技人才培養研究專項(重點項目)” 該類別要求申請經費總額不超過 20 萬元" + VBA.Chr(13) + VBA.Chr(13) End If 中國特色社會主義理論體系研究專項 *!! 中國特色社會主義理論體系研究專項 *%%"! !d$Z   '   % _, 你填報的申報類別為 “中國特色社會主義理論體系研究專項” 該類別要求申請經費總額不超過 10 萬元 % % 'k 中國特色社會主義理論體系研究專項 *!! 中國特色社會主義理論體系研究專項 *%%"! !d$Z   '   % ^, 你填報的申報類別為 “中國特色社會主義理論體系研究專項” 該類別要求申請經費總額不低於 8 萬元 % % 'k 高校輔導員研究 *!!高校輔導員研究 *%%"! !d$Z   '   % L, 你填報的申報類別為 “高校輔導員研究” 該類別要求申請經費總額不超過 2 萬元 % % 'k 高校思想政治工作專項 If ThisDocument.projectType.caption = "高校思想政治工作專項" And ThisDocument.projectSubType.caption = "思想政治工作" And Val(ThisDocument.Tables(6).Cell(5, 2).Range.Text) > 10 Then n = n + 1 mess = mess + VBA.str(n) + ", 你填報的申報類別為 “高校思想政治工作專項的思想政治工作課題” 該類別要求申請經費總額不超過 10 萬元" + VBA.Chr(13) + VBA.Chr(13) End IfIf ThisDocument.projectType.caption = "高校思想政治工作專項" And ThisDocument.projectSubType.caption = "二類" And Val(ThisDocument.Tables(6).Cell(5, 2).Range.Text) > 2 Then n = n + 1 mess = mess + VBA.str(n) + ", 你填報的申報類別為 “高校思想政治工作專項的二類課題” 該類別要求申請經費總額不超過 2 萬元" + VBA.Chr(13) + VBA.Chr(13)End If If ThisDocument.projectType.caption = "高校思想政治工作專項" And ThisDocument.projectSubType.caption = "輔導員骨幹專項" And Val(ThisDocument.Tables(6).Cell(5, 2).Range.Text) > 2 Then n = n + 1 mess = mess + VBA.str(n) + ", 你填報的申報類別為 “高校思想政治工作專項的輔導員骨幹專項課題” 該類別要求申請經費總額不超過 2 萬元" + VBA.Chr(13) + VBA.Chr(13) End If教育廉政理論研究專項} If ThisDocument.projectType.caption = "教育廉政理論研究專項" And Val(ThisDocument.Tables(6).Cell(5, 2).Range.Text) > 9 Then n = n + 1 mess = mess + VBA.str(n) + ", 你填報的申報類別為 “教育廉政理論研究專項” 該類別要求申請經費總額不超過 9 萬元" + VBA.Chr(13) + VBA.Chr(13) End If 表八 經費概算 *%%"! !d$Z *%%"! !d$Z  '   % , 經費預算 未填寫 % % 'kx *%%"! !d$Z % *!! *%%"! !d$Z *!! *%%"! !d$Z %  '   % ), 項目總經費 與 經費預算的合計值 不相等 % % 'k@ *%%"! !d$Z % *!! *%%"! !d$Z *!! *%%"! !d$Z  *!! *%%"! !d$Z %  '   % 3, 申請經費總額 與 申請經費年度預算的合計值 不相等 % % 'k]X '   % % % 檢查系統為您檢查出以上 X 項錯誤,請修改... '  檢查系統A@:'8zk   % % % 檢查系統為您檢查出以上 X 項未填寫,是否真的沒有內容? '    提示...$: '8z(k k'8i 生成上報數據p ^.\] ] ] EPlugger_Data \%<.8構建Charger塊(人員信息)] ^.l *!v!F lBn構建Project塊(項目信息)] ^. *!x!F BnA@6向Project塊中加入 申請經費總額 applyTotalFee \%<. *%%"! !d$Z (d  !rB@向Project塊中加入 其他來源經費otherFeeSource \%<. *%%"! !d$Z (d  !rB@構建項目成員塊 *!|!F]( ^. *!|!F Bn !r !rB@k(=構建經費概算塊 *!!F]@ ^. *!!F Bn !r !rB@k<構建年度經費預算塊 *!!F]X ^. *!!F Bn !r !rB@k(<加入一般項標示 projectMode \%<.專項項目 (d  !rB@ l!r 8B@ !r 8B@ *!! ( ! (正式使用校對碼version \%<.v2023 (d  8B@7校驗文檔檢查保護,因為只有檢查保護之後,才會更新xml數據 protectFlag \%<.true (d  8B@ 8!n *!! *%%"! (d Selection.Font.Size = 1( Selection.InsertBefore (rootEle.XML)1 ThisDocument.reportData.value = Selection.End Selection.Font.Hidden = TrueA@6'ix9p]]] 'zvbscript.regexp$$." "99&^0?[1][0-9][0-9]{9}$9(q8 KT數字 d %ZX d0 d %Z %J dz8kx8KT電話 d'   d %  %[0-9]  %-z7k7 KTe-mail d@ % z7k7KTmobile d "%*zP7kH7n@7'zi07 得到DOC對象87]駾xMsxml2.DOMDocument.3.0$$., ,F不能檢查保護,導致該問題的原因可能是文件msxml3.dll和申請書不在同一目錄 %  <申請書A@:z@6k86 ,.^i 6s用在TextBox的Exit事件上 來判斷txt中的輸入是否是有效數字 並規範👎🏻,返回的boolean用來控製焦點是否移出(true表示不移除) !F % !F %0  處填寫的數字格式無效 <警告...A:'"5 B@z5k4 !F %Z (F !F %.G0 !F (Fj]8]P  . 20'2 ]h !F.$j'4$4 % .  的金額應小於1 2萬元 <警告...A:'" B@z3k3 4$4 % & 只需要精確到百元(即小數點後保留2位) <警告...A:'" B@z3k3k3k2'"i22 If VBA.Len(tmp) > 1200 Thenr mess = mess + VBA.str(n) + ", 申請者本人近三年來的主要研究成果 不能大於800字" + VBA.Chr(13) + VBA.Chr(13)x mess = mess + VBA.str(n) + ", 成員近三年來與本課題有關的主要研究成果 不能大於800字" + VBA.Chr(13) + VBA.Chr(13)萀 If VBA.Len(tmp) > 900 Then mess = mess + VBA.str(n) + ", “四、本課題研究的中期成果🈹、最終成果🍋‍🟩,研究成果的預計去向” 不能大於800字" + VBA.Chr(13) + VBA.Chr(13)PMAttribute VB_Name = "pub_check" Public edition_status AHs S鄋gConst pas sword奺plugger_s`inossXcodeflag0Inte%hooseYearBound jDim rootEle ment Ob@ject p鑢ot FY" 舊irstSu2Index#@ '獲得Table中Cell裏的值 主要為巳サ糇詈蟮幕爻搗B麊YFunc getValu`e(str/)q 梀BA.Left,苼n) - 2) E厖3 '設置下拉為選擇 不可災苯勇既Nw currencySet(AtForm両Uxser%罳c ol( Eac膆 @ In.|trolsC If-TypeA( )侰omboBox" T8hen .SHtyl翝fmBDropDownL .0M'<點號只能出老忠淮  L'"-"號必須放在第一位,寢(嫆b-塨嘇6F磥Else亾SelSta渞t 袀菼fBEOnly:PressNumb1 '讓文檔淖刺湮嗒保護8psd 1' 餘btnChe@ckProtp .cap眞"修改申請書"q按鈕的說明由檢<查g3Call 0cessControl8(Fa爫4' HMsg@x " Q橛爰鈾曬Γ"皔bInformu悤o x"坺Shapes("駐 7").Visibl檓so喜B22機JpEditeWidth@153e.Heqm21Ena >do S"1.C/6wd_pC {Ts(2) .dp.BackgroundPat攏ColorI,= wdW纇ite 'r拱 wdrO.4x67j3.Ct - 0>_sV~1 釭`l5∪縟啡銜尬笄虢揮煽蒲寫ν騁簧洗77 <訠F lag>f裑btn EditP.Width0.75HeightA CheckEEzn慸 # 1.Q End Function'加/解 DOC安全鎖 Pupblic @B(p As Boo恖eanDDWi= `&倆If p+False Th辝.D7"Type wdAllowOnlyFormFiel宒s.Un舎password:IfE"肒 Not !D1揁J/, 6, _M+6控製填報內容狀態 tT:Aflase`:只讀:se酼cessControl(is蠻sed 螰 K*璕Next*A$I*cha俽`#Title葅5 .燽j/memberjfgs'讓自覢商畹膄鄓fW鈜;n;n繟1/;丆c~<.(n) !* ◢"鵠\,= &`髉狋"T1渪 22").Visi狑  罬cfo*襭b沋昩153!o`1.&c21g)OI_j,1`鏼A,cJCf觳軤J螲c髞n燬()!"鬳#@z ! <> 16|>Call MsgBox("昵朧楦袷揭馴蝗宋蘋擔緭已不能正常上報⛷,褂迷重新填礎 ", vbOKai, "現鼐..."9e @襊HxxitXw12mcY1Str`tipsm tm?"y6U= "您的有以下錯誤👩🏼‍🎨:" + VBA.Chr(13) R 提蕵荊篊#未逴*C?劖i%SY'人員信 息C-!sqrxxXml@.vadlua""l!Qn0 3bs strEP 人蝗盡 # _8 )103x#A=5Replace(!Trim(getCel$lVQ (.(.怰ows/, 爑@Range.1K)), p*)Ps(iab'i %者本私昀吹鬧饕芯砍曬鸒綃$x '0 怢en( ) >20妢Q u?> 馎大於800字 2r !cR 0 '成-楓cy躾k-- 伓課題組狁情況o C .D5sV鍮..(2--蝠a-D/*C-與本!8泄豋.罭!t+ VBA.Chr(13) End Ifx'PIf燣en(tmp) > 1200 ThenJzn = n + 1 .mess4 阺tr(n)*", 稍苯昀從氡究翁庥泄氐鬧饕芯砍曬 荒艽笥800字"<  """With'<0信息|ThisDocument.sqxmxxXmlStr.鄓alue$墑0 項目緛< 未填寫 oEls eQr孭<> "B" QDim f As ObjectC=+ trP纑oTypeA<坕ngGSet`= Get繧Call.loa郿XML(躍垺@垗=cEle耫getsByTagName("pro4/").Item(0).鳷ex8*厙C亗繨葇Tables (7H&C怴B5Replace(仭 Trim(#CeHllV亞(.(2, 1).Ra坣ge)),B育勢,gs膿宭AeP杹[棥耙弧諄業睦礪酆褪導視τ眉壑擔殼肮諭鈉現狀和趨勢”_R鲊-n-9--=-mp眡+-“二-的)目標"諶蕁⒛ 饌黃苺涁祤愫湍訓,藋,hrZ11,,?,焃i/`漐三亱,思路和,方法、計劃進度👩🏻‍🚀、前期基〖白柿獻急蓋榭鯗..bG_[燎D墛e僣夊3""(:.o o-四e!0,釁諏y、最d終🛋,腦ぜ迫ハ驈銸_{UY@堊 QV89+ 憡>;tIR謴 _塛    ORGR'表5 r RE%<"_% jj 2?TT'2瘳'思想政樂餵ぷ鱽搶P>'(QM僐Q筍u瀊 鱜漓ThC祑/尩 Z颶Q$德末課題3娂3)/墛@@'1b哘1垘二類0嬰`!. 婣00賏T的A/齹s邐齜'....絧`樄歉蓙?0?0麃-宍 d00c0?11囔A^ 1'絸逃!_4B41y/t,t> 9_415t$螰.OtMto 飱韸9焈邐:表皠 憦概算| So卭卥= 0夅嵾4?+M+#?+a 預算 未填瘡泩淪w酁Format(// 爼>頜優餁s.Count -睔b3n汸槸濿7)/ ??6犗钅孔蘿q 與r$的合計值 不相等邚8磸.%9_?1矎13*  0p耤"5(4?)巖年萠_ w36Dim m_n As Integ渆rS= P淑0I<>`F 烝譫坌"檢查系統為您伇出以上+CS牢饢項砦螅胄薷..." 乹IMsgBox俕, vbExclfa癈, checkAll犝 FalseExit Func徇'ci  t黫pqbJ6i覶,欠裾嫻拿揮心諶藎n縓 (qYesNo@vbQues! 提適踞)vb{Q5?yTru刀End Function'生成上ㄊ P ublic makeXMLReportData() As BoPolea Set rootElement = GetDoc 1:Dim:rObjectelelisO jft.create("EPlug恎er_")o '構建Char塊(嗽斃畔ⅲ﹥[sqrxx8Xml態 媣Call .loa俤(This u.Str.爒alue奛 ?1OProO項淠Oxm極PU((wd_protp (FaDls.'向*屑尤 申請經費總芏顑4羘A{= 嬐mapplyTot`alFee舖@ .圱exA朧alKSTables(6).Cell(5, 2).Ran蘥e 腣sq<卆D.endch餴ld *CP5其他來源A6 b5otherA4Sourc5455!_酙成員D塊If 奣cyzkbKF@ <> ""e膥AF蚫#KQ鈋観蚎?;!;' 珈?仮Ifc鈕!<概算$jf黦s纼_$$##_#a彂^ #!B"年度"預"feeYear?# 胓#(#'S$跨$$h ?H廩'翣一般項標屖久J繀t("@輛ModQ"專糲盍w"C `P洈s呲OVk6dpn_U" SSPU覇.Q6B=kFCont .餝tarD侘B`~'正式褂瞇6月氅aL倂ers`恛f "v2023痓校槲牡導觳楸🚶🏻‍♂️;ぃ蛭揮之後,才會更新xml1L tuFlaP:蠉蓫 誶"true_ o[蔪4v?s.Count磜1, 1籌jG .@悹Τl鄡 P.F.Siz ep1InsertBefore (%p}'雯# \#27@HiddenT`嶲n癋A- 碿hecI纓em(ki惙牫鍵/0, @I竔ngk祋u@pAQ◇ ' Qn!4oRegEx煝諾EP b !&1= C虜("vbscript.regexp!%`With .繥lobalvQ.IgnCas1G.Patter"^0?[1 ][0-9C{9|}$)qQ ! RA0! '笆奀`(VBA.B狆))A塻"0" + Th岎Exit單!! R2!'電話繩PForB 1 ToL8en(" Not Left(1 Like "" Or-")箹 NP Q檪 3 'e-mail InA: , "@`> 0] 241m鄌bile:$#餑黶tI W 9< +C%G6'玫紻OC對|象氤鏲牾0*O n ErrpRe>s谺 a5-jPJInput 6O33Ms衆2.DOM晄.3.0昚Is !h? MsgBox "不躓d導致該問題的原因可能是 文件mQ3. dll和林書不在同一目錄" &%Chr(13)" ", vbOKOnly, "申請書" Exit FunctionXEnd If,Set GetDoc = lobjPJIn`put Vz '用在TextBox的事件上 磁卸蟭xt中的輸入是否是有效數字 ⒐娣叮禱氐腷oolean用來控製焦點/移出(true表示 P ublic e (n As , caps @String heckMaxLen Intege4r)BB両f` VBA.*.value) > 0 TheNotIsN纔mericCall Ms g(P& " 來μ鈈格式無效", v婢梨...")Q&7剘誘攱 On Error R鋏s' NjK繪.纚FocusK悐墜侴 丩8Val@FTft!, 1) ". "耈 "0" &GGGDim zeroTipApyi剏GFDi1 To co莿G6=j03H觼S i #flagVarian撈A= S餻lit@* A?u塅Jn( (0)AH)虪U暤慕額應小於1)e 萬元?L 9L!6G(f鞧繳Bound瘈2jlm"1b"20!!只需要精確到百元(即小數點後保留2位)_"A `"AW#詋B(岔'False銑XhH LQh[dl`Ul #\0/\H罫%lC l`@X0d`l\h0   0   0   0   0   0   0   0   0   0   0   0 @    V h Odh < ldJ:TNDDh  5Ddh < ld敲.'瀨':4N$$cDh H 6D$瀨點h龝 ,lhD$瀨8 V h+fT 5T.LPh p P @ L @ )PL*JDPh p P lDP@kJ留-LkJPh p P @ L @ )PL/LkJPh p P @ L @ )PL Jd@x+fT 5Tl龘 @Ph 8P,Pl龘 @Ph P,Pl龘 @Ph DP,Pl龘 @Ph \P,P*.DPh P (lDP*2L.M0@Ph P 8L h)PL .d*Ph P 0P9L:0NTTPh D P 0L )PL5T$髾臊j0%P$ (P,P#臊j0%P$ (P,P)?齤0%P$ (P,P)?齤0%P$ (P,P點h龝 d,lhPLT0 p  0 p  0 p  Kd  d4t5d lt點N d '寧'瀨:N:TdD:4$ 6 dD$瀨寧 ltx8,xt$dD$瀨寧0        rU (`0,`=8`  !=008`  !=008!` A ;=08I` Yq ;=04q`=0<`!A=&##(`00 ` !A0##< `a!A=0##49 `a=0(a `y0$ `(`#(`#$VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} UserfrmSubCode Caption = "學科選擇" ClientHeight = 4344 ClientLeft = 48 ClientTop = 432 ClientWidth = 5724 StartUpPosition = 1 '所有者中心 TypeInfoVer = 12 End T(H  @}U R 憦濄K窺恄宋體,<CommandButton1x(nx 歔@"媅SO`$)`,Q`&0$y`8` =0&n Gr嬙xMEchooseYearMonthDay& chooseYearMonth jfgsWin94fun_for_word97  Case 1: Me.Move (.Left + .frame3.Left + .memberBirthday0.Left), (.Top + .frame3.Top + 30 + .memberBirthday0.Top + .memberBirthday0.Height) Case 2: Me.Move (.Left + .frame3.Left + .memberBirthday1.Left), (.Top + .frame3.Top + 30 + .memberBirthday1.Top + .memberBirthday1.Height) Case 3: Me.Move (.Left + .frame3.Left + .memberBirthday2.Left), (.Top + .frame3.Top + 30 + .memberBirthday2.Top + .memberBirthday2.Height) Case 4: Me.Move (.Left + .frame3.Left + .memberBirthday3.Left), (.Top + .frame3.Top + 30 + .memberBirthday3.Top + .memberBirthday3.Height) Case 5: Me.Move (.Left + .frame3.Left + .memberBirthday4.Left), (.Top + .frame3.Top + 30 + .memberBirthday4.Top + .memberBirthday4.Height) Case 6: Me.Move (.Left + .frame3.Left + .memberBirthday5.Left), (.Top + .frame3.Top + 30 + .memberBirthday5.Top + .memberBirthday5.Height) Case 7: Me.Move (.Left + .frame3.Left + .memberBirthday6.Left), (.Top + .frame3.Top + 30 + .memberBirthday6.Top + .memberBirthday6.Height) Case 8: Me.Move (.Left + .frame3.Left + .memberBirthday7.Left), (.Top + .frame3.Top + 30 + .memberBirthday7.Top + .memberBirthday7.Height) Case 9: Me.Move (.Left + .frame3.Left + .memberBirthday8.Left), (.Top + .frame3.Top + 30 + .memberBirthday8.Top + .memberBirthday8.Height) Case 10: Me.Move (sqrxxWin.Left + sqrxxWin.Frame1.Left + sqrxxWin.birthday.Left), (sqrxxWin.Top + sqrxxWin.Frame1.Top + 30 + sqrxxWin.birthday.Top + sqrxxWin.birthday.Height) End SelectqHo@ Af]8 .-$j't]P $t$Z$t$Z  NB@   PB@ , ,  N(FkXoPH"Attribute VB_Name = "chooseYearMonthDay"D as0{119821EA-C8C8-4E34-A9F2-9B7C6FBD414B}{E1B09D23-3871-4ACB-ACFC-897E7500D2C6} dGlobal擲pacAoFalse 奀reatablPredeclaId軹ru B8Expw0TemplateDeriveCus tomiz婦 P! Sub CommandButton1_Click()  Dim r@esultDAHs S蟦gIf s伿.valu亀"" And< s訋 蹓 Th黣n#42@|^!GoTo tu爎nYMD EIf! Call MsgBox("請選衲攴", vbOKOnly, "提示..."D>Exi瀟罤SN9月3歈:日y:亐nextC農ol 伬ObjectAAIJn蓛& "-" &媰1 reDw:ZSel @{codef琹a銷C!~1zycyWin.memberBirthday0&N 213243546576879810爏qrxxANb凪w栥Y凮単Unl`oad M@纀u襜! 2 大宥3 hi竴_Changee羠s!vCl狆c <> 芽+奿墍Integerd"`*!curren蒮盚扺 =奿6G[A1xf Ph12". <]P=@夾.LTrim(VB A.strrVal(圥) + 1))怭"-01 }XE劚 5逿&/' ; ╯! For i1 w !Diff("dd,  檙!AddIte鑝 iwN纁&亄'l'聓 )o+呧悓UserP m_Activ+With Proak.刡 ' ?_fSfhfMe.Move (.Left.fr漰3 ha),楾op30!-mHeigh~tb l 1踒 . %u1渧1.  2  2 亐2 Cw C沁$ay3 ~3 銃 4憤K&4 4 咩 儌 5 黼 5 5 #坵 6 6 6 脥 蒿 7 7 ~7 c擄 8 8 ケp + .memberBirthday8.Height) ' Case 10:LMe.Move (sqrxxWin.Le ftFram4e1,b0),9@To ?30 ZC 2 肊nd SelectWith  ubPrivate Sub UserForm_Initialize(倝 Call currencyS et(Me Dim yearBou8As Varian: LGr2xME(SPSSS0{4635A887-A689-4109-BB48-FE65508CBE35}{F280856A-67C8-463D-B309-1463E9291F83} 4@ 8 : 2 B@ D&&`4  d `凧 `X0%侢` %@@0@@@@@@@@P0` 榱"fZ "  "(0 8H "PX `p "x    "  "8 (8@H2` 2  4(2`    @ &H p  "  "  (0X` (p', 6B@@,orderoX@', 6B@@0o0', 6B@@o <(F >(F @(F !8(Fo8o(@ <!F至少選擇第一項關聯度較高的學科 <警告...A: FB@|k <!F >!F第一項 與 第二項不能相同 <警告...A: FB@|PkH <!F @!F第一項 與 第三項不能相同 <警告...A: FB@|k >!F @!F >!F @!F第二項 與 第三項不能相同 <警告...A: HB@|PkH] <!F、 '4 >!F 4 >!F 🧑🏿‍🎓、 '4k @!F 4 @!F 、 '4k 4 4 % %'4 4 !8(F A@roh A@roH !8!F] !8!F)$j'J$J) <(F J $J %) >(Fk J $J %) @(Fk`kXoPH臉Attribute VB_Name = "choosePertinentSubj@ect" 碆as0{4635A887-A689-4109-BB48-FE65508CBE35}{F280856A-67C8B-fD-B3T1 E9291F83} dGlobaBl楽pacoFalse 奀re atablPr@edeclaI"d酺ru BExpy0TemplateDeriveCustoHmiz婦 Pk!% 兇1_Click() codePflagW1j爔xgxkC .Show E\nd$1,2,2;,33.CommandButton孊sC1.v鑑luy"缐罤 23qxmxxWin.researchDir1@穒on 訳Fr廊H'`@&mitB膖n婬If , 3` ThenCLA5Call MsgBox("至少選擇第一項關聯度較高的學科", vbOKOnly, "警告..."D惲K.SetFocusExi蝨#HIfq. 與 第二項不濫芟嗤?飁b?`?t%A?"|三?, ,ctE*<> "" 続d-%%=EJ"c12鮄22C2Dim 聶A萻 S蝞gb僃+ "、剕褲+% : +" ]k-_ 艼T JVBA.LeftZ(,盍n) - 1-cs)Unload< M犣g耡n榗el顟 筪UserForm_Initial鴌ze5jA U+兯 strs Variant 4= Spli:t"(<[燨) YOs c!(0) 8& " UB ound() x> 1蘕 u$= MiC(1), 2&A2<2qr LGr5xME(SPSSS0{119821EA-C8C8-4E34-A9F2-9B7C6FBD414B}{E1B09D23-3871-4ACB-ACFC-897E7500D2C6} 2p33`凩`刅 MS @ @ jx`勡`刲`刵 p r d`則 `勡h%侢 %pxpxpxpx8pxph 榱"f "0@HPX $h  $  "  (0 08h p x     ( 8H Xh x      "  "  "  @HP&X < L0 &8 ` p " "       0 H     ( @   x  8     "     * 0 @ H ` p x     ]@ N!F P!F R!F'LT0k( N!F 請選擇年份 <提示...A:|hk` P!F 請選擇月份 <提示...A:| k R!F請選擇日 <提示...A:|k]X N!F- P!F- R!F'LT ,KTF L !X(FKTF L !Z(FKTF L !\(FKTF L !^(FKTF L !`(FKTF L !b(FKTF L !d(FKTF L !f(F KTF L !h(F KTF L !(Fn@ A@ro(p A@roo RB@ N!F P!F]0]H]` N!F- P!F-1'l P!F12 N!F %Z % %-01-01'nd N!F- P!F %Z % %-01'nk d l n %  RB@ kxopxAjoX ! Select Case codeflag= SplitStr(chooseY , "-"&i "IntegerC僝J i =-l(((0)) T瞣 1)$亁s1.AddItem i&Nex'2112 MonthC If codeflag > 0 Or< ThenA#value21980cIf e]p .-$j't] $t$Z$t$Z  NB@   PB@o齔Attribute VB_Name = "chooseYearMonth" Bas0{582175D4-5EA6-4720-9C45-09E9EB3671@F5}{AB067-F48B-4E44-A93D-FAECFBDEE97C} d@Global慡pacoFalse 奀reatablPredeHclaId赥膔u BExpv0TemplateDeriveCustomizi婦 P $ Sub CommandButton1_Click () If s.valu乲"" Then Call MsgBox("請選擇年份", vbOKOnly, "提示..."+Exit@%繣nd IfA{月Dim@ nextC罊rol As Ob0jectC%re`sultD丯@SY玭gCH=蔐& "-" & s鉎4 SelP@皜codefla罣C2: '人員-項顆際奔f鋬Q B 3A  -計劃蛝瓿扇掌贘  Pro5.sqxmxxWin.昻FinishY6= 34昵腡appl y5經費-年度酑&Unload M hBub鉡6[.2+[3 hiUserForm_Activ骼Di'6T>A齕>'dcFV=  With/>h  ).Move (.Left + .Fr@2kD壜),TopOd30H鄀ight兩+!m翺封面-鍶O柂 鎂N$0?aA}bObPInitialize%Q獾currencySet(Meげ測囔Bou編浝Varian臒'= Split牊n(圀 -e肌 ia↖nteger' 9c i`遃al(& (0)) 萒o 1)t ShAddItem iN繸S112C砏 袰p0p0XHPjZNP`x d @T @@ @0 @ @ ( @榱"f  (08@HPX4` " "   " "  @ "HPhp " x  " "   "(0 " 8 @` "hp "  | +Gr觖xMEPSPSSS <<<< P0{535CE7B6-C7AC-481C-BBBB-2E816F01E1D5}{A96EF8A4-9530-4D64-8456-3AD8B852D2C3}b|H bPbp b bb b悥B`剸B x u Grn簽茌厫G煋>SD{~O墾)z顗o]KJ{欯鳫磭嬰|93症>I]I礹}{ 妚xMESPSSS<,<0<<<< <$<(<4<8<<<0{582175D4-5EA6-4720-9C45-09E9EB3671F5}{AB671067-F48B-4E44-A93D-FAECFBDEE97C}p 2p``刅 ne`凩\S @`x@! @`% r0`|) d`酤@ ; `則h `勡R%侢 %p0p0凗p%偁J%p0p0p0XHPjZNP`x d @T @@ @0 @ @ (  @ x 鰠  酤   h8(x 00xH榱"fH "  $ @HP $` $ $   0 P`   "  "   "   (   (( (P x  $0 (X   ( H` "h p *K$  $  0 N!F 請選擇年份 <提示...A:\L|8k0 P!F 請選擇月份 <提示...A:x|pkh]@]X N!F- P!F'L ,KTF人員-項目批準時間KTF項目-計劃完成日期 L !(<KTF 項目-申請日期 L !(4KTF 經費-年度nx A@ro`p A@ro@o0 Select Case codeflag! Case 2: '人員-項目批準時間" Case 3: '項目-計劃完成日期" With Project.sqxmxxWin Me.Move (.Left + .Frame2.Left + .planFinishDate.Left), (.Top + .planFinishDate.Top + .Frame2.Top + 30 + .planFinishDate.Height) End With Case 4: '封面-申請日期" With Project.sqxmxxWin~ Me.Move (.Left + .Frame2.Left + .applyDate.Left), (.Top + .Frame2.Top + 30 + .applyDate.Top + .applyDate.Height) End With Case 5: '經費-年度 End Selecto0 Af )僋%   `)僋%  0)僋(% p )僋%  X)僋x% Z ()僋 % h )僋%  xP)僋p%   )僋% ` )僋%  pH)僋h%   )僋 % X    d  8  i凗  4x i凗     %侢   %bx bzb~(bxbbp8 (8X p xh  P`(0  xxH p p8 (8X p xh  P`(0  xxH p  p8 (8X p xh  P`(0  xxH p  p8 (8X p xh  P`(0  xxH p  p8 (8X p xh  P`(0  xxH p  8 8 " "    "(0HP " X ` " "   " "  @ "HPhp " x  " "   "  0$Hp0Pp  0 8H "P Xh "pJx$ $ $ $@ $h $ $ $ $  $0  $X  $    $ $   ( 8 B @ H < X B ` h 4p   * * $  @ $`  $  *  $@ h    ]@ ]@ ]@]@H ]@(]@P]@p ]@x]@ ]@]@]@ ]D$!修改這裏要同時pub_check的checkAll8  $T'o@x  N %Z$X'No  $T'o   N %Z$X'No  $T'Ao  N %Z$X'NoX0  $T'Ao(p  N %Z$X'No  ~$T'~Ao  N %Z$X'No ^ $T'Aoh ^ N %Z$X'No8(  $T'Aoh  N %Z$X'No  |$T'|Ao  N %Z$X'Noxx  x$T'xAoH  N %Z$X'No   $T'Ao`  N %Z$X'No  $T'Ao  N %Z$X'NoXp  z$T'zAo(  N %Z$X'No B@ B@$4G|j *!!  *! % !F7"! (d !F7"! (d !F7"! (d !F7"! (d !F7"! (d !F7"! (d !F7"! (d !F7"! (d !F7"! (d ^!F7"! (d !7"! (dq( *! % !F7"! (d !F7"! (dq A@roX A@ro  *!!  *%%"! !d$ %Z  *!!  *! %7"! !d$ (F7"! !d$ (F7"! !d$ (F7"! !d$ (F7"! !d$ (F7"! !d$ (F7"! !d$ (F7"! !d$ (F7"! !d$ (F7"! !d$ ^(F7"! !d$ (qPkH *! %7"! !d$ (F7"! !d$ (Fq B@o !F %Z !F %Z !F %Z !F %Z !F %Z !F %Z !F %Z !F %Z !F %Z ^!F %Z ( ! %.G0 ! (ji8 '4 applyTotalFee 申請經費總額$tzPkH  申請經費總額$"Gzj  其他來源經費$"Gzj  圖書資料費$"Gzj 咨詢費$"Gzj  數據采集費$"Gzj 勞務費$"Gzj  調研差旅費$"Gzj 印刷費$"Gzj 設備購置和使用費$"Gzj 管理費$"Gzj  小型會議費$"Gzj ^其他$"Gzj'4ih`NAttribute VB_Name = "jfgsWin" Basx0{535CE7B6-C7AC-481C-B-2E816F01E1D5}{A96EF8A4-9530-4D64-8456-3AD8B852D2C3} d@Global塖pacoFalse 奀reatablPredeHclaId襎ru BExpose0TemplateDerivCustomi襷婦 P $ tmpTszl@f As S簄Hg Zx SHjcj Lw D$yc5YsSbgzGXxhyU Qt 0B|C2!r2縶6 y纙F{;坿 勳傮-ZF劧z噯 崿茍嬻崙E崠t?墢3巃G`kIf枹腡h0x@褦!+8噣"MMFunc醃 ca|clRU鮄 臝=) + eF;I8i&6I3i1Isw.i+IX)i&4(訵 Left(, 1"."RS m "0" &[ 骯 鏲w梒&啒b榗` (mastInput(燤e, "Z&"申請經費犠芏"f)L^7 *Q e.e =( Q Tr>u墷{,其浪叢 3 ") '0圖書資料舴24 瞇)咨詢OOD+`數據摻杉 .鵠臀OD0`調研差>茂P2印|刷OODR4`璞腹褐煤鶩使觃_6徉管理__T8`小型會溡榀qtp$SL##S5&]9(6 < <h+j@`2k@ i冊`i冎y 勜@h`勞f`勡``勣^   + ` i冣i冧i冩`勎`劆`勮@円h%@@@@P`PPh`jl @xP@ @L@L @< @:  @8   8 H @4  @2 `@@榱"f$*\Rffff*0e6622c1ef*\R0*#f'B  (0@$X"$x     #  (8@B  H P ` p <( 08 H]]]]'   % '   %   %  %  %KT  +'  ' 酅8S    %  'n  + 'ji@]駾]駾]駾 '   %'  %' b   %     %'    %' ' iXAttribute VB_Name = "fun_for_word97" Public Function SplitStr(strValue As ing, &Divide r*)Variant Dim arrA鄏ray(>@nCountCIgersHo|ld\38%n != 0Re G- )坕=擜.`Left$u, 1For 哴@= 1 Ton問 Sele@ct Cas繟.Asc(VBA.Mid.,(2 嘡 嚩 o纚係9 CY? + 1YPrese8rve# 7El躶eN&+BX豅1End腬Ne顇儯啟 2) G値@﹕ 吪仙VB5Replace(By纑 My児, CToF'妊@憜嵥gA皌mpF =鉸踤捎bL' =n!AV処n@(1, .,燸萈LLe n(cDo W纇ile n # ft(b n -爉 & g#&%@q%+ L c +n6oop9!K? rU~| y868Y9y hp^k^h '$flML@< ?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\^_`abcdefghijklmnopqrstuvwxyz{|}~++++ix  %0"身份證號碼輸入有誤!有非數字出現!'zXkP   % %Z   % %Z  身份證號碼輸入有誤!月份不正確!'zk   % %Z   % %Z  身份證號碼輸入有誤🙇🏿‍♀️!日期不正確!'zHd@   % %Z   % %Z   % %Z    % %Z    % %Z$身份證號碼輸入有誤!月份和日期不匹配'z8   % %Z   % %Z   % %Ze身份證號碼輸入有誤!2月份沒有   % %Z天'z`kXkPiH]8PhA@  % %0身份證號碼輸入有誤🍄!'zk   % %Z   % %Z  身份證號碼輸入有誤!月份不正確!'zHk@   % %Z   % %Z 身份證號碼輸入有誤!  日期不正確!'zd   % %Z   % %Z   % %Z    % %Z    % %Z$身份證號碼輸入有誤!月份和日期不匹配'z   % %Z   % %Z   % %Ze身份證號碼輸入有誤🚶‍➡️!2月份沒有   % %Z天'zkk  %''     % %Z $ '   KT1'KT0'KTX'KT9'KT8'KT7'KT6'KT5'KT4' KT3' KT2'n  %  % %身份證號碼輸入有誤!')尾數校驗碼不正確"zkiB身份證檢驗函數,如果有錯誤,反悔的是錯誤的字符信息🦕,正確🛳,則返回空調用  % $'x  %dkO"GrlxMEP<<<<< <<< % x`l +`i凃+`兀<<-i凍 `匄p`匉8n`匋l`匎h+x` ii+J`橗@8si `剉t0@p8x8p8x冴p8xp8xp8x8xd @T @D (4 x0 @ ( @ @瘙 幗 @玄 H俐 @剝 @狛 @慆 @ | @l @\ @L @< @, P @ @ @忑 @犖 佚 @三 庚 @ @橗 Ph0x`匂t  hX @H @8 (( $ @ @ 0 @酤 @瀨 ` 幗 @玄 @俐 @剝 @狛 滯 @岨 @| @l @\ P X @H @8  @( @   @        Hl  @ 8pp h榱"fB  (8HXhx(8H B  PX*pP((0P8(,zPH B   &(0Pn8(Pn4HPX,(Xz`PK08@!H`he $'xd身份證位數不對'xki]X'J  % $'v vz`kX19  % %Z %-   % %Z %-   % %Z %'J  %e $'v vzxkp  % %Z %-   % %Z %-   % %Z %'Jdzki7Attribute VB_Name = "IDCardNo_check" Dim Wi(1 To 18) As Integer '校驗 Priva怓unctio n Seth) |)7*29310U4558U6472= 19R61031珌L1孡1 M1孧1 N1孨1 OO怑nd  ublic C伩C15(ByVal StrID15伬ing If Not錋.IsNumeric() Thenz+羬身份證號碼輸入有誤!有非數字出 現!" ExLit,/IfV(BA.'(Mid, 9, 2)) < 1 O唕B& > 12)月份不正d確y)11) > 3瞄S日期襤)lse僘qRYJ= 4!T= 6 91`eA燰=]%$=+$A縉 9郝蚦%匹配銷?lOB &`%vdO= 2 aw*0 ' j2沒`有" &wa & "天< @1!p%q揍8 8銍7', AiWi劺, num申A1( "獵!7LeftD8, 昆摃8晻$邠 縝揳 D1攙顰>斱ㄡ3斺攚( )vbCrLjf"颙 颙a辧"6`J.rK鰀= K/K/ 14/Kx剅唏/KA1E/Kob?K W ?K ?K?Ko0;D?K"bA[Ri躦h)bP鏗CPgP鏗牎 '尾數o呈鉞D Oc u檛'S檢驗函綣寫砝鉑反 詰氖茄的字符信息👴🏿,b┈則返回空 '禒饔 u 7!(s0*dt0O獎Lenc2M5V蠶5皅垽 Gz8=鵑q﹫"位數不稁鑿ogetBirthday#皝噄dM黶g7{乼劆硂E Y5V ) D<> """D訪 19禐LTrim>⊕, 郔2)@-金S-壚抄)眤?Tヤ鴈!釩BA.Len(strId) = 18 Then  idMsgXCheckCI0DC18処f H<> "" x Exit F@unctio nd If~getWBirthdayjV扵riDm( ValMidx, 7, 4))) & " -"011, 2+13REls>eW恏単噓eatablPredeclaId豑ru BExpose0Templat@eDerivCustomiz婦 Public num1,2 As Integer P.2 xmlc竵 繭bject btn_userfrm虲an cel_C-k() Unl oad MtEn d "lbx_first_Change Dim n%ABown%secon纃.Clea1AnY.List Index&Se(t nD=;.getElementsByTagA} (".丂A").繧tem(n7"0Whi~NoI.C@dN+s! Is hiLng 'If@9Mod 2*1 T8hen5Ad瞕 (,.Fs(1).Text + ":"@= 0 4kIf+"9n1Wepnd Ft蟭僢_Dbl儍ByVa l C垇uMSForms.Retu`rnBoo纋臫C萢ll蠯OkCKU燪 _Init鄆aliz艻A=錣= GetDoc#.async瘈0鋘a Ev@ d b`OnParresolveEx皌ern僑 p恊rve`Etee銆!B C!hXML(ThisRuaS.b酁D缻.que) MHLCqkPath`:"j\ .@"MsgBox "現匾斐#荷昵朧櫚鼻八諼募夾內誤也壞紼 薹釉匱😚!⒀Э拼氡淼仁藎∏胂冉 壓縮包內的e復製結 c ,再謤匭麓蚩猚。", vbCr?cal, " 源,部 分a獲得堅-eExit b摝 `i係`偍QFunction 麢矅>嚍茊 `3娍蠈謯Aki oAeCeAa, bQFS切勫V眂abcm6167Me.(W5 <> ""5=`m;E襾$3對不起👨🏼‍🏫,請您選擇至P二級0!+E2x衼ma1$,錯\誤x*;*))a?VBA.Trim(燬plitp( 盄:")郹刔b鋞r0)pflag觟! '交叉1<的蟙喙0=科cho孭erti抧0tSu.ss1鉐b & "ǎ"`a┐鰲PK2/%2/& /+3/鮛 t%3/.缼鮯?惂@剸 ``剼%侢 %J( j`(HzycyWin砓setpsdWin&_VBA_PROJECT36Mdir  "  "  "  "  "  0" 8 @P" X `p" x "    "    (0" 8 @ P` hx"    "     " ( 0 @P Xhp" x   "    "   0|TGrxMEPSPSSS<<<< H0{B371F5BB-410E-4B19-8B1B-C245B9B6B738}{8347C489-3E15-4347-9970-2047F63B0F06}(b` `刞   `劆`劋 `8)僃X% d  i凗  `劆 @剸 ``剼%侢 %J( j`(Hp`(HP`(H`(H`(HHP榱"fR " 0"8@H P `&p N (8@ " HPX "` h x      (   B (j0 "  2HP&X& $& & 0&@h p ] (]@H A@r oH]] B@N!F !t' SubjectA `%%.'  %    %%!d:  %%!d  B@k  'oAo` ^.` `(b `(d `(f `(h *!N!F `%n *!j \base.dat `%嚴重異常:申請書當前所在文件夾內找不到base.dat文件,無法加載學校、學科代碼表等數據🚌👷🏼!請先將申請書壓縮包內的base.dat復製到當前文件夾👵🏽,再重新打開申請書🏄。 l找不到數據源👨🏿‍🦱,部分數據無法獲得A@:|0k(k Ao]' SubjectA `%% SubjectA `%%%!d SubjectA `%%%!d  B@  'Hi@]Xp] !!F !!F'd對不起,請您選擇至二級代碼! 錯誤A@:|k :$j# %f' :$j# %f' ,交叉學科的相關學科 ( ) D!<(F ,e ( ) D!>(F ,e ( ) D!@(Fk A@roxp偟Attribute VB_Name = "jxxgxkSubCo de" 怋as0{B371F5BB-410E-4B19-8B1B-C245B9B6B738}{8347C489-3E15-4-9970-2047F63B 0F06} dGlobal廠pa俢oFalse Cr(諷 坢@"媅SOF} choos0!<btn_userfrmSubCodeOk4"<btn_UserfrmSubCodeCancel?  =  Microsoft Forms 2.0 FormEmbedded Object9瞦29 End LMNOPVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} UserfrmChooseSchoolCode Caption = "院校選擇" ClientHeight = 4668 ClientLeft = 48 ClientTop l ZG"Gr1Y}g滊蜝寚5C僙*箅4E礙?6j鄴g5zM倽u爌宧跖Z塯snC╳0{xMESPSSS ` 0 @ ` 7 BH ` > D ` E F` L H`$S JH`(Z L`,a N`0i R`4l TH`8o V`<r X`@u Z`Dx \H`H{ ^`L~ (`P P` T )僡(0%)冇PX%i冾xi凗   `X`刣`勀 H `x@\ d `<@` `刲D ,j ` di凗   `@  i兒 ` i兗 i兙`劺 `劼 `勡`勀`勂 , !`X ! i冹x i兙 i凗 `勡`勀`勵`勷`勂 `勻 `劼 `刓 `8 `劺 ,f "` "??i兙 i兪( i凗 `勡`剉`勀`勂 `勌 `剎`勳`劼 `剉 #``#\i凓 )凖%ii兡`劺 `勂 `勡`劼 `刓 `%侢 %b慄Hb慆Hb (8@bxD@bL@HHH    (P8Hx`HH HHP凗偁%HHH    (P8Hx`HH HH @< (x 8HHH    (P8Hx`HH HHHHH    (P8Hx`HH HH(HHH    (P8Hx`HH HHP$$ ` Gx榱"f s 08@HPX`hp " x @ HX` " hp" " " " (" 08P" X`x" "  B    (8@ " HPX` 8 P p     0@rH  "  ( "( xP  X $( 0P b ( V h  2 , " ( 8 "H  P *` +   * |# X  ` p B x             ( HPX p      (0"  8@HPX`h  6 * (8@ B  HPX`hpx    (8 ` 8p "&nx B    02H 6   J( x   B( p:z:x  *@ (H  pD &@HPX "  `hpx     0  8Hh ]D選 擇\MA]D清 空twa]@]@]@(]@P]@8]@x]@`]@]@ B@ohH B@oH $B@o( (B@o ,B@oH 0B@o 4B@o 8B@o *B@ohH X  (d8  (k o Z  (d  (ko \  $(d  $(kox ^  ((dH  ((k0o(H `  ,(d  ,(ko b  0(d  0(ko d  4(dX  4(k@o8 f  8(d  8(koH h  *(d  *(ko  XAPop  ZAPoH $ \APo H ( ^APo , `APo 0 bAPo 4 dAPoH 8 fAPoX * h APo0 `!  (Fd ',v-'. 0B@@ki]]XmemberName,memberTitle,memberCode,memberBirthday,memberSpecialty,memberUnit,memberDivide7姓名,職稱/職務,身份證號,出生日期,專業,工作單位,分工情況$f'd dfalseG|j *%   7"! (d  7"! (d  7"! (d  7"! (d  7"! (d  7"! (dq d *!|(Fd dXmemberName,memberTitle,memberBirthday,memberSpecialty,memberUnit,memberDivide,memberCode$ *!|(Fk8 A@ro  A@ro!Private Sub btn_kt_delete_Click() Dim formItems As Variantq formItems = SplitStr("memberName,memberTitle,chooseBirthdayBtn,memberSpecialty,memberUnit,memberDivide", ",")Q If MsgBox("真的要刪除記錄嗎🚭?", vbYesNo + vbQuestion, "刪除...") = vbYes Then For rowIndex = 0 To 8* For i = 0 To UBound(formItems)[ Set control = getControl(Me, (formItems(i) + VBA.LTrim(VBA.str(rowIndex))))" control.value = ""P ThisDocument.Tables(4).Cell(3 + rowIndex, 1 + i).Range.text = "" Next Next, ThisDocument.cyzkxxXmlStr.value = ""% btn_kt_delete.Enabled = False memberName0.SetFocus End IfEnd SubH Af$ThisDocument.cyzkxxXmlStr.value = "" *!|!F] ^.l *!|!F lBn lProjectApplyMemberXmemberName,memberTitle,memberBirthday,memberSpecialty,memberUnit,memberDivide,memberCodeAk hB@o 'j !l!F 需填寫 名稱A@:z@k8 !!F需填寫 職稱/職務A@:zk !n!F需填寫 出生日期A@:zk !p!F 需填寫 專業A@:zpkh !r!F需填寫 分工情況A@:z(k  !t!F需填寫 工作單位A@:zk'ji ] ] ] ] ] ,$j''   %   $  % % $. $ %%!d (F  'o ] ] ] ] ] ]0 ,$j' ,$j']H ]` ^.\]x ] members \%<.8'     $ $ $.  !F    *%%"! (dkPH $ % %'ProjectApplyMember \%<.  XmemberName,memberTitle,memberBirthday,memberSpecialty,memberUnit,memberDivide,memberCode A  8B@  '` 8!n'iH  ]H ]` ]x ] ] ] ] ] ,$j' ,$j' 請補充第  % 行中 'x'v   $  % % $. !F x $ 、 'x v 'vk memberCode  % % $!F % getControl(Me, ("memberBirthday" + VBA.LTrim(VBA.str(rowIndex)))).value = getCIDBirthday(getControl(Me, ("memberCode" + VBA.LTrim(VBA.str(rowIndex)))).value)] memberCode  % % $!F$x'v v v身份證位數不對第  % 行中,證件號位數不對,不是15或18位的中國居民身份證號,是否要修改☝🏽?(如該成員無中國居民身份證,可填寫其港澳通行證號、臺灣居民來往大陸通行證號或外國護照號,並在此處選否)   提示...$:  memberCode  % % $B@false'fz k d 第  % 4行中的證件號不是合法🟣、有效的身份證號,請核實並修改! <  提示...$: z memberCode  % % $B@false'fz0k(k kk vsuccess   % % , 'd v  5 row is blankdneed tip x x % %的數據 <警告...A:0false'fzkk  %   % %'fd'fki ]]]]0]H ,$j' ^.\    $  $. $ \%<. !F (d  B@ set orderorders \%<.  (d  B@oh`壇Attribute VB_Name = "zycyWin" Basx0{E1D98026-9DB7-43CD-95DE-080C04FAF6DD}{13B225B6-745A-4BFE-BC66-6F067E5A50DB} dGlobal!塖pacoFalse 奀reatablPre declaId襎ru BExpose0TemplateDerivCusto坢iz婦 P Const cho4Labe@l As S竛俫伋選 擇! lear清 空tmpIDmemberCpode0-@1U2345鍺678GHSub QBirthday0_Enter()  CoBtn0.SetFocus End @ 11艅U'223 3走 AP$4 4 Z5 5 6 6k 7 7 8 8 0_Ch恆nge%YIf-] <> "" Then僝^cap衪ion`朿啌~Eb沉_菭dgIVf坔w^1]1_y鵣w1._蝵J_$姥w22_A2_#湎(楯 d _偗 3_玊3 0 莓3 皉& 郫 vqy 4 4 tn4   騥5 5 tn5 ) m 6 6 t黱6  礬 7 7 癔 tn7 擢 8 8 tn8  藱頖prlickerCalZl廎C",=u, 1悾啞9m`m租 豘a!12e瘵 2_c?!23@c??34繏0^45 Y蹮56TFayBtnClick(chooseBirthd6, memberL@7) End Sub Private z7_` 癈allH7 y8&y88y8<9< 噞Fun ction昸btn As CommandButton, txt TextBox,@ indexI纍teger6If .cap1= clearLabel Thpen (.value = "" Elsecodeflag/6 }Y@Bou纔= (1910) & "-"罖(2012$脃 MonthDay.ShowC鵄咺fCGL M@6_kt_add媕Dim idsCString醽rowI J GheckLis$tVB("甆ame,Titl=CC叾SpecialtyUnitDivide", "彰,職稱/職務,身份證號,鏨掌,專業,工韉ノ,分工情況"vQ,"fa@i"Bs 0ExitC誂YWithisDocument.Ta@bles(4For 咲= 0 0To 8D.Cell(3 + , 1).Ran竒e.A瀳婖2m 3456No#%罸!-n2C2#Th1cyzkxx8Xml T躰se嘨燢:W遀薝dW^臤etUnlo癮d M@吜S伜撕@!ub弅us')肈delete g'!{formItem聗Var纈ant G= Split`._v{.袆z.,#'# AMsg("真的要刪除記錄嗎💆🏼‍♂️? vbYesNo燤vbQues碻...")kB"{d 攙B[ei"zU偛( Set "c@眗olgetC(Me, G(i)VBA.LTrim(!衧tr(ED) 1..z.咼?H0H0iu9t8 !k*:&O58 '.EnaTdPF盬Sxg70. FpWs3'82[2Usebrm_I餬餭ize(刏s弖rrpency`' <> "}K5sqr襃1u郞bjec5 = Get鄁gO .態XML( !)NTo)UP3Pro丵 ApplyM猞1vT<鵾_PO{C{$_P誏鵀壭()1Boop=詷cQ埱%A盌e.'4銩Q23G饏填寫 名楚圃溾俉11 駯a2秾鑔畠 // 祾 6]A欉S$焎b c"Au e*Tru銛g%Pub朽"蓧;0f(source夌D, 喋ity倍>T 螾z盎愇agQ訟両鄝Ga銃l`镴iDV勑秴卼 `I丼p秲亅Each A (In 3.Elbe岷sBy(髭豎1i癇弤爯x緦 乑= `?~9?~A.?~5c>ontrol.value = ele.getElementsByTagName(formItem@s(i)).$(0).Text  N row`Index+ 1\TEnd SubPublic Function setListV(successRQds As String, 6t)iDim iInte鴊er(俓{ t丅搧8V郺rian悂C塩= Spli tr(p, ",")僌" s  =c魜:Objebc圝roo|Set = Ge餿DocJD罀倕.create臐("mem0bers<]= 0CFor iBc To UB餺undJ寗M﹤ 鼲0 芣 >EM= 臗働(MeD, 拭 + 蒦(I$))If饋< 6 ThenC/CThis@Uu淋.Tables(4).Celll(3@?,佬).Range傔@3螪)馣A豂f栬VBA.LTri膍(!strJ(P#!<= D8Pro乤MApplyMB:%:Call pmakeXML(箑 , a+?翈,鉆 TitledBi@rthdaySpecialtUnitDDividCode",`儝h3$X.appendchil翣g&塐gL欋i栫2  1厸瘽`check鐫蠚,p cap潙朾lankNum醧窺爭 殽C亷tipMsgA枚#+懟錹`〇GΞ*楗 wa匜膜8C== "請補充" u単"行中 "&2 揂c撳藍%pJ廕E,""_KRV+ 3饌、 Hv5E/L9嘝U1餖en(-ZtD?/N)肧) > 癮Z'襆臜/眎!IDO ?OO %G5id 7 = CI麯CqG??/$馭<> #qr 04身份證蝷皇歡贓& ` Box("?7Q 1)@27📥,證件鈕,不是15或18位的中國居民號🤳🏼,欠褚薷模浚ㄈ綹貿稍蔽逈🎋,可填寫其港澳通=ず擰⑻灣來往舐綍或外@國護照1⒃詿舜ρ 》瘢﹑ivb YesNoP vb0Ques I提示...") 鶂vb蟽^/0L~*0EFocus鱄{j丄fal se=Exit遃綇r>E/? 鄫A嬽 7 P2 合法👸、@有效的7莯牒聳擋◎OKOnly= vbOKoQ roCbC==P;閑# =蟺朷2t燯 '圓)磗%+ !oH骳H`",X(#T聲礿s酈1 ' $x is砳'q 'need pJ eft(, pk) - #+的數據H(a@警告侤?O n Errp蠷e歴 +荊 ""霰 Exit Function 餎nd IfCL 0 The猚heckListValue R=9ft :,Q- 1)uElse W""& Public Sub pmakeXML(parent As Object, ufUserForm, items Stri ng, rtnd ex ODim xele &G f%I$Varian劋iIntegercontrol'roo鄑Elem ]7= Split/(B2, ","1,Set@3= 繥etDocIA im@uo UB鄌und(FAcE,= getCA/(uf,  (pi) +FP罭= $.create烡:@ .T@) .vA欳1&y.appendc餳ild羒譴'sEordEb5u&" s匲$茒+ 1"玈ub!F !Fe (&koDPrivate Sub tbxpsd_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)6 KeyAscii = VBA.Asc(invertInput(VBA.Chr(KeyAscii)))End Sub  |$'| !F !F (& !F !F !Fe (&koEPrivate Sub tbxpsd2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)6 KeyAscii = VBA.Asc(invertInput(VBA.Chr(KeyAscii)))End Sub0' B@  (  (o5Attribute VB_Name = "setpsdWin" " Bas0{AB65C764-3073-4189-B104-11DD77E522DB}{63F49BE9-3BFD-453B-9795-591C96BC794F} dGlob刟l婼paco False 奀r@eatablPredeclaDId訲ru BE`xpose0TemplateDerivCus tomiz婦 P $ tmpPWD As S簄g 2 Sub btncannel_Click() ' edition_status0" '表景戳巳∠磁ィ瑏檢查保護,所以不要生成XM L文件Un load 唦 " tbx@.v(aluZ"不設置密碼並保存👮‍♂️,D將A1和2的內容都@設為空2CCall6ok5C End~ =Q匟DAE A@Dim n罫Integer If2 J,<>ThenMsgBo0x (",C恢!請重新`輸入"繵G?SetFocusE偄' ThisDment.IVID AVK k . 0OUnprotect pa@sswordS~s(2).PAC edFormA侰籃)繦= 1 To " Fields.Count g(n).En鑕 Nex))D2譆  22齞亣d擊> tnj;eQ嚂 _ seyi巌簪!廢seB}_In罏aliz鰁E4餆0zThI#.IMEMod1鋐mOf鬮U?e2" 0@ .H &x ( : 2 4@ x T B :( ,h .     Ph p "x       " `℉.UserfrmChooseSchoolCode0S6622c1e9+.UserfrmChooseSchoolCodem&xUserfrmSubCode0T6622c1e9GUserfrmSubCode禨pub_check0c6622c1eapub_check窐,choosePertinentSubject0V6622c1e9E,choosePertinentSubject2$chooseYearMonthDay0W6622c1e91$chooseYearMonthDay5chooseYearMonth0X6622c1e9KchooseYearMonthnjfgsWin0Y6622c1e9wjfgsWin觖+fun_for_word970e6622c1effun_for_word97嬙  IDCardNo_check0]6622c1e9IDCardNo_checkl8U"LgGrnxME(SPSSS0{AB65C764-3073-4189-B104-11DD77E522DB}{63F49BE9-3BFD-453B-9795-591C96BC794F}(`剕 ~p `劆  H   d 80%侢`8 %bb|Hhp0Hhp0Hhp0Hhp08Hhp0x0h8榱"f k  " P h@   "" 0@ .H &x ( : 2 4@ x T B :( ,h .     Ph p "x       "    0 @P` p " $  J <h  " $ (8@ LH <  "    0 @]@h]@0J edition_status = "0" '表示按了取消按鈕,取消檢查保護📃,所以不要生成XML文件 Unload setpsdWin (F.不設置密碼並保存😞,將密碼1和密碼2的內容都設為空 (FAo p] !F !F密碼不一致!請重新輸入A@: B@d' ThisDocument.psd.Value = tbxpsd.Value ThisDocument.status.Value = 0! ThisDocument.Unprotect password3 ThisDocument.Sections(2).ProtectedForForms = True, For n = 1 To ThisDocument.FormFields.Count. ThisDocument.FormFields(n).Enabled = False Next nN ThisDocument.Sections(1).Range.Tables(2).Cell(3, 7).Range.text = "protected"< ThisDocument.Protect wdAllowOnlyFormFields, True, password3 ThisDocument.btnCheckProtect.Caption = "文檔解鎖"& ThisDocument.label_txxg.Width = 0.75' ThisDocument.label_txxg1.Width = 0.75 Unload setpsd$ !FAk A@rI edition_status = "1" '1代表按了確定按鈕♟,且兩次輸入密碼一致🪃,生成XML文件ko (F (F (& (& (b (b (& B@o (F (F (& (&嚕 (b嚕 (b (&oxH  $' !F !F (& !F jxxgxkSubCode0^6622c1e97jxxgxkSubCodePZzycyWin0_6622c1e9zycyWin1h`GsetpsdWin0`6622c1e9?setpsdWinnmH0 x`Ph8磼\%g琄,fw愜g8項y劫譂H┟⑸確彨峚祑@麷焣 S~$粒 9C湢f60\附EG懹Y{窺H{艫K峽墘硔掃韛嘍ドdH戫Hb\熗MtJ=墑ⅹаa繭礃e舤f(>TJ毮煙惿IT頹`蜪 f幵寵魚5盝bY澀34擥E 7誱!U k竃G檱i梯J司`衙5E愽(]%=>苑1iOH琈f皶毬廍楎t涗D簎2媓W` bText Word祂` VBA麾`Win16羱`Win32`Win64x`Mac巢`VBA6#`VBA7#` Project-甡stdole揱` Normal嘵` Officeu` MSFormsC` MSACAL氤` Scripting娺` MSComctlLib踡` VBScript_RegExp_55!` ThisDocument<瀈 _Evaluate賎btnCheckProtect1_ClickK赻btnCheckProtect_Click哐`status+`flag淊` (wd_protect`(checkAll晆`MsgBox桼`vbOKOnly醪` setpsdWin譃`Show鮜btnEditProtect_Click汒`psdY臽value銴` (unlockDocR.` unLockWin翇`Document_Close7\`baseDataU筦Shapes<`Visible隊`msoTrue `Save捫` Document_Open翂`msoFalseF.` rootElement滿`(GetDoc4鋊xmlcode糝`async鹔`validateOnParseO`resolveExternals?錪preserveWhiteSpace>篳Path2` v蘟  ,*\G{000204EF-0000-0000-C000-000000000046}#4.2#9#C:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA7.1\VBE7.DLL#Visual Basic For Applications&*\G{00020905-0000-0000-C000-000000000046}#8.7#0#C:\Program Files (x86)\Microsoft Office\root\Office16\MSWORD.OLB#Microsoft Word 16.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\SysWOW64\stdole2.tlb#OLE Automation*\CNormal*\CNormal枇"f4*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.8#0#C:\Program Files (x86)\Common Files\Microsoft Shared\OFFICE16\MSO.DLL#Microsoft Office 16.0 Object Library*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\SysWOW64\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{6BCAFB12-EA45-4BA9-92EB-674CF7ADBA69}#2.0#0#C:\Users\ZHUBAO~1\AppData\Local\Temp\Word8.0\MSForms.exd#Microsoft Forms 2.0 Object Library.E 忇.`孧 *\G{8E27C92E-1264-101C-8A2F-040224009C02}#7.0#0#C:\Office 2007 SP3 3in1\OFFICE12\MSCAL.OCX#Microsoft Calendar Control 11.0*\G{31724118-7B61-4AD0-8C1F-5149CA045528}#7.0#0#C:\Users\ADMINI~1.WIN\AppData\Local\Temp\VBE\MSACAL.exd#Microsoft Calendar Control 2007.'巇/$*\G{420B2830-E718-11CF-893D-00A0C9054228}#1.0#0#C:\Windows\SysWOW64\scrrun.dll#Microsoft Scripting Runtime*\G{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.2#0#C:\WINDOWS\SysWOW64\MSCOMCTL.OCX#Microsoft Windows Common Controls 6.0 (SP6)(*\G{82780592-BBD3-4DAA-8AE0-AEB35D039AA1}#2.2#0#C:\Users\ZHUBAO~1\AppData\Local\Temp\VBE\MSComctlLib.exd#Microsoft Windows Common Controls 6.0 (SP6)僜 鴘M*\G{3F4DACA7-160D-11D2-A8E9-00104B365C9F}#5.5#0#C:\Windows\SysWOW64\vbscript.dll\3#Microsoft VBScript Regular Expressions 5.5 榱"f  GrThisDocument0N6622c1e9+ThisDocument/R`0軨unLockWin0O6622c1e9KunLockWinR$sqrxxWin0f6622c1fbsqrxxWin 06fundsWin0Q6622c1e9fundsWino)H謝sqxmxxWin0d6622c1efsqxmxxWinE bCritical+}`XMLK颼ProtectionTypeτ`wdAllowOnlyFormFields!`Height|媊 sqrxxXmlStrm` sqxmxxXmlStre焋 jfgsxxXmlStr` cyzkxxXmlStrO蒨(setProcessControl~焋 projectTitlez`projectTitle_Click` sqxmxxWin瑣`captionx`chargerTitle_ClickF嘸 chargerTitleho` sqrxxWin( `memberTitle_Click` memberTitle惔` zycyWin\c`jfgsTitle_Click)莁 jfgsTitle:V` fundsWin鐖` jfgsXmlStr焳` PrintTheDoc`btnCheckProtectHeight諓`btnCheckProtectWidth{猔 strWarning'`btnCheckProtectp6`lretE羆ChrK~`vbYesNo漙 vbQuestion室`vbNo%`wdNoProtection`Tables`ShadingA `BackgroundPatternColorIndex~腵wdWhite蕏`Count0v`dlgPrint茙`Dialog焒`Dialogs娛`wdDialogFilePrintL`Erro奰Clear閫` ErrNoPrinter]竊Display` ErrHandle玓`ExecuteY蚡 vbInformation瞡`wdGray25q蘞 FilePrint跧`FilePrintDefault呏`GetPathT蒨 strFullNameAA`i``intLen黐`projectType_Click`tmpPWD倌`unLockBtn_Click摁`pwd擾`SetFocus衿`cancelBtn_ClickC萡 pwd_Change 臽(textBoxNoCNFilter7` tmpPostalCode&` tmpTelOfficeJ`tmpTel兇`tmpEmail A` tmpIDCardNo湢`gNumbers` chooseLabel蚹` clearLabel飺`btn_kt_delete_ClickU鬬vbYesa?`applyer㎞`gender烜`birthday茿`IDCardNo鈶`division鬬dutyeduLevel粵` eduDegree鱜languageN乣address` postalCode垃` telOffice﨩`tel控`emailRange `Cell瘔` btn_kt_delete斸`Enabled酈`chooseBirthdayBtn8_ClickS胉chooseBirthdayBtn8f`(codeflag悊`(chooseYearBoundf躟 chooseYearMonthDayr綻CommandButton1_Click淞` checkForm賎title騸`rootEle敚`cpsEle ` createElement闔`(makeXML_莁CommandButton2_Click豉`IDCardNo_Change,]` IDCardNo_Exit#e`Cancel駱` ReturnBoolean閑`( getCIDBirthday `IDCardNo_KeyPress埒`KeyAscii#` ReturnInteger鍌`postalCode_Change裛 (textBoxFilterJpostalCode_KeyPress玚(OnlyKeyPressNumber+沗Val葩` tel_Change燇` tel_KeyPress8[`telOffice_Change!`telOffice_KeyPress埱`UserForm_Initialize5c` (currencySet5List*揱( SplitStr`甡sqrxxXmll+`loadXML濪`(getValueToControl笀`DocumentElementE宍 (mastInput魓`idMsg9`( CIDCheck靁`(checItem砃`attIds` attIds_yearr僠applyTotalFee_tmp繾otherFeeSource_tmpP`fee1_tmp>E`fee2_tmpK譧fee3_tmpi`fee4_tmp&鸴fee5_tmp魧`fee6_tmp` feeYear1_tmpa瞏 feeYear2_tmp/D` feeYear3_tmp<謄fIndex`hasIndex糮directTotalFee_Click9慲 applyTotalFee6抈directTotalFeec鏯directTotalFee_Changea誤fee5`applyTotalFee_Change擰`otherFeeSource_Change.胉otherFeeSource X`jfgsXml`getListValueToControl6` feeYearXmlStr×` feeYearXml誴` (getCellValue`delBtn秇`fee4`fee1`sourceG禶 entityNameTag#躟tagNamesele剦`control埐`rowIndex6d` formItems耜`getElementsByTagNameY颼 (getControl癭LTrim鬮`str椪`Item讂` saveBtn_ClickX*` projectType|鴃 childType飭`projectSubType夌`feeYear1烸`feeYear2燪`feeYear3`fee6`fee2`fee3` setListValue輅` setListValue2柢` delBtn_Click4` successRowIds魘`index窨` tRowIndex(h` successRowId撓`colIndex嘸pmakeXML矗` appendchild攂`parent`ufd_`UserFormN`items`h` caclTotal鸐`caclProportion 莁fee1_blv瞏fee2_blx`fee3_bl=`fee4_blP` fee1_Change塱` fee2_Change1j` fee3_Change賘` fee4_Change乲` fee5_Change╘` fee6_ChangeP]`feeYear1_Change虡`feeYear2_Change髩`feeYear3_Change泭` (mastInputFee菡`(exitFun錪applyDate_Enter戭`CommandButton8冊`CommandButton4_ClickVy` UserfrmChooseSchoolCode︱`CommandButton5_Click繢` projectName&隸subjectRP` schoolCode<>` applyDatej` schoolName2s`researchDirection~g` researchTypeZ玚planFinishDateX4`lastProductModeg鯼CommandButton3_ClickFA`(firstSubjectIndex摚` choosePertinentSubject#臽 UserfrmSubCode檬`CommandButton7_Click0` chooseYearMonth鏵`CommandButton8_ClickYx`planFinishDate_Entert謄CommandButton7傇`projectType_ChangeU渀zxbg@癭Split)` ListWidth` qt_Change摙` qtContent羆qt轣`Label97o` BackColor迌`qtContent_Change聕`Trim@颼researchDirection_EnterCCommandButton3~訿researchType_Change`schoolName_Enter `CommandButton4訿subject_Change` ListIndex鱍`subject_KeyPress`馺zz1``lw'^`dzcbw$`zl#``CommandButton6_Click鼬` sqxmxxXml饦` strSubjectO閌AddItem ` setCheckBoxB`selectedCaption廘`DateDiff£`num1慮`num2抅`btn_userfrmSubCodeCancel_Click醏btn_userfrmSubCodeOk_Click+`aX` lbx_second亞`abc瑀` vbExclamation吶`lbx_first_Change`ne`md`nownode慍` lbx_first8` ChildNodes5刞 Attributes鬬lbx_first_DblClick/` getuniversityJ` getSubjectB<渀lbx_second_DblClick苐`IsNull` pub_check`(edition_status籤(password鷂`protectFlagEle;` currentForm琡colH`Controls蘇`TypeName`Style舙`fmStyleDropDownListom`captions(`formItemCaptions[媊tmp胭` targetFrm F`txt嗃`continercR` controlName鵣TextBox蔘` canDecimal醏 canNegative `SelStart鏩` (invertInputn`(invertInputNum2嚽`sj` resultStr]=`Right `gKeys`(setpasd扯`pword'`tips(繾 section_index擹`btnEditProtectc`btnCheckProtect1燻`pg` Unprotect?`Protect譮`isUsed `Sections忟`ProtectedForForms巂 FormFields-|`Shaded黗messcC` ( VB5Replace'`Rows` strProTypexf`m_n穈(makeXMLReportDataK`listEle"鬬 cyzkxxXmlE` SelectionZ甡Content鎙`Start`kind錳`tempR猔oRegExpu` CreateObject鴬` IgnoreCase0鵣Patterni衊Test4玚 lobjPJInputRy` checkMaxLenEG` IsNumeric$*`zeroTip溏`chooseSubject1_Click鉦 jxxgxkSubCode`chooseSubject2_Click`chooseSubject3_Click驲`subject1穿`subject2旦`subject3訂` Frame1_Click鯢`submitBtn_Clickz9`chooseSubject1+`chooseSubject2+`strsh5` resultDate7`sYear堖`sMonth嵼`sDayぽ` returnYMD頦` nextControl琙`memberBirthday01a`memberBirthday12a`memberBirthday23a`memberBirthday34a`memberBirthday45a`memberBirthday56a`memberBirthday67a`memberBirthday78a`memberBirthday89a` sMonth_Changeb`currente盽 nextMonth` sYear_Change坌`UserForm_ActivateZs` yearBound叺` jfgsWina頯tmpTszlf狨`tmpZxf燏`tmpSjcjf覺`tmpLwfw痐tmpDyclf溺`tmpYsf)違tmpSbgzf郹tmpGlfH揱tmpXxhyf骱`tmpQt 乣tmpApplyTotalFeef`tmpOtherFeeSource竊applyTotalFee_KeyPress `otherFeeSource_KeyPressfw` dyclf_Change砃`dyclf朓`dyclf_KeyPress` glf_Changepi`glf7擿 glf_KeyPress|猔 lwf_Change郹lwff癭 lwf_KeyPress` qt_KeyPress` sbgzf_Change.8`sbgzf諥`sbgzf_KeyPress沗 sjcjf_Change&羆sjcjf怶`sjcjf_KeyPress躛` tszlf_Changewj`tszlf砏`tszlf_KeyPress姑` xxhyf_Change/`xxhyf`xxhyf_KeyPressm裛 ysf_Change`ysf郹 ysf_KeyPress槷` zxf_Change@+`zxf廂` zxf_KeyPressY朻btn_kt_add_Clicko胉totalU`btn_kt_clear_ClickFK` fun_for_word97`strValueK蚡 strDividerm蟕arrArray{nCounter`sHold ` nSplitCounter$轥Asc!u`MyString`ToFind4 ` ReplaceToT `Lc` IDCardNo_check穈Wi宊`SetWi闋` ( CheckCIDC15#O`StrID15厞` ( CheckCIDC18&O`StrID18垔`StrID17噴`AiWi`num`A18,p`vbCrLf`UCase5 `strIdJ`` getSubjectA;渀tmpIDmemberCode0昁`tmpIDmemberCode1朘`tmpIDmemberCode2桲`tmpIDmemberCode3楰`tmpIDmemberCode4橩`tmpIDmemberCode5欿`tmpIDmemberCode6汯`tmpIDmemberCode7淜`tmpIDmemberCode8滽`memberBirthday0_Enter{7`chooseBirthdayBtn0^`memberBirthday1_Enter媜`chooseBirthdayBtn1_`memberBirthday2_Enter穈chooseBirthdayBtn2``memberBirthday3_Enter,颼chooseBirthdayBtn3a`memberBirthday4_Enter&`chooseBirthdayBtn4b`memberBirthday5_Enter巒`chooseBirthdayBtn5c`memberBirthday6_Enter灕`chooseBirthdayBtn6d`memberBirthday7_Enter/頯chooseBirthdayBtn7e`memberBirthday8_Enter&`memberBirthday0_Change蜫`memberBirthday1_ChangevK`memberBirthday2_ChangeL`memberBirthday3_Change芁`memberBirthday4_ChangenM`memberBirthday5_ChangeN`memberBirthday6_Change綨`memberBirthday7_ChangefO`memberBirthday8_Change岪`chooseBirthdayBtn0_Click臥`chooseBirthdayBtnClick推`chooseBirthdayBtn1_Click `chooseBirthdayBtn2_Click疍`chooseBirthdayBtn3_Click@宍chooseBirthdayBtn4_ClickP腵chooseBirthdayBtn5_Click `chooseBirthdayBtn6_Click睠`chooseBirthdayBtn7_Click聓`btn獄` CommandButtonkids螡`checkListValue類` memberName0I鮜checko穈 memberName毚`memberBirthday棉`memberSpecialtyd豟 memberDivide芵 memberUnit+a`blankNum昤tipMsg琹`vbOK%`tmpPWD2幨`btncannel_Click抍`tbxpsd矛`tbxpsd2P` btnok_Click"`OptionButton1_Click瀋`btnokd沗OptionButton2_Click/玚 tbxpsd_Change鉃`tbxpsd2_Change`IMEMode i` fmIMEModeOffA8` docPassword` docStatusr鬬Documentj觍Click娿` _B_var_Chr\;`Frame1筦Frame2筦Label3,`Label1,`Label2,`Label78&`CommandButton5訿CommandButton6佋`Label86I`Label85H`Label83F`Label82E`Label87J`Label88K`Label89L`Label90h`Label91i`Label92j`Label94l`Label95m`Label96n`Label98p`Label100&` childLable<嘸Enter磐`ChangeG`KeyPressq鯼 Initialize覰` _B_var_LeftQ醏 _B_str_LeftV僠 _B_str_Mid`CommandButton1|訿CommandButton2}訿Label79'`Label80C`Label81D`Label84G`Label99q`Label101'`Label103)`Label104*`Label107-`Label108.`Label109/`Label110K`Label111L`Label112M`Label113N`frame3筦 btn_kt_add}醏 btn_kt_clearβ`Label93k` memberUnit02閌 memberDivide0羆memberSpecialty0?` memberDivide1羆 memberUnit13閌memberSpecialty1?` memberName1J鮜 memberDivide2羆 memberUnit24閌memberSpecialty2?` memberName2K鮜 memberDivide3羆 memberUnit35閌memberSpecialty3?` memberName3L鮜 memberDivide4羆 memberUnit46閌memberSpecialty4?` memberName4M鮜 memberDivide5羆 memberUnit57閌memberSpecialty5?` memberName5N鮜 memberDivide6羆 memberUnit68閌memberSpecialty6 ?` memberName6O鮜 memberDivide7羆 memberUnit79閌memberSpecialty7 ?` memberName7P鮜 memberDivide8羆 memberUnit8:閌memberSpecialty8 ?` memberName8Q鮜Label102(` memberTitle0擁` memberTitle1緣` memberTitle3值` memberTitle2盞` memberTitle7詰` memberTitle4椎` memberTitle5氐` memberTitle6俚` memberTitle8鄣` memberCode8|O` memberCode0tO` memberCode1uO` memberCode2vO` memberCode3wO` memberCode4xO` memberCode5yO` memberCode6zO` memberCode7{O`Label50`Label35`Label37`Label52` cancelBtne黗saveBtn`Label116Q`subject4琺`Label117R`orderNo1(嘸orderNo2)嘸orderNo3*嘸orderNo4+嘸year1w昤year2x昤year3y昤Label118S`Label123s` fee_note13 fee_note24Label131`Label132`Label133`orderNo5,嘸subject5俯`orderNo6-嘸subject6供`Label140`Label142`Label151`Label120p`Label121q`Label119T`Label152`Label155`Label156`Label159`Label160` fee_note68 fee_note46Label161` fee_note57Label162`Label163`Label164`Label165 `Label166 `Label167 ` fee_note35Label134`btn_userfrmSubCodeOkq廯btn_UserfrmSubCodeCancel!蟕DblClick珔`Activate梶` _B_var_Right9賎 _B_var_Mid韕` _B_var_LTrim&` _B_var_UCasea蝋P-7?K1  w  ,+ *E7G+K  "$5( +*&382-08燖@HP4竴0* pHdProjectQ(@= l 榱"f J< rstdole>stdoleP h%^*\G{00020430-C 0046}#2.0#0#C:\Windows\SysWOW64\e2.tlb#OLE Automation`僂Normal僂NCrmaQF  *,\C 鑰mA!Offic刧ODfic俫殏!G{2DF8D04C-5BFA-101B-怋DE5gAAe42坓篻ram Files (x86)\Common \Microsoft Shared\OFFICE16\MSO.DLL#働 16.0 Ob佹 LibrXary'zM凷F@Cs> MSFDs3@俥D452EE1-E08"F1A-8-02608C4D0BB4塭INDO刉S噀FM20L'岯 @r&/;"~1膬倉 脙00}#0聝# 褳50﹢ 嬂A6BCAFB12-EA45-4BA9-92EB-674CF7ADBA696Users\ZHUBAO~1\AppData\Local\Temp\W纎rd8.0d8.exde=@#.E 忇.`孧 A鋬汳SACAL儸AiACAL纇z 28E27C.-1264羑C-8A2F-04022400h9C0@M7Eg2007 SP3 3in12 .OCXHCalendar Control 11<.054750 噭31724118-7B61-4AD0-8C1F-5149CA045528 }#1ADMINI~1.WIN12VBE'1.! @.'巇/$HˇScripting(>S爚rip`歩njg 歵j`24 20B28 欵711CF-893D@"A0C908542! )5歝rrun.dllH1f RuntimFe @ M@哻tl}>昑酔C`ym@t綻淟b G|"G31FDD16-0C5C-11D@2-A9FC6F8754DA1A`2D瓄OMCTnL霦劤繣m槫Fs 釕(SP6)G|G2l燿ibP0側攅2780592-B0BD3-  欰E0-AEB35D039AjM賬僉&/,M~!@僜 `鴘M🎓。N罫VBc>_RegExp_55>$ HVB`禼EP_R術Ex慇R_5 羕&}3FCA@7-160D8E9104B365C9F}#5.5)"vvbs0Y!)\3H)% u唋pBp ress纖\s  bDrGr乀hisDocum@entGpTAp乮sD+cuze5t-2 HR1娸CA,r/R"+R>unP]猭G>uL鑛W4n馌fN2obR*$(zsq(rxxbq澙xE92?$n6 fund猻fn饹sfO9=謝o)sqxmD躚0s@x !if7o! E1q@frmChooseSc`lCodeG.*ef0阭饄h"o2Ab阬poe#>2 i?m& 聼 S瑄b# U* S頱 !2&_W蚠 禨_ pub_chec猭S9p" _恗hpO鴆kT9f oD窐!uAAsePPfun_for_word97Gun_fo rwd972jHr1 #,嬙R! +iIDCardNo_ check烮 DCa沝N沖ch鷈k 55廜"廜l墜O SjxxgxkSu@bCodeG?PjxgkSVodiP2廘Z廘WF( 啛zycyWinGyA抷Wi2`G1ㄑ sethpsdB@@tpps繠E 2& !m!n!rU~~~~~~~~~~~__SRP_0`-__SRP_1sqrxxWin`%緓]`%緓]f2applyer feeYearXmlStrbtnEditProtect sqrxxXmlStr sqxmxxXmlStr jfgsxxXmlStr cyzkxxXmlStrbtnCheckProtect1覌B糊 `膹Yl喯珅缽翉Yl喯珅缽btnCheckProtect1_ClickbtnCheckProtect_ClickbtnEditProtect_ClickDocument_Closezl Document_OpenprojectTitle_ClickchargerTitle_ClickmemberTitle_ClickjfgsTitle_Click PrintTheDoc FilePrintFilePrintDefaultGetPathprojectType_Click5 2<LDh4X`px4<DLX`hpx Text Box 4 F Flwdzcbw eplugger_sinoss getCellValue currencySet葟Yl喯珅缽 mastInput mastInputFeemakeXMLgetValueToControl getControlOnlyKeyPressNumber invertInputinvertInputNum2 textBoxFiltertextBoxNoCNFiltersetpasd unlockDoc wd_protectsetProcessControlcheckAllmakeXMLReportDatachecItemGetDocexitFun  asyncCommandButton4qtvalidateOnParse  resolveExternals $preserveWhiteSpace \base.datLoad+ %N蛻_8^3u鲖fNS_MR@b(W噀鯪9Y匭~b N0Rbase.dat噀鯪 鄀誰燫}廸[!h0f[褃鉔xh圛{penc鲖HQ\3u鲖fN婼)S匭剉base.dat Y6R0RS_MR噀鯪9Y 峇蛻癳Sb_3u鲖fN0 ~b N0Rpenc恘 钀Rpenc鄀誰穬梍XMLVBE7.DLL S @3巋脈".b\!-6S` zz ,Msxml2.DOMDocument.3.0  P N齹纇錱軴 黐魜鍕顣槝剉烻郪颯齹/f噀鯪msxml3.dll孴3u鲖fN N(W TN顅U_   3u鲖fN  ` ` Z FY F) F( F Text Box 221a〥笱預-2炭.eCm鵆赫L恎蓻R(P$貞DWЖiCp俊D乕;kz7 qtContent Q2覌B糊 `researchDirection researchTypeplanFinishDatelastProductMode爺?螰蹺浳`Frame1Frame2Label3Label2Label78Label1CommandButton5Label86CommandButton6Label83Label82B覌B糊 `zxbg btn_kt_deleteLabel85Label87Label88Label89Label90Label91Label92Label94CommandButton3Label95Label96CommandButton7Label98projectSubTypeLabel100 childLable childType葟漑qJ棪 e缷UserForm$$鮵E彄K*   *\CNormalrU. ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 9xk;GD@斵鑻Q!騒 儕a !Y 1a )Yq儉a AA!->!?Y??? @9@i@橜笯酅A--!儉a -) *A*y***!+Y+++ ,A,q,,,!-Q----Aa坅 qY)YyIa!AYIq坅 Y//9/  HFbx45 M)-楌yiQ A  ThisDocument unLockWinsqrxxWinfundsWin sqxmxxWinUserfrmChooseSchoolCodeUserfrmSubCode pub_checkchoosePertinentSubjectchooseYearMonthDaychooseYearMonthjfgsWinfun_for_word97IDCardNo_check jxxgxkSubCodezycyWin setpsdWinProjectF A.E 忇.`孧 psdHC:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA7.1\VBE7.DLLVBA Q ` F@C:\Program Files (x86)\Microsoft Office\root\Office16\MSWORD.OLBWord 9p0FC:\Windows\SysWOW64\stdole2.tlbstdole 9aL續-鶾藉D轗EC:\Program Files (x86)\Common Files\Microsoft Shared\OFFICE16\MSO.DLLOfficeLabel97C:\WINDOWS\SysWOW64\FM20.DLLMSForms  QkE戛K掚gL鱔篿8C:\Users\ZHUBAO~1\AppData\Local\Temp\Word8.0\MSForms.exd Q0( B縵=犐B(C:\Windows\SysWOW64\scrrun.dll Scripting  1 僜 鴘M  C:\WINDOWS\SysWOW64\MSCOMCTL.OCX MSComctlLib  ! x傆華M娻]殹 chargerTitle memberTitle8C:\Users\ZHUBAO~1\AppData\Local\Temp\VBE\MSComctlLib.exd  ! КM? ㄩK6\ "C:\Windows\SysWOW64\vbscript.dll\3VBScript_RegExp_55  Y k F 譬鶨O_鉆zpjpe#罿F喀/琁嗜&L紝袡LdZx{l烣WJO projectTitle@2譱甕yO;NINt簨SO鹼xvzNy,貧!h厪黐XTxvz ,SplitStr VB5Replace 3覌B糊 `eduLevel eduDegree postalCodeF l欿Q`;NIN/`骮?e籰Ye瞼,騎f[,;悜廸[,梉Yef[,韹奻[,-N齎噀f[,Y齎噀f[,z/gf[,哠騍f[,銼f[,蟸Nmf[,tf[,?e籰f[,誰f[,>yOf[,l蟚f[N噀Sf[,癳麜f[N O璬f[,fN啓0臽N噀.sf[,Ye瞼f[,胈tf[,SO瞼褃f[,邁f[,/n硂餝顣槝xvz,齎E栴晿xvz,蒘f[褃/鼅Txvz 鶺@xxvz,擽(uxvz,諎寶裇U\loadXML subjectDocumentElement (getElementsByTagNameItemText 蒘f[褃/鼅TxvzN 0projectType,childType,projectSubType,projectName,schoolCode,applyDate,schoolName,researchDirection,researchType,planFinishDate,lastProductMode,qtContent茝Yl喯珅缽   i (pj).蹺浳` ComboBox Style O H h h w   #=鸂h8+3q繥?,2q999  愰b nzz翇}鐯(朊妢帇擒C43.Vl蠫[肝 g栞1fD緕S歪茭*8佊1,N沘賫{鉿}genderbirthdayIDCardNodivisiondutyemaillanguageaddresstitleCommandButton1CommandButton2Label79Label80Label81Label84Label99Label101Label103Label104Label107Label108Label109Label110Label111Label112Label113="廁M鐻=篸x1 a>A)chooseBirthdayBtn8_ClickCommandButton1_ClickCommandButton2_ClickIDCardNo_Change IDCardNo_Exitq#皞嫉犐tIDCardNo_KeyPresspostalCode_ChangepostalCode_KeyPress tel_Change tel_KeyPresstelOffice_ChangetelOffice_KeyPress $$48<@DH 7u,sY 4ZS隭xvzu,Ux隭xvzu,,g褃u,'YNu,-NNu,vQ諲 ZS隭,Ux隭,f[隭,vQ諲 1234567890 貧!h`骮?e籰錧\ONy `骮?e籰錧\O,厪黐XTr^Ny -N齎yrr>yO;NINt簨SO鹼xvzNy Ye瞼蒦?et簨xvzNy Ye坈,oRYe坈,矉^,㏑Ye,xvzXT,oRxvzXT,㏑txvzXT,xvz瀃`NXT,貧瀃寶^,瀃寶^,㏑t瀃寶^,瀃寶XT,貧錧 z^,錧 z^,㏑t錧 z^,b/gXT,貧淨z^,淨z^,㏑t淨z^,淨Nb/gXT,貧}Q;S^,}Q;S^,㏑t}Q;S^,}Q;Sb/gXT,貧\ugr^,\ugr^,㏑t\ugr^,\ugrb/gXT,貧蟸Nm^,蟸Nm^,㏑t蟸Nm^,蟸NmXT,貧O^,O^,㏑tO^,OXT,貧邁^,邁^,㏑t邁^,邁XT,,oR,憦,㏑t憦,b/g憦,㏑tb/g憦,b/g緥XT,xvz啓XT,oRxvz啓XT,啓XT,㏑t啓XT,tXT,;N鸑;S^,oR;N鸑;S^,;N籰;S^,;S^,;S隭,;N鸑o^,oR;N鸑o^,;No^,o^,o冸X,;N鸑^,oR;N鸑^,;N^,^,隭,;N鸑b^,oR;N鸑b^,;Nb^,b^,b隭= applyer,gender,birthday,IDCardNo,title,division,duty,eduLevel,eduDegree,language,email,address,postalCode,telOffice,telC覌B糊 ` 錧 z褃b篘Mb鵚{QxvzNy' 錧 zYe瞼:_齎beuxvz,篘錧zf齹N*gegYe瞼裇U\beuxvz,癳鰁鉔-N齎yrr傚] zYe瞼SO鹼蔛癳錧褃裇U\beuxvz,-N齎yrr傚] z篘Mb齎E栜鸑汻蔛啒黐汻鵚{Qbeuxvz N,倅橆v,蛻筽y橆v  q~~~~~~~~Y     i  i 9 ( i Q8status i H docStatus docPasswordpsd sqrxxXmlStr sqxmxxXmlStr jfgsxxXmlStr cyzkxxXmlStrbaseDatabtnEditProtect i X projectTitle chargerTitle memberTitle jfgsTitle jfgsXmlStr feeYearXmlStrbtnCheckProtect projectType i hsubject projectNameapplyerstr schoolName schoolCode applyDatebtnCheckProtect1 strFullName ix currentFormufitemscaptionsparentsource targetFrmcontiner controlName itxtKeyAscii canDecimal canNegativevaluepwordpisUsedkindTextcaption checkMaxLen $ $a$ $1% $  $ $& a)( i,selectedCaptionstrValue strDividerMyStringToFind ReplaceTo >( i?(CancelX(H  @}}CG$R 憦濄K窺恄宋體<kaK鷓綃呇眏鯉(6(J鷓綃呇眏鯉(6(I鷓綃呇眏鯉(6(,4<CommandButton15%? ,5<CommandButton2!9? $#Frame109, @btn_kt_delete).!/? (2@Label111?  (軴 X[E@"媅SO(諷 坢E@"媅SO, R d杘n  @"媅SO$)&^rf鱏y樑_kX{5"褳SO<H   G}~@3u鲖篘酧o`R 憦濄K窺恄宋體,`( 4telOffice $Hgenderp2o9i449  n`粑浲``%緓]`%緓]f=o] $4titlerp2E(24Label1(24Label79+(24Label80+(28Label81+`(28Label82(24Label83+ (28Label84 (28Label85 (28Label86+L(28 Label88L(24 Label89+(24 Label90+(28 Label91$4division E( 4postalCodeo21$4 applyer  4dutyp2 $4eduLevel ( 4eduDegree $4languagep2$4address  4telOo2(28birthdayp2$4emailss 1(2<Label92(28Label94y+*(28Label95J>(28Label96e' (28 Label97 9(28!Label99l+*(28"Label100+* (28#Label101I>L(28$Label103+*L(28%Label104+*(28&Label107`$4IDCardNo (28'Label108+*(28(Label109J>(28)Label110I>(2*Label112(28+Label113J>  H, {5"媅SO AH,"{5"媅SO"AH, {5"媅SO(覻  Microsoft Forms 2.0 FormEmbedded Object9瞦 = 14 End VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} unLockWin Caption = "解保護" ClientHeight = 1860 ClientLeft = 48 ClientTop = 432 ClientWidth = 3552 StartUpPosition = 1 '所有者中心 TypeInfoVer = 14 End (H  %@"},R 憦濄K窺i10 n`粑浲`饊)緓]饊)緓]fo CompObj p T5"媅SO('` +R5"媅SO(L 饄5"媅SO( 鶴u錯g5"媅SO( @b(W钀钑5"媅SO(L 5"媅SO( gTf[哠g5"媅SO( gTf[MO5"媅SO( Y韹韹蛓g5"媅SO( 惎0W@W5"媅SO(異 5"媅SO(Kb :g5"媅SO( 鶹歔5u輯5"媅SO H,@ {5"媅SO H, {5"媅SO H,? {5"媅SO H, {5"媅SOAH,; {5"媅SOAH, {5"媅SO H, {5"媅SO H,? {5"媅SO H, {5"媅SO H,嚕 {5"媅SO H,d? {5"媅SO (E-Mail5"媅SO*[SO5"媅SO*.5"媅SO*[SO5"媅SO*[SO5"媅SO*[SO5"媅SO*[SO5"媅SO*[SO5"媅SO*[SO5"媅SO*[SO5"媅SO( 珟齆翄鱏輯5"媅SO H,> {5"媅SO*5"媅SO*5"媅SO*[SO5"媅SOp(`俌3u鲖篘鄀E-Mail0Kb:g鲖kX橯y橆vT鹼篘剉E-Mail0Kb:g 錘縊嶯b霳N╜諷梍蔛鰁剉T鹼095"媅SO*[SO5"媅SO n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦 Microsoft Forms 2.0 FormEmbedded Object9瞦CompObjpCompObjaVBFrame(sqxmxxWin`%緓]'緓]VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} sqrxxWin Caption = "申請人信息填寫" ClientHeight = 5268 ClientLeft = 48 ClientTop = 432 ClientWidth = 9792 StartUpPosition = 1 '所有者中心 TypeInfoVer = 971 End (H  @}A1R 憦濄K窺恄宋體 P,j4lastProductModeX]$o#Frame1"$fo8i111  n`粑浲``%緓]`%緓]f#Frame25q,<CommandButton5!z-,<CommandButton66z-, @btn_kt_delete+z-( 4schoolCodeto(2@Label9601-(2Label98(28 Label100跶,< projectSubType荹, 28 childLable!h跶 ( < childTypee*LY   H,x5"媅SO(軴 X[E@"媅SO(諷 坢ayE@"媅SO, R d10  @"媅SO H,x5"媅SO$)&^rf鱏y樑_kX{5"褳SO-鑜xvz{|+R-N剉 諎寶裇U\ /f)R(u蜰褃f[xvz0瀃E栂~寶-N穬諷剉鍂茓孴xvz菑 z-Nu剉vQ諲鍂茓 _裇癳剉罷0錧zb9e蹚皊 g罷0錧z 蹚L垊v鹼邁'`xvz0(W篘噀>y褃啒遅 購N{|+R乬:N\翂00=5"媅SO( y橆vP[{|to 5"媅SO AH,W)!/{5"媅SO( y橆vR{|5"媅SO AH,{5"媅SOLH  *}0= g葉b済b__(髞\ 愰bNy)R 憦濄K窺恄宋體8 pXzz鈰 tXzlSOp2 uXlw  v\zxbg$w`dzcbw" Xqtcb( <qtContentletE(0LLabel97= <F纮 {0[SOW刓OproductMode5"媅SO<F纮 {0ramN)RproductMode5"媅SO<F纮 E{0刓O簨噀productMode*5oCompObjpi143  n`粑浲``%緓]`%緓]fs"媅SO@F纮 *{0.═鈰JTproductModeo5"媅SODF纮 {0irt5uP[鶴HrirproductMode5"媅SO<F纮 E{0媷evQ諲productMode5"媅SO H,嚕 {7 @"媅SO0)鲖(W噀,gFh-NkX橯g葉b済b__5"褳SO n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦<H   M}0=y橆v鶺,g酧o`R 憦濄K窺恄宋體(28 Label3(2< Label1ay ( 4projectName槗 ( 4researchType(E(28Label2!424researchDirection 028 planFinishDate!W)1,<CommandButton34 ,<CommandButton44(2<Label78? , 24schoolName!h (28Label86L, 24applyDate 1(28Label85(28Label83$4subject E( <projectTypeo (28Label82`(28Label87;{(28Label90; (28Label88W)`(28Label89? E(28Label91;(28Label95(28Label929;L(28Label94;,< CommandButton741,< CommandButton8'1 ( 槝 T饄!5"媅SO (o$CompObjpCompObjaVBFrame+xvz筫T蔛鉔x 5"媅SO H,(!/{5"媅SOAH,0{5"媅SO( xvz{|+Rto5"媅SO H, '{5"媅SO H,  {5"媅SO( 閎7{@"媅SO( 閎{@"媅SO (R孾b鰁魰Q* 5"媅SO H, '{5"媅SO( @b(Wf[!hy槤5"媅SO H, {5"媅SO( 3u鲖錯g5"媅SO( f[褃钑{|5"媅SOAH,{5"媅SO AH,{5"媅SO( y橆v{|+R{|5"媅SO*[SO5"媅SO*[SO5"媅SO*[SO5"媅SO*abe`5"媅SO*5"媅SO*5"媅SO*[SO5"媅SO*5"媅SO( 閎{@"媅SO( 閎{@"媅SO n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦 Microsoft Forms 2.0 FormEmbedded Object9瞦VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} sqxmxxWin Caption = "申請項目信息填寫" ClientHeight = 7230 ClientLeft = 45 ClientTop = 435 ClientWidth = 9450 StartUpPosition = 1 '所y橆vNf[褃剉sQT貧NO漁!k 愰b鴙sQxvz筫T孨f[褃 S靊t錧{|f[褃 X)5"媅SO$)&^rf鱏y樑_kX{5"褳SO(n zz7@"媅SOGM( <submitBtnx( <cancelBtneca$(2Label1t2(!2@Label96,%<CommandButton11 ]f2o4xi03 n`粑浲`喱0緓]喱0緓]f9UserfrmSubCode'緓]饊)緓]f=oxi03 n`粑浲`'緓]'緓]o'xi02 n`粑浲`;.緓];.緓]f#o!p Microsoft Forms 2.0 FormEmbedded Object9瞦nVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} choosePertinentSubject Caption = "請選擇相關學科" ClientHeight = 4344 ClientLeft = 48 ClientTop = 432 ClientWidth = 6468 StartUpPosition = 1 '所有者中心 TypeInfoVer = 34 End (H  ,@F}+%R 憦濄K窺  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdeghijklm|stuwvyx{z|~}fo@CompObjpCompObjachoosePertinentSubject.術5緓]胸7緓]fGqo]i02 n`粑浲`術5緓]術5緓]CompObjpCompObj+aVBFrame-0unLockWin.喱0緓]術5緓]有者中心 TypeInfoVer = 432 End (H  @ }{'R 憦濄K窺恄宋體<kaK鷓綃呇眏鯉(6(J鷓綃呇眏鯉(6(I鷓綃呇眏鯉(6($#Frame1a n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦`I!5"媅SOHH  !}$A 愰b孨b Nf[褃鉔xR 憦濄K窺恄宋體0( @lbx_secondx (nx 歔@"媅SO(諷 坢@"媅SO0<btn_userfrmSubCodeOk'u4<btn_UserfrmSubCodeCancellu  Microsoft Forms 2.0 FormEmbedded Object9瞦VBFramej5jfgsWin胸7緓]罁<緓]fo=oo7lCompObj5pCompObj@aVBFrameB btn_kt_clear!!$&#Frame210(,2@Label964q!  Microsoft Forms 2.0 FormEmbedded Object9瞦:;<?VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} jfgsWin Caption = "經費概算填寫" ClientHeight = 5472 ClientLeft = 48 ClientTop = 444 ClientWidth = 6384 StartUpPosition = 1 '所有者中(諷 坢@"媅SO n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦-.0AH,{5"媅SO(t^SO5"媅SOAH,E{5"媅SO(g詢{5"媅SOcdefgZijklmnop8H  }v 愰bt^gR CompObjaVBFrame$jxxgxkSubCode罁<緓]餥D緓]f憦濄K窺恄宋體O$4sMonth; (20Label1 $4sYear^(20Label2 ;  ,<CommandButton21 $ #Frame1  Microsoft Forms 2.0 FormEmbedded Object9瞦i38 n`粑浲`蠭:緓]蠭:緓]fkoCompObjpbedded ObjectForms.Frame.19瞦`m5"媅SO`V n5"媅SO8H  $%}5%b!hN葔R 憦濄K窺恄宋體\( #@lbx_second ( $0lbx_firstd# (nx 歔@"媅SOfT3oK0CompObjIpCompObjhaedded Object9瞦VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} jxxgxkSubCode Caption = "相關學科選擇" ClientHeight = 4524 ClientLeft = 48 ClientTop = 432 ClientWidth = 5784 StartUpPosition = 1 '所有者中心 TypeInfoVer = 13 End (H  @ }k"U R 憦濄K窺恄宋體,<CommandButton2VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} chooseYearMonth Caption = "請選擇年月" ClientHeight = 1944 ClientLeft = 48 ClientTop = 432 ClientWidth = 3720 StartUpPosition = 1 '所有者中心 TypeInfoVer = 29 End LMNOP(H  $@}(% R 憦濄K窺恄宋體$#Frame1a n`粑浲`Microsoft Forms 2.0 FrameEm = 432 ClientWidth = 5820 StartUpPosition = 1 '所有者中心 TypeInfoVer = 14 End (H  @} R 憦濄K窺恄宋體O( <unLockBtn (銐 @"媅SO n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦H,* {5"媅SO( TYi01 n`粑浲`胸7緓]胸7緓]fosCompObjqp銐暺[x5"媅SO8H  }噀ch銐R 憦濄K窺恄宋體TO 4pwdO >(28Label1 (諷 坢暿@"媅SO $#Frame1( <cancelBtn]  #Frame102  Microsoft Forms 2.0 FormEmbedded Object9瞦VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} chooseYearMonthDay Caption = "請選擇年月日" ClientHeight = 1944 ClientLeft = 48 ClientTop = 432 ClientWidth = 4992 StartUpPosition = 1 '所有者中心 TypeInfoVer = 10 End 恄宋體 $#Frame1E n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦 H, '{5"媅SO( 閎{@"媅SO( 閎{@"媅SO H, '{5"媅SO( 閎{@"媅SO H, '{5      !"#%/'()*+,-.012;456789:$<=>?@ABCDEFGHIJKLMNOPQRSUVWXqv[\]^_habcdefgZijklmnoprstuwxyz}o~"媅SO*abe5"媅SO(,{N"@"媅SO(,{孨g"@"媅SO(,{ N"@"媅SO<H  $ }X) 愰b鴙sQf[褃R 憦濄K窺恄宋體 {$4subject1q,<chooseSubject1A? ,<chooseSubject2x? $4subject2q,<chooseSubject3x? $4subject3q ( 28Label90g&{("28Label97{{(#28Label983{($28 Label99晎  (nx 歔葔@"媅SO(諷 坢0g@"媅SO-z鑜a╜3u剉/f 蒘f[褃/鼅Txvz 剉y橆v 鲖9hncVBFrame'0fundsWin#啊H緓]燶M緓]f,o"(i   ) "$%&(*,./013>=68:;<?ACDEFHdJLMNOPQRSUVWXYZ[\^_`abcefgiklmnprtuvwxyz{|}~foxi04 n`粑浲`餥D緓]餥D緓]fs恄宋體$#Frame1  n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦./0 H,D{5"媅SO H,D{5"媅SO H,D{5"媅SO H,D{5"媅SO H,D{5"媅SO H,D{5"媅SO o xi02  n`粑浲`罁<緓]罁<緓]fo  H,D{5"媅SO H,D{5"媅SO H,D{5"媅SO H,D{5"媅SO( fND崣e9D5"媅SO( penc菓茤9D5"媅SO( x頬舉9D5"媅SO$(緥Y-峮孴O(u9 5"媅SO( \媁O畫9E5"媅SO(═鈰95"媅SO(砇95"媅SO(pS7R95"媅SO(t95"媅SO(vQ諲0g"5"媅SO( T9(uec5"媅SO!: 5"媅SOHH  %<}(S蟸9崅i梴 (USMONCQ)R 憦濄K窺恄宋體 4zxfO$4tszlfb;  4lwfO$4sjcjf;  4ysf嬆E$4dyclf99; E  4glfl $ 4sbgzf0g;  4 qtf嬆$ 4xxhyf1; (28 Label104(28 Label105`(28 Label106(2@ Label107 (28Label108L(24Label109(24Label110`(24Label111( 24Label112 (!24Label113L("28Label114](%2,total105 (軴 X[11D@"媅SOq}緥Y9525"媅SO$@H, q}魐9(uT5"媅SO ,蟸9峵^q{u"媅SO@H,}2~95"媅SO@H,}3[SO5"媅SO@H,}4S 5"媅SO@H,}1Y5"媅SO@H,q}20235"媅SO@H,q}20245"媅SO@(諷 坢t2 @"媅SO$) n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦./0 H, D{5"媅SO (3u鲖蟸9;`潣1 5"媅SO H, E{5"媅SO*abe5"媅SO (vQ諲eg恘蟸9 5"媅SOHH  +}(y橆v;`蟸9USMONCQ R 憦濄K窺恄宋體,'4otherFeeSource((2<Label802, *4applyTotalFee (+28Label938()2<Label818 &^rf鱏y樑_kX{5"褳SO( #<btn_kt_addy'!( $<H,q}20255"媅SO ,抍廭鱏60{u"媅SO@H,}5[SO5"媅SO @H,q}魰9(u5"媅SO@H,}65"媅SO$@H, q}vQ-NY鑒褢潣5"媅SO (3u鲖蟸9;`潣y8 5"媅SO H, : {5"媅SO H, ; {5"媅SO (CompObjpCompObj aVBFrame*chooseYearMonthDay&餥D緓]0F緓]zycyWin8!0F緓]啊H緓]fo!xi02 n`粑浲`0F緓]0F緓]<subject3砮: (2@ subject4砮(2< Label117砮(28 orderNo1%mE(28 orderNo2$m (28 orderNo3$m: (28orderNo4$m(28year1$m(28year2No1晅(28year3tn|(2<Label118$m(28orderNo5$m1(心 TypeInfoVer = 70 End (H  (@ }'R 憦濄K窺恄宋體j$#Frame164 n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦`f 5"媅SO`g5"媅SOdH  "4 }b$A鲖HQ(W鎉Fh匭 愰bNf[褃 峇(W骃Fh-N 愰b孨f[褃鉔xR 憦濄K窺恄宋體\( "@lbx_firstour( !@lbx_second (nx 歔64@"媅SO(諷 坢@"媅SO0#<btn_userfrmSubCodeOk'I4$<btn_UserfrmSubCodeCancellI  Microsoft Forms 2.0 FormEmbo,CompObjpCompObjaVBFrame/i556 & n`粑浲`啊H緓]啊H緓]fSCo%'0CompObj.p2<subject5砮2(28orderNo6$m(2@subject6砮(2<Label80^{>, 4applyTotalFee80g ,4otherFeeSourcef7(2<Label140z-a(28Label94>(20Label142>(20Label151a$%#Frame242 & (諷 坢83@"媅SO(nx 歔@"媅SOK窺 n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦AH,{5"媅SO(t^SO5"媅SOAH,E{5"媅SO(gSO{5"媅SO(錯SO{5"媅SOAH,{5"媅SO<H   }l 愰bt^g錯R 憦濄K窺恄宋體$4sMonth; (20Label105 $4sYearb(20Label2(20Label3 4sDay v ,<CommandButton11 $f3oCompObjpCompObj %a#CompObj-aVBFrame(setpsdWin70燶M緓]犕O緓]f(H  r@}礬"R 憦濄K窺恄宋體O$#frame3a n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦H  rV}fZ槝膥;N亯bXT鶺,g酧o`( NS+T3u鲖篘酧o`,鵞bXTL饄0t^劅I{ gP6R gbXT颯 NkX)R 憦濄K窺恄宋體Op(28Label93Q( 4membeh覻 TD{u"媅SO H,<{5"媅SO H, {5"媅SO H, {5"媅SO H,D{5"媅SO H, {5"媅SO H,<{5"媅SO H, {5"媅SO H,D{5"媅SO H, {5"媅SO H,<{5"媅SO H, {5"媅SO H,D{5"媅SO H, {5"媅SO H,<{5"媅SO H, {5"媅SO H,D{5"媅SO H, {5"媅SO H,<{5"媅SO H, {5"媅SO H,D{5"媅SO H, {5"媅SO H,<{5"媅SO H, {5"媅SO H,D{5"媅SO H, {5"媅SO H,<{5"媅SO H, {5"媅SO H,D{5"媅SO H, {5"媅SO H,<{5"媅SO H, {5"媅SO H,D{5"媅SO H, {5"媅SO H,<{5"媅SO H, {5"媅SO H,D{5"媅SO h L饄/L T {u"媅SOhN N {u"媅SO$h錧 \O US MO1{u"媅SOhR錧臽礠 {u"媅SO H,  {5"媅SO H,  {5"媅SO H,  {5"媅SO H,  {5"媅SO H,  {5"媅SO H,  {5"媅SO H,  {5"媅SO H,  {5"媅SO H,  {5"媅SO l翄鯪鱏{u"媅SO H,{5"媅SO H,{5"媅SO H,{5"媅SO H,{5"媅SO H,{5"媅SO H,{5"媅SO H,{5"媅SO H,{5"媅SO H,{5"媅SOh鶴u錯g{u"媅SO H,  {5"媅SO( 閎 T{@"媅SO( 閎 T{@"媅SO H,  {5"媅SO( 閎05{@"媅SO H,  {5"媅SO( 閎{@"媅SO H,  {5"媅SO( 閎07{@"媅SO H,  {5"媅SO( 閎{@"媅SO( 閎64{@"媅SO H,  {5"媅SO H,  {5"媅SO( 閎N{@"媅SO H,  {5"媅SO( 閎N{@"媅SO H,  {5"媅SO Microsoft Forms 2.0 FormEmbedded Object9瞦犽J緓]犽J緓]VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} fundsWin Caption = "經費預算填寫" ClientHeight = 7140 ClientLeft = 45 ClientTop = 435 ClientWidth = 13635 StartUpPosition = 1 '所有者中心 TypeInfoVer = 2066 End (H  @}$R 憦濄K窺rUnit0:", 4memberDivide0孨",4memberSpecialty00"( 4memberName0", 4 memberDivide1孨( 4 memberUnit1:,4memberSpecialty10( 4memberName1, 4memberDivide2ty1孨 ( 4memberUnit2: ,4 memberSpecialty20 ( 4 memberName2o , 4memberDivide31孨 ( 4memberUnit3: ,4memberSpecialty30 ( 4memberName3a , 4memberDivide45x孨( 4memberUnit4a:,4memberSpecialty40( 4memberName4e, 4memberDivide5ty3孨( 4memberUnit5a:,4memberSpecialty50( 4memberName5e, 4#memberDivide6ty3孨( 4"memberUnit6a:,4!memberSpecialty60( 4memberName6e, 4(memberDivide7ty5孨( 4'memberUnit7e:,4&memberSpecialty70( 4$memberName7a, 4-memberDivide8ty5孨( 4,memberUnit8a:, 4+memberSpecialty80( 4)memberName8a(2<.Label987 (28/Label1000(2@0Label101:(281Label102峃( 4memberTitle0 "( 4memberTitle1 ( 4memberTitle3 ( 4 memberTitle2  ( 4%memberTitle7 ( 4memberTitle4 ( 4memberTitle5 ( 4 memberTitle6 ( 4*memberTitle8 (r2<2Label1032( i43memberCode8a1( j44memberCode081"( k45memberCode181( l46memberCode2a1 ( m47memberCode3a1 ( n48memberCode401( o49memberCode581( p4:memberCode6a1( q4;memberCode7a1(28<Label99"0W24=memberBirthday0""0X<>chooseBirthdayBtn0Ok+"0Y<?chooseBirthdayBtn1+0Z24@memberBirthday10"0[<AchooseBirthdayBtn3+ 0\24BmemberBirthday25" 0]<CchooseBirthdayBtn29嵰+ 0^24DmemberBirthday3" 0_<EchooseBirthdayBtn7+0`24FmemberBirthday45"0a<GchooseBirthdayBtn4+0b<HchooseBirthdayBtn5+0c24ImemberBirthday55"0d24JmemberBirthday6"0e<KchooseBirthdayBtn6+0f24LmemberBirthday76"0g<MchooseBirthdayBtn8+0h24NmemberBirthday80" (軴 X[09D@"媅SO(諷 坢 @"媅SO( <btn_kt_addhdGk( <btn_kt_clearQk  Microsoft Forms 2.0 FormEmbedded Object9瞦VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} zycyW      "$&()*+-/123456789:;<=>?@ABCDEFGHIJKLMNOPQRTUVWXYZ[\]^_`abcdefghjklmnopqrstuvwxyz{|}~( N緥n芠xxE@"媅SO)塠hQ衏:y俌 N ^g諲篘9e≧3u鲖fN匭筟 (W Nb N O噀鯪MR 颯(Wdk緥n噀ch軴芠x0KNT 臺{樸壠[Mb齹憦,g噀鯪0:Ndk 鲖br皨╜@b緥歔剉芠x0!#@"媅SO$ @btnokct61( @btncannel^u( 2Label328 l Microsoft Forms 2.0 FormEmbin Caption = "課題組主要成員情況填寫" ClientHeight = 5076 ClientLeft = 48 ClientTop = 432 ClientWidth = 13452 StartUpPosition = 1 '所有者中心 TypeInfoVer = 679 End (H ]@}骫21R 憦濄K窺恄宋體P$,#Frame10" n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦,{|+R{u"媅SOH,5"媅SOH,5"媅SO ,N9u"媅SO ,砇9 Tu"媅SO$, 褢潣(NCQ){u"媅SO,魦fk{u"媅SOH啲k5"媅SOH琸5"媅SO ,kX魦f!{u"媅SO,c(Wy橆vxvz菑 z-N-峮fN06e茤D崣e0 YpS蚥0纇"}噀.s0菓茤penc0褘D崣e0pS7R鶴Hr0O畫0頬舉0齎ET\ONAmI{9(u 錘蔛vQ諲鴙sQ/e鶴0 5"媅SO,(Wy橆v瀃絜菑 z-N/e豊賬耂Nxvz剉xvzu0ZS隭T0繈顣f[0X(u剉xvz篘XT0褃x厪㏑篘XTI{剉砇'`9(u 錘蔛/e豊賬4N鰁X鲖剉═鈰N禰剉9(uI{0 5"媅SOH,嚕 7 @"媅SO$, 魐9(uT{5"媅SO0, N梍厤菑蟸9;`潣剉40%!5"媅SO ,魰9(u5"媅SOL,2vQ-NY鑒褢潣魐N魰9(u-NS+T剉Y鑒D嵮T "5"媅SO, YOSUSMOD(0b舃剉xvz鸑!"5"媅SOH, "5"媅SOH琸"5"媅SOH,5"媅SOH,嚕l}7 @"媅SO$!{5"媅SOH,嚕l7 @"媅SOH,5"媅SO ,緥Y9u"媅SOH琸5"媅SO,c(Wy橆vxvz菑 z-N-峮緥Y孴緥YPg0GS魚皊 g緥Y蔛遹(uYUSMO緥Y 裇u剉9(u0擽S_Tt-峮緥Y 煴RqQ玁0遹A嵤S鵞皊 g緥Y蹚L圙S9e 0 5"媅SOdH  ]4}鬦3u鲖蟸9崉槜{USMONCQ ;`潣=魐9(u+魰9(u R 憦濄K窺恄宋體(Z28Label50 [4fee1 \0fee2 (_2<Label350(`2<Label37 (c2@Label523(28Label123( 0fee_note1( 0fee_note2 (2< Label131f7(2 Label132f7(2 Label133f7 Y8 fee4O(/2@ Label152O(22LLabel155f7(32<Label156(82hLabel159(92 Label160f7 :4fee6( ;0fee_note6 <0fee5( =<fee_note4O(>20Label161f7O( ?<fee_note5 G0fee3(J2<Label973( R0fee_note3(X2Label134f7 (諷 坢10E@"媅SO(軴 X[E@"媅SO, R d  @"媅SO$)&^rf鱏y樑_kX{5"褳SO ,蟸9嵮y顅q{u"媅SO @H,q}N95"媅SO @H,q}砇9595"媅SO @H,i805 $,* n`粑浲`犽J緓]犽J緓]fo)+|CompObjpedded Object9瞦VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} setpsdWin Caption = "設置保護密碼" ClientHeight = 2724 ClientLeft = 48 ClientTop = 432 ClientWidth = 5292 StartUpPosition = 1 '所有者中心 TypeInfoVer = 17 End ThisDocumentThisDocumentsqrxxWinsqrxxWinsqxmxxWinsqxmxxWinpub_checkpub_checkUserfrmSubCodeUserfrmSubCodechooseYearMonthchooseYearMonthUserfrmChooseSchoolCodeUserfrmChooseSchoolCodeunLockWinunLockWinchoosePertinentSubjectchoosePertinentSubjectjfgsWinjfgsWinfun_for_word97fun_for_word97IDCardNo_checkIDCardNo_checkjxxgxkSubCodejxxgxkSubCodechooseYearMonthDaychooseYearMonthDayzycyWinzycyWinfundsWinfundsWinsetpsdWinsetpsdWinID="{00000000-0000-0000-0000-000000000000}" Document=ThisDocument/&H00000000 Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=sqrxxWin BaseClass=sqxmxxWin Module=pub_check BaseClass=UserfrmSubCode BaseClass=chooseYearMonth BaseClass=UserfrmChooseSchoolCode BaseClass=unLockWin BaseClass=choosePertinentSubject BaseClass=jfgsWin Module=fun_for_word97 Module=IDCardNo_check BaseClass=jxxgxkSubCode BaseClass=chooseYearMonthDay vQ諲eg恘蟸9y8 5"媅SO*[SO5"媅SO(NCQ5"媅SO(NCQ5"媅SOfw n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦.H, }5"媅SO , 2023t^qu"媅SO(NCQ5"媅SOH, }5"媅SO , 2024t^u"媅SO(NCQ5"媅SOH, }5"媅SO , 2025t^y槤u"媅SO(NCQ5"媅SO*[SO5"媅SO*[SO5"媅SO*[SO5"媅SOTH  E$}鬦3u鲖蟸9峵^剺梴( N+TvQ諲eg恘蟸9)R 憦濄K窺恄宋體 $)0feeYear1 (-2<Label119"a(@20Label162a$*0feeYear2a$(+2<Label120a(A20Label163z-a$'0feeYear39(,2<Label121C3a(B20Label164鵅a(C28 Label165a(D28 Label1660a(E28 Label167HFa ( <cancelBtn9崉S,$<saveBtn>,$@delBtng腍,(2@Label96/,(2<Label116砮(2<subject1砮E(2<subject2砮 (2PROJECTPROJECTlkNCompObjno/5@i023 n`粑浲`燶M緓]燶M緓]fCo24Xn{pCompObjpCompObj16aVBFrame&PROJECTwm9Root Entry F悎T緓]r@Data fwWordDocument.ObjectPool)亟x]悎T緓]恄宋體m$#form3119 n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦,(芠xP栺倗eW[蚹bpeW[  u"媅SOH,* {5"媅SOH,* {5"媅SO( 峇搹N!k5"媅SOPF纮a1[SO菓硚塠hQ衏:y 緥n軴芠x choosehQ@"媅SO(H  }6!DR 憦濄K窺恄宋體e(2HLabel1o1{>$4tbxpsd18: $ 4tbxpsd28: i( 28Label2670 1pOptionButton1_kX" ,緥n芠xq @"媅SO BaseClass=zycyWin BaseClass=fundsWin BaseClass=setpsdWin HelpFile="" Name="Project" HelpContextID="0" VersionCompatible32="393222000" CMG="EFED43BD43C563C963C966CE66CE" DPB="1311BF99FEB6FEB6014AFFB63AB04AE52B8EA5D0288A6CE7BCE852B55576C3B576CA38AB8D" GC="37359BC59BCDBECEBECEBE"[Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 &H00000002={000209F2-0000-0000-C000-000000000046};Word8.0;&H00000000[Workspace] ThisDocument=0, 0, 0, 0, C sqrxxWin=0, 0, 0, 0, C, 52, 52, 1180, 559, C sqxmxxWin=0, 0, 0, 0, C, 104, 104, 1232, 611, C pub_check=0, 0, 0, 0, C UserfrmSubCode=0, 0, 0, 0, C, 156, 156, 1284, 663, C chooseYearMonth=0, 0, 0, 0, C, 234, 234, 1362, 741, C UserfrmChooseSchoolCode=0, 0, 0, 0, C, 130, 130, 1258, 637, C unLockWin=0, 0, 0, 0, C, 26, 26, 1154, 533, C choosePertinentSubject=0, 0, 0, 0, C, 182, 182, 1310, 689, C jfgsWin=0, 0, 0, 0, C, 0, 0, 1128, 507, C fun_for_word97=0, 0, 0, 0, C IDCardNo_check=0, 0, 0, 0, C jxxgxkSubCode=0, 0, 0, 0, C, 26, 26, 1154, 533, C chooseYearMonthDay=0, 0, 0, 0, C, 208, 208, 1336, 715, C zycyWin=0, 0, 0, 0, C, 52, 52, 1180, 559, C fundsWin=0, 0, 0, 0, C, 78, 78, 1206, 585, C setpsdWin=0, 0, 0, 0, C, 78, 78, 1206, 585, C #瀸棸暈-?@覌B糊 `@2譱甕C汘澼擃v麬 ∝6F拂洐呶掏岞n軀QsAX\髬 緡>8骱鞳瀽( 蔮\'X77?趷!幇蟣谸5?2賆Y}XFKp 鲉孏H%V冝埉 晻懾鱞佢愻擯撰哌|煜G_罒9逞(朆-)( 載哩b"攞G堉|07`荾黀EB聧歘?舒1壃!字?S供繾椽m驙-暿ナV╘牡J珤橛燥肗S.段阩4狋w弛\+ZxC絳產叼旉/-噗x崖kP//嗨貂z又疉)靜稓オ傿J庋篜5f煌 CF窛瘐r]*螿 Yv)C薳欺P@$=9I!檁豉脒饁HB%(fV 珔va 揀602- "O9Id塗 Z}r丈銞'=y蜾漶蟂踆%穽飫攞W<潺wo焴潥炃 om桐v渰怍痏8}鰣:磑q3醈a犴醕.媊蓋/& 1%垛@)+-Z杞 ⑷伀c蹚9T鷸" 鵛嚻;adw茲^福ln顜怵m湉M躚剮\(盯'Pb塊e#奲c椹{l劚cw秉篕鷾 6斵庹q氦KzV6錌$偢L\!迻ov飡uF]籲# 騗L-7轇c"検.姩軻$C晌匃M\KH坱)骦,凨f熋~崰逜P軠a攛撊FrIF.;1賒垻膮韾84睙(榯羨欭劏k姉嘂>罺趕鳡職旘Qw棲薣榊櫺!廬R撐#nq饊廁8癛{c妿c鏞u朮>螴—lcWb軫v 扉賔盢al 熭蒤釞8B|欐=埡軼V徝描冂>韽L両蚺閿}:屼^ DVS茁澂n棚<<棁峴< /,呡攜簣Z騽"忭甘-圶嵯ETs誦cк衺h0纏d<壪鍲燆7qsG緹q黔鬲Ut栒掜櫃fn~╥0> 﨤覦濼CY,XW#駝H颎歟象 砽芨d|0欓咽d蛸u迲箬C焗闄蠍P趹妛>饀f袉E%=qv槃餛90`幋屒欬屓噴綬埄闌x pf澓瀻6H:婨u瑱vV乨綹(g雙L%St遝5跕澄(賸0屬$$E$} Ns愋;{/,,+醭P-jYT帑咭k~" 莙0T溡P息珒>#教橵纮=藔<譯婋翼┹ォv嶩[$宼矷h翔O勷-x殱j<4.膈<= mR+浸.棈5韌洉偲辯童瑫!e(C82啅Q#訵.Dx<}/SY.d0u.:i5垐能$j鸜h琸堟V\厒鵒抂嚥頡憙犤A潑!頚3炱婒tz >位Z`%善頝88鰖t田"H眗膽8 ^So Ys峣Zv蛍Q:囈uDM;奩蘏.}曺欄氼j竏{乯唉S璶歶崝靡畕稅驕Q4鬄iU5軺灘0ks炯\7X蚛 5挽餴闉/閨砕77'd]烓涎u涎 j1嫐b糥哢蜑絚讀3U2S;綬珿8土猊:?韌g-, gsヶ磣un局f紺(M榬荰 Jxi D=揹eC媙 PK! 褠煻'theme/theme/_rels/themeManager.xml.rels剰M 0匃倃oo雍&輬協勪5 6?$Q祉 ,.嘺緳i粭澤c21h:闀q毩m胳嶡RN壻;d癭値o7g慘(M&$R(.1榬'J摐袏T鶂8V"&A然蠬鱱}狇|$絙{朠除8塯/]As賲(⑵銻#洩L蔥漢倪PK-!檗[Content_Types].xmlPK-!ブх6 0_rels/.relsPK-!kytheme/theme/themeManager.xmlPK-!盧theme/theme/theme1.xmlPK-! 褠煻' theme/theme/_rels/themeManager.xml.relsPK] AQA>Q a B F Q%%9%|%溉%釗%*%c%熒%丈%%G%兪%故%跏 !!!!///////////////////////////////////////////////////////////////////////////2M 6(<躎篤癢綳Z]J^b'6?EKV^a8(*6lz(2<TjT濼襎VU^U繳轚餟"VzV淰耉銿W"W奧腤鎃LXnX╔襒釾.YfYzY圷朰碮蔣ZZ4Z6Z@[p[h\擼蝅_芵b !"#$%&()2345789:;<=>@ABCDFGHIJLMNOPQRSTUWXYZ[\]_`bc "#@BC`bc "&IKACDacd,OQ (*7RTb}"$QW晫W晙W晙W晫W晫W晫W晫W晫W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晫!(+2!!晙     ! $ '*-0369<?BEH餪 C @饚 (  饇  S ,((噀,gFh 16#" ? 饘  <((? 噀,gFh 7#" ? 饞  養((? 噀,gFh 4#" ? 饠  餌((?噀,gFh 22#" ? 饉  s :()jJ?陙 慆Vb_ 23#" ?養 S  ? 餒0(  )Q$ t$t$2tu#t^#t _1545219992 _1594797802 _1545219995 _1545217471 _1545217472 _1740405927 _1545217474 _1545206403 _1734846923 _1545220282 _1545206639 _1734847355 _1545206761 _1734847429 _1545206762 _1734847430 _1545206763 _1734847431 _1545212610 _1545212611 _1545206766 _1545217485 _1545224373 _1734846933 _1545220014 _1545217490 _1545217491 _1734846936 _1545217492 _1545217493 _1545218590 _1735047222#c &ADd, 7RbR@@ @ @@@@@@#c &ADd, 7RbR ! a G L j k l s  "#%&IJOR !/2mqfg "% "#%&FGIJ^aOR33333333 !NWSj -7Xb+`  a B G 4Gu "#%&FGIJTc9MOR#c#&L,R +7Ub%R1r1r歫:歫:刪剺h^刪`剺(0凥刓H^凥`刓)勳刓^勳`刓.剱刓^剱`刓.4刓4^4`刓)勜 刓 ^勜 `刓.剕 刓| ^剕 `刓. 刓 ^ `刓)勀刓^勀`刓.匎剺^匎`剺()勣刓^勣`刓)剛刓^剛`刓.&刓&^&`刓.勈刓^勈`刓)刵 刓n ^刵 `刓. 刓 ^ `刓.劧 刓 ^劧 `刓)刏刓Z^刏`刓.歫:1r%礍楾gZV褃Z靏&n1?歸j%WI&J);LQ 鱝(  欱桳h^ |6 褺 -e  $ v+ 1 1 |  \ gr ] - yH 襜 w\ 2絆+3yzO c<O鉽%?H%`纕z~G"t=v|*|ZWm縶M S7'M綩饉556G誳xp4y16M<RE廩| C VW' I$峅>K q+r.9桲侾猏+y>0rD閐2 糂 逤 ;!) "" "*"5";"So""A##G'#'#;#+D#攄#%%(*%& #&P&?e&皁& '怹'' (f'()(B(躳(&#)9)8*峓+鍉+k,16,荰,Ev,?r-#.&.梂.蕄.^00H0匷0*"1 X1;2\ 2$222?2d 3M936H3d3F04&O4綪4歈4濽4醃4;j45bM5沚5 6]66<6.K6LN67-7:?7}w7P#8.8-h8E9R9K:9艵9P9,U9ao9:&:J=:蚠:Ph:耾:#;玘;;< =鈁=鋖=zN>a> ?{L?琈? @@n@ :@~O@AU@;8A#BA狽A臫A慳AB=6B萬B鐊B&COaCcD"rD Ex:E鑆EWE僲E/E>FNF讆FG G^GGoG!G#G6GH+.H;H$=H<I羬I*JwJ)K /K鏨K媓KUlK+uK"L/L9L鄛L1M&>M篋MaM朿MfMnO9 O XO縔OPP+PQQ4Q+ p?ppAMpqq+q@Eq_q芻qrU-r&Nrfr甼rursR3s>t7u/u /u#Quvve+v^/v齅w`w奧xxmnxI y=+yt@y慲yjyyzz譎z6xz~{> {A6{{B |5|G|p}C}~E0~bF~TO~8[~鴆~Ti~c1旸X+o.塐v*83KW]颿坴P'9wp+MT.4OH軴mp鈖!.m/399奡|%.b%翤sP "$I2=h/kL淿琱8胠.oF礸\(We }Bl6R<!2!]噋MC}B.b蝐 s[靨^沜. |f[g鈐眖B3>踂 d杁Gr2LYHx2<&荕&x躟0 腉唚縌\w%) g+禥:Dd?蘗9|L4漺}#'^(*)9UA竃=&=臢焞mc$J.gt+m=s`W.園㎜蟅O]d`頼靬 OS區杛6W`K*p5烰'薞鰀3Cea /糂In,]觭G SAu烾Sw"黐e^b G>k:ZB(]u杣s@,餏<;/沍6j宲縲]( #寃 (^ 鳱1鹼4(驜貃oo&:DF淜Z`騡 !+;:kin`s*w|QGUD岲輛))Y1SX羏}e[127< >[ #7,3^4aj_'sF!+諯m憓LVIP~~4$;$E=1馌~Q"5/lR蟢s竧 :U\羦AQ\$t-5-:'T匷濰Ig?D癬 |H 4><@薝/5蟌28xg2$P9E榥|u zA9ApVQ痟駎孒蟖HCopMw1$?攍4r({鎩鱦鹷A 朑鷀絠桹孹_a躨rry種qUXT甊騜Y|aDmm 镼癢鉮1K)Zy<|?`&e|lxB1V71%Yb2(m6礦z8媇 :US:C'<d9?珽菮俰藽粀﨓胮塆1IHr罤Q>贗)K鮈FtRjSt臫罧擷: [1鎍蝢+b#檅_ 痗 l}97lSr:rT 蝦F`:s腞苩#vQz;y? 巣鱣;|俲硘=|BV..V..V..Project.ThisDocument.FilePrint%Project.ThisDocument.FilePrintDefault Project.ThisDocument.PrintTheDocPROJECT.THISDOCUMENT.FILEPRINT PROJECT.THISDOCUMENT.PRINTTHEDOC%PROJECT.THISDOCUMENT.FILEPRINTDEFAULT@XNNNNN N QP@P P PPP4@PTUnknown Administrator G.郲x Times New Roman5Symbol3. .郲x ArialA4  N媅_GB2312N媅;(媅SOSimSunA4  wiSO_GB2312wiSO;= 鷟8褳SOSimHei;4 噀'Yh媅{媅SO9,狕|8I{縹 Light?狕|8I{縹DengXianA$BCambria Math 萉hE月F霞硣曮&7g g 嗕{j蛨J哌P  ?鍉+*! xxL 2009t^y橆v3u鲖fN(Km諎Hr)F1g漑^t