邢唷>   Y}-  !#"$%&(')*+.,/0123546789>:;<=@ABCDEFGHIJKLMNOPQRSTUVWX[\]^_`abcdefghijklmnopqrstuvwxyz{|}~Root Entry F%瘋 ~SummaryInformation(DocumentSummaryInformation8ObjectPoolKJ 燲﹤ %瘋  "&(-27<AFKOQV[_aeglquw{} 鄥燆鵒h珣+'遲0$ 4 D P \ ht| N,倅橆v3u鲖fN NHr F Normal.dotm1g漑^t364@f促頞@芇猇x@4% @n牨吧Microsoft Office Word 脹諟.摋+,D脹諟.摋+, X`h Ye瞼钀>y褃鳶 !g~  `PX`,P\p Google.Documents.DocumentIdGoogle.Documents.RevisionId$Google.Documents.PreviousRevisionIdGoogle.Documents.PluginVersion(Google.Documents.MergeIncapabilityFlagsGoogle.Documents.TrackingKSOProductBuildVer ICV-1dBZ_NEEmF4MevshH_jsw6BZznYRkC1Wx3gHguQH4w0s03821155985285849812138880497991440158932.0.1974.7364true2052-11.1.0.11294!FEAB592D465B47DF8C81DF034A042314 覌B糊 `Microsoft Forms 2.0 文字框Embedded ObjectForms.TextBox.19瞦status_1234567890覌B糊 `燲﹤ `-珎 _1234567891&覌B糊 `﹤ `-珎 _1234567892.覌B糊 `﹤ `-珎 _1234567893 6覌B糊 `﹤ `-珎 _1234567894:覌B糊 `捆﹤ `-珎 _1234567895 2覌B糊 `捆﹤ `-珎 _1234567896>覌B糊 `捆﹤ `-珎 _1234567897*覌B糊 `捆﹤ `-珎 _1234567898F覌B糊 `型﹤ pT珎 _1234567899 J@2譱甕contents?4CompObj@sObjInfo9;BOCXNAME<C 覌B糊 `Microsoft Forms 2.0 文字框Embedded ObjectForms.TextBox.19瞦sqrxxXmlStrH,@"媅SO 覌B糊 `Microsoft Forms 2.0 文字框Embedded ObjectForms.TextBox.19瞦contentsD4CompObjEsObjInfo=?GOCXNAME@HjfgsxxXmlStrH,@"媅SO @2譱甕stdoleP h%^*\G{00contentsLMacrospT珎 悽珎 VBApT珎 {珎 dir 020430-C 0046}#2.0#0#C:\Windows\SysWOW64\e2.tlb#OLE Automation`僂Normal僂NCrmaQF  *,\C pmA!Offic刧ODfic俫﹤!G{2DF8D04C-5BFA-101B-怋DE5gAAe*42乬2僩Users\zhubaorui\AppData\Local\Kingsoft\WPS ?\11.1.0.11294\o侷6\ksoapi.dll#M0icro 1@6.0 Obw Library*E聖MSFGs>MS侳腉s3柪BiD452EE1 -E08FA5A-8-02608C4D0BB4Hi罀gram Files (x86)\%\Root\VFS羠temX86\FM20.DLL1' 褜0/;&1'儕I慉H00}#0滲# ^?0羣媭 A@E472B675-184A-4D70-817E-0FAE2038D9F嫂胾ZHUBAO~1寀Temp\Wo@rd8.0\腳.8exd=@#.E 忇.`孧 戳├MSACALsACAL@9z8E27C92E-1264A9C-8A2F-04022400h9C0T7n 2007 SP3 3in1\OF繤ICE12 .OCXHCalendar Co@ntrol V0G555031724118-7B61-4AD1C1F-5149CA045`528}#1ADMINI~1.圵IN12VBE?'1.! @.'巇/@$aa圫criptQx>S`卹ip ng酄tj`2@420B28酄E711CF-893D@"A0C9p0542! 鯛c0rrun,f R纔ntime @ MSCoPmctl`>@酔Cm@tLb G|"G31FDD16-0C5C-11D2 -A9FC6F8@754DA1亐1僒OMCTL霦CD豪Emmons 翓(SP6)G~G睝斈0634942B-2072 y54-9A46-E喑83E22DDB*9y?鉌)孏@僜 鴘MI!GVB8_RegExp_55>$ VB牭c_R犙gE"x燣_5 M3}3F CA7-160D8E9104B365C9F}#5.5瞯vbs矪-Q&\3(?% ul?p ress筆xs  騿rGrThisDocumentGp俆俰sD((cu爖e3tZ2THR1?p嫆A,r/R"J+R;un饂kUG;uLktW@1n!>f2噊bTR$(zsPqrxxb:qxE92I?nx4funTdsfn渟焒9=錽 驕sqxm隓0s@x !iOfo39Eb1dfrmChooseSc`lCodeXG.*ef0m wh"o2q_沼lpoe#}2 T }&m& b煷 XSub# U* S輴b 立[2&_7WQ8W] 禨_ pub_ch╡ckS9p" _纉鈎pOckT9f o眾 !iuAAs餰Perp}郕Q礨G,PKopsuP0r剘矺jupcp騰2熯  $2j xxgxkSKJj`FxP娖xpSK躃2r 1卍0 趴 ? A3YearM嘯hU cYaP8M鯛nh  *rP恛襢h縎SP*n緲 捳j琭g2j屙g 5毳[p`228 瀦*?觖=p[_fo柋r_word97Gf un_8or8w8d9@7剈衝_fo2Hr1 (,嬙!) +iIDCardNo_check烮DCa沝N沖che}k 55烡R廜l墜OSzycyWinGVzyByW襥2:D:q"倗( 厤chooseYearMonthDayGV$ 唎媠塝媭仈Mnt 贒測摀 2fO/>O/AcQ/ @)jxxgxkSu@bCodeG$Pjx@gkSyodi0 2 'R'呶' 's鄀tpsd聉丣S鄑ps#舧 L2 !v!O!+!rU~~~~~~~~~~~jfgsWin?3zycyWinZ隬__SRP_0昐__SRP_1M X1*Gr觖>槺&瘩CC<0)c祣$n0-|襀)-橰刜>ザ荱F-檔嵭校B OSx校B OS>槺&瘩CC<0)c祣MEPSPSSS 16"<< VV 0{E7306E24-7C2D-48D2-8229-B57F2D995284}{A53E0F5F-C7B6-4655-952D-ED04996E8DD0}(@ bxH <@b|PD@b~p H@b P@bX @b \ @b槧B %% x` `)僓%  ` `` )僓% `$ 0`()僓(% p`, `0)僓% `4  `X8 )僓x% l `<  ( `@ )僓 % h `D   `H )僓% `L x`PP)僓p% `T  `X)僓% ``\ ``)僓% `d p`Hh)僓h% `l  `p)僓 % X `t  `x j `| 8 ` i凗  <`x i凗     %侢   %bt 4@bv8@bz(@@bxL@bT@b` @p8 (8X p xh  P`(0  xxH p 凗偁r  8 8  8@ uy赾*\R5*#d$*\Rffff*1Q63da79aa"dhlptx|  (08@HPX4` " "   " "  @ "HPhp " x  " "   "(0 " 8 @` "hp "   " "    "(0HP " X ` " "   " "  @ "HPhp " x  " "   "  00HXx  $(Hh(Hhp    "  "J$` $ $ $ $  $(  $P  $x  $  $  $  $ @ H P $h $    B   <  B   P X ` *h * $  $  8 $X  *  $  8@P]@ ]@ ]@]@H ]@(]@P]@p ]@x]@ ]@]@]@ ]D$!修改這裏要同時pub_check的checkAll8  $Z'o@x  T %`$^'To  $Z'o   T %`$^'To  |$Z'|Ao  T %`$^'ToX0  $Z'Ao(p  T %`$^'To  z$Z'zAo  T %`$^'To p $Z'Aoh p T %`$^'To8(  $Z'Aoh  T %`$^'To  x$Z'xAo  T %`$^'Toxx  t$Z'tAoH  T %`$^'To   $Z'Ao`  T %`$^'To  ~$Z'~Ao  T %`$^'ToXp  v$Z'vAo(  T %`$^'To B@ B@$<G|j !~!H 自籌經費項目 !H K你填報的申報類別為 “自籌經費項目” 該類別要求其它來源經費大於或等於 8 萬元A@<|(k  *!!  *!(% !H7*!((d !H7*!((d !H7*!((d !H7*!((d !H7*!((d !H7*!((d !H7*!((d !H7*!((d !H7*!((d p!H7*!((d !7*!((dq *!(% !H7*!((d !H7*!((dq0 A@roX A@ro  *!!  *%%*!(!d$ %`  *!!  *!(%7*!(!d$ (H7*!(!d$ (H7*!(!d$ (H7*!(!d$ (H7*!(!d$ (H7*!(!d$ (H7*!(!d$ (H7*!(!d$ (H7*!(!d$ (H7*!(!d$ p(H7*!(!d$ (qk *!(%7*!(!d$ (H7*!(!d$ (Hq@ B@o( !H %` !H %` !H %` !H %` !H %` !H %` !H %` !H %` !H %` p!H %` ( ! %.G0 ! (ji8 '< applyTotalFee,otherFeeSource申請經費總額,其它來源經費$zzk  申請經費總額$6Gzj  其他來源經費$6Gzj  圖書資料費$6Gzj 咨詢費$6Gzj  數據采集費$6Gzj 勞務費$6Gzj  調研差旅費$6Gzj 印刷費$6Gzj 設備購置和使用費$6Gzj 管理費$6Gzj  小型會議費$6Gzj p其他$6Gzj'<iNAttribute VB_Name = "jfgsWin" Basx0{E7306E24-7C2D-48D2-8229-B57F2D995284}{A53E0F5F-C7B6-4655-2D-ED04996E8DD0} d@Global塖pacoFalse 奀reatablPredeHclaId襎ru BExpose0TemplateDerivCustomi襷婦 P $ tmpTszl@f As S簄Hg Zx SHjcj Lw D$yc5YsSbgzGXxhyU Qt 0媽 2縶6vty纙F{奣坿 傮-ZF劧z噯 崿茍嬻崙E崠龣t墢3巃?af{J痮痮爋9K烮/(? 2垇oJ凮A 8"M!MFunc醃 c鴄clRU鮄 臝=) + eF;I8i&6I3i1Isw.i+IX)i&4(A訵Left(,D 1翢"."RS 羗"0" &[揷鶗 鏲棩C(Ζ+偊c` (mastInput(MPe, "Z&,""!申請仧總ǘ,櫊"F) `狑 1%0@e( "3!黅r +g瞷 堇 鹐O R)0圖書資淩戲2愫4 +咨詢OOD-`數據璨杉 /醼勞務OD1`調研差|旅4峪∷OD6`設備購置嗪褪褂__"冒8管理__T:`小型8嵋榀qtp$N5S6*;qjke滶Grq磳蕋1@絞飪颯57a菧y砨QA堿愼q] 0瑃.N承⒆CV嚅*鞓淟榳鍥澹xV嚅*鞓淟榳鍥澹反屖t1@絞飪颯57MEPSPSSS0n006"0{799CC761-62B3-4151-BCEE-1390F5715D0A}{74AC30DA-A42E-4E65-B3D0-A2D7180143A1}b4@bP<@b8@@b `H@bP @bT @選 擇清 空% H` ` `  ` $H` (` ,` 0` 4H` 6 `   : `  > `  BH `  F `  J`  N`$ RH`( V`, Z`0 ^`4 `H`8 b`< d`@ f`D hH`H j`L 0`P \` T )僲(0%)冨PX%ixi凗   `X`刾`勡 H `\ j `` `剅 ,v ` di凗   `@  i円 ` i冊 i冎`勜 `勞 `勦`勡`勣 , !`X ! ix i冎 i凗 `勦`勡```勣 ` `勞 `刕 `> `勜 ,r "` "??i冎 i冘( i凗 `勦`剛`勡`勣 `勣 `剟``勞 `剙  #``#i )%ii冘`勜 `勣 `勦`勞 `刕 `%侢 %bHbHb(8@b xD@bL@HHH    (P8Hx`HH HH凗偁% $$ ` h,Guy赾*\R5*#5d*\R5*#5f*\R5*#2e$*\Rffff*1T63da79aa逽 X \ `B dh l( p) t- x7 |+ 1 2 5 / g i '  , . *          $ ( , 0 4 8 < @ D H L P T X \ ` d0 h l3 p4 t6 x8 |9 : ; < = > ? @ A s 08@HPX`hp "x  " " " " " 0"8 @P"X `p"x "   "   (0"8 @ P` hx"   "    "( 0 @P Xhp"x   "   "  0@ 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 Bx             ( HPX p      (0" 8@HPX`h  6 * (8@ B HPX`hpx    (8 ` 8p "&nx B   02H 6   J( x   B( p:z:h  *0 (8  `Dp &08@H " PX`hpx      (8 Xhx ]D選 擇]D清 空]@]@]@(]@P]@8]@x]@`]@]@ B@ohH B@oH B@o( "B@o &B@oH *B@o .B@o 2B@o 2B@ohH 8  (d8  (k o <  (d  (ko @  (d  (kox D  "(dH  "(k0o(H H  &(d  &(ko L  *(d  *(ko P  .(dX  .(k@o8 T  2(d  2(koH X  2(d  2(ko  8A\op  <A\oH  @A\o H " DA\o & HA\o * LA\o . PA\oH 2 TA\oX 2 X A\o0 l!  (Hd '4v-'6 8B@Bki]]XmemberName,memberTitle,memberCode,memberBirthday,memberSpecialty,memberUnit,memberDivide7姓名,職稱/職務,身份證號,出生日期,專業,工作單位,分工情況$r'p pfalseG|j *%   7*!((d  7*!((d  7*!((d  7*!((d  7*!((d  7*!((dq p *!~(Hd pXmemberName,memberTitle,memberBirthday,memberSpecialty,memberUnit,memberDivide,memberCode$ *!~(Hk8 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 Al$ThisDocument.cyzkxxXmlStr.value = "" *!~!H] `.r *!~!H rBt rProjectApplyMemberXmemberName,memberTitle,memberBirthday,memberSpecialty,memberUnit,memberDivide,memberCodeAk tB@o 'v !x!H 需填寫 名稱A@<z@k8 !!H需填寫 職稱/職務A@<zk !z!H需填寫 出生日期A@<zk !|!H 需填寫 專業A@<zpkh !~!H需填寫 分工情況A@<z(k  !!H需填寫 工作單位A@<zk'vi ] ] ] ] ] ,$p''   %   $  % % $. $ %%!d (H  'o ] ] ] ] ] ]0 ,$p' ,$p']H ]` `.^]x ] members ^%B.>'     $ $ $.  !H    *%%*!((dkPH $ % %'ProjectApplyMember ^%B.  XmemberName,memberTitle,memberBirthday,memberSpecialty,memberUnit,memberDivide,memberCode A   >B@   '` >!p'iH  ]H ]` ]x ] ] ] ] ] ,$p' ,$p' 請補充第  % 行中 ''   $  % % $. !H  $ 、 '  'k memberCode  % % $!H % getControl(Me, ("memberBirthday" + VBA.LTrim(VBA.str(rowIndex)))).value = getCIDBirthday(getControl(Me, ("memberCode" + VBA.LTrim(VBA.str(rowIndex)))).value)] memberCode  % % $!H$'  身份證位數不對第  % 行中💇‍♂️,證件號不是18位的中國居民身份證號🥅,是否要修改?(如該成員無中國居民身份證,可填寫其港澳通行證號、臺灣居民來往大陸通行證號或外國護照號,並在此處選否)   提示...$<  memberCode  % % $B@false'rz( k d 第  % 4行中的證件號不是合法👩‍🎨、有效的身份證號,請核實並修改! >  提示...$<  memberCode  % % $B@false'rz@k8k0k(k  success   % % , 'd   5 row is blankdneed tip   % %的數據 >警告...A<@false'rz(k k  %   % %'rd'rki ]]]]0]H ,$p' `.^    $  $. $ ^%B. !H (d  B@  set orderorders ^%B.  (d  B@ ox銑Attribute VB_Name = "zycyWin" Basx0{799CC761-62B3-4151-BCEE-1390F5715D0A}{74AC30DA-A42E-4E65-B3D0-A2D7180143A1} dGlobal!塖pacoFalse 奀reatablPre declaId襎ru BExpose0TemplateDerivCustomiz婦P Cons t cho5Label As S 筺gK"選 擇 learA清 空tmpIDmemberCode0-@12345678GHSub QBirthday0_Enter(p) CoBtn0.SetFocus En\d @蓔11W艅223] 3 AP$4 4k 5 5 6 6 7 7 5 8 8 0_@Change%YIf-] <> ""` Then僝^c@aption`朿麊E⒊_菭dYgIf坔w^1]1錩y`w1._蝵逬_$姥w22_A~2_#湎(楯 dn _ 偗 3_玊3w 0 3 皉& o  vqy 4 4 tn4   m騥5 5 t黱5 ) 礬 6 6 癔 tn6 擢 7 7 tn7   8 8 tn8  蹫C頖prlickerChall廎C",=u, 1悾啞9m_`m 豘a!1k2e瘵 2c?!23@co??340^凍45 Yo56?TEhdayBtnClick(chooseBirt6, memberL@7) End Sub Private z7_` 癈allHy7 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.?~44 control.value = ele.getElementsByTagName(formItems(i)).$(0).TexPt N rowIndex1+ 1\TEnd Sub Public Function setListV(successRQds As String, t)i Dim iIn鄑eger(飯俓 t丅搧8Varian丆塩= Sp(litr(p, ",")僌" s =魜:Obj膃c圝roo|Set = G鄀tDocJD罀倕.create臐("me`mbers<]= 0CFor iBc To U郆oundJ寗M @0 芣 >)EM= 臗檬(M坋, 拭 + 蒦($))If饋< 6 Then嘋/This@Uu淋.Tables(4).Cel豯(3@?,佬).Range傔烜3D)馣A豂f栬VBA.LTr坕m(!strJ(7P#!<= D8ProaMApplyMB:%:Call pmakeXMLr( , a+?翈,A鉆TitledBirthdaySpecialt!UnitDDividCode<",`儝h3$X.appendchi黮d翣g&塐gL欋蟟柪2  1厸憐漜heck鐫蠚, cap潙blankNum醧鸂 殽CtipMsgA枚#+懟錹`〇GΞ*楗錈 a匜膜8C== "請補仇淶" u単"行中 "&2 揂c艴藍%pJ廕E,<""_KRV+ g饌、 Hv5E/L9嘝U1Len(-ZtD?/N)肧) > aZ'襆臜/煴i!IDO OO %G5id7 = C鳬DCqG??/$S<> #qr 04身份證位數不對3& ` Bo8x("?7Q 1)@27,證件號不是18位的中國居民#號欠褚薷模浚ㄈ綹貿稍蔽逈,可填寫其港澳通=ず擰臺灣來 舐綍或外國護照1並在此磤ρ》瘢hvbYesNop 纕bQues羃@H提示...") vb飩~塐/l}J/0DFoc|usH沬f0alse<Ex|itv紡r==E/_媋婖 WPV合法⒂行У7請核實並R◎OKOnly= vbO﨣廝 r廈侭< 0 The猚heckListValue =9ft :,Q- 1)uEls蝒 W""& Public Sub pmakeXML(parent As Object, ufUserForm, items Str@ing, rtndex ODim ele &G f%I$Vari,an劋iIn tegerco ntrol'ro纎tElem ]7= Spli t^(俤, ",b",Set@3= GetDocIA im@uo U繠ound(FAcE,= get侰/(uf,  (i) +FP罭= $.creat>eD:@ .T鏎) .vA欳1&y.append郼hild羒譴'sCord臽A4鯘$" sT"E塁U 仺Sub 揔*0           *\CNormalrU<~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~4 ?q_櫑頜 'k弢n 儕a QAq )Iy儉 塗TATiT 儉a -)!*a****I+++ ,),Q,,,,)儉 "閰墏羵㈱鶄)[Qy,Qu蓛AT塽駜羜筤Aa亜羷釀)Q,I儉a qB???@Q@堾罖鵃AIA丄盇锳)B,QB,i儉a YLIK慘袺L,1L儉 QPIKP!P,慘坅 y 1Iy9iAay儉  X9WqW¦a*醀AT, 儉 YLIK袺!P,筧閍慘A儉 qRa**@AR,i儉 賌㈱醃[Q[塠盵賉鵞!\A\鵃i\塡盶賊])]Q]y]蒥閉^1^Y^塣,筤,坅 9.-. 鵢Y_q_慱盻裚儉 閡$閚!oYo憃蒾p9pqp﹑醦qQq塹閝!rYr憆蓃sAs乻羢tAt乼羣!*uY^塣,9uQu塽眜羜儉 xa**@眞賥AR,儉 YLIK袺!P,閍慘A儉 $qy翀駡!I,i  洛︾O福EX鰑 a9 Project ThisDocument unLockWinsqrxxWinfundsWin sqxmxxWinUserfrmChooseSchoolCodeUserfrmSubCode pub_checkchoosePertinentSubjectjxxgxkSubCodeSKchooseYearMonthjfgsWinfun_for_word97IDCardNo_checkzycyWinchooseYearMonthDay jxxgxkSubCode setpsdWinF "C:\Windows\SysWOW64\vbscript.dll\3FC:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA7\VBE7.DLLVBA  ` 0K﹚ 6TC:\Users\zhubaorui\AppData\Local\Kingsoft\WPS Office\11.1.0.11294\office6\wpsapi.dllWord 1p0FC:\Windows\SysWOW64\stdole2.tlbstdole YL續-鶾藉D轗 Y  КM? ㄩK6\ jfgsXmlStrTC:\Users\zhubaorui\AppData\Local\Kingsoft\WPS Office\11.1.0.11294\office6\ksoapi.dllOffice 9c .E 忇.`孧 CC:\Program Files (x86)\Microsoft Office\Root\VFS\SystemX86\FM20.DLLMSForms 1 1 Y u秗銳pM亊 8裒8C:\Users\ZHUBAO~1\AppData\Local\Temp\Word8.0\MSForms.exd Y 1  0( B縵=犐B(C:\Windows\SysWOW64\scrrun.dll ScriptingbaseDataVBScript_RegExp_55  k F1粓楂NG甄JH牱ガyb/G澤 淤p棤'&QK壞2砋畽{l烣WJO projectTitle@2譱甕fG喫鸜oEB R霯則秊:病?岬﹣P#Kρ稴@zy!-6S` " 2覌B糊 `genderbirthdayIDCardNotitledivisiondutyeduLevel eduDegreelanguageaddress postalCode telOfficeCommandButton1CommandButton2爺?螰蹺浳`Frame1Label1Label79Label80Label81Label82Label83Label84Label85Label86Label88Label89Label90Label91 btn_kt_deleteemailLabel92Label94Label95Label96Label97Label99Label100Label101Label103Label104Label107Label108Label109Label110Label111Label112Label113葟漑qJ棪 e缷UserFormgP 闑悸鵅4 F3Dynamic Q)y)btn_kt_delete_ClickchooseBirthdayBtn8_ClickCommandButton1_ClickCommandButton2_ClickIDCardNo_Change IDCardNo_Exitq#皞嫉犐tIDCardNo_KeyPressp#皞嫉犐tpostalCode_ChangepostalCode_KeyPress tel_Change tel_KeyPresstelOffice_ChangetelOffice_KeyPressUserForm_Initialize checkForm $$48<@DH [筽鸔dkYkX] [筽鸔dkY頞9e] 7u,sY ,SplitStr VB5Replace 3覌B糊 ` 4ZS隭xvzu,Ux隭xvzu,,g褃u,'YNu,-NNu,vQ諲 ZS隭,Ux隭,f[隭,vQ諲 1234567890loadXMLDocumentElement 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隭,貧錧z値/g^,錧z値/g^,㏑t錧z値/g^,錧z値/gXT= applyer,gender,birthday,IDCardNo,title,division,duty,eduLevel,eduDegree,language,email,address,postalCode,telOffice,tel茝Yl喯珅缽pj).蹺浳` ComboBox Style )O  )h  ) (Label93 )w H ) h#=鸂h8+3q繥?,2q:::碘蜣úN%牀w価鼁▍IK悼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\ subject$旔3濬戞 7pwd (getElementsByTagNameItemText 蒘f[褃/鼅TxvzA projectType,projectName,schoolCode,applyDate,schoolName,researchDirection,researchType,planFinishDate,lastProductMode,qtContent )i 鱡-XF!&:閺礬 姊K搢z酌>豂IL払t>並誏"N)AKGm庣"yH胕趭E箋喱菱f 镮y)("覌B糊 ` lbx_firstbtn_userfrmSubCodeOk lbx_secondbtn_UserfrmSubCodeCancelbtn_userfrmSubCodeCancel_Clickbtn_userfrmSubCodeOk_Clicklbx_first_Changelbx_first_DblClick getuniversity l4H ~b N0Rpenc噀鯪 钀Rpenc鄀誰穬梍 SchoolCodeAttributes#覌B糊 `ChildNodes :dyclf 鵞 Nw 鲖╜ 愰bf[!h! 曪 ) 8╝rb馩廞:%\輎洭?{F,N蠃"う諧蝩?欯腳AN蓛蹜酠呿埍缿2蝒x堋E乺F ハyj 蝛凣zH俘氬.Y 丱y) getSubjectBlbx_second_DblClick h4H鬩訄8濧父蕀z!昳mDIL孮[$吲~呈躊;孌榥[茨澃d/ N穙c+p>m擠(huL穨z ?5sMonthsYear儅%舍覽H乲鈹鎳 btn_kt_addLabel106 yQy)UserForm_Activate \' 蚛;眏L樰j 鯈EY V〧┽ n娨F>^0誁8Z茌際K拾cG鯗E劚7>O鳁O癝2虸@n壚Q( unLockBtn cancelBtn]緒徖湘G綾g 橲y)unLockBtn_ClickcancelBtn_Click pwd_Change X4%^蹹垝.9熶+c 峴X虸純鯱R4﨣瓽P|A迪0eiX 膠BQ畝+駈F嬢韄颶I|:M啺@鴨Label105Label114 yUy)H submitBtnsubject1subject2chooseSubject3chooseSubject1chooseSubject2subject3chooseSubject1_ClickchooseSubject2_ClickchooseSubject3_ClicksubmitBtn_Click *幩聓EG<紏A~>槺&瘩CC<0)c祣$n0-|襀)-橰_>ザ荱F-檔嵭校B OStszlf鰺/閉D栴︺搉+ Yy)xxhyfotherFeeSourcetotal btn_kt_clearglfLabel115lwfsbgzfsjcjf applyTotalFeeapplyTotalFee_ChangeapplyTotalFee_KeyPressotherFeeSource_ChangeotherFeeSource_KeyPress dyclf_Changedyclf_KeyPress glf_Change glf_KeyPress lwf_Change lwf_KeyPress qt_KeyPress sbgzf_Changesbgzf_KeyPress sjcjf_Changesjcjf_KeyPress tszlf_Changetszlf_KeyPress xxhyf_Changexxhyf_KeyPress ysf_Change ysf_KeyPress zxf_Change zxf_KeyPressbtn_kt_add_Clickbtn_kt_clear_Click caclTotal << 48<@DHLPTX\`SetWi CheckCIDC15 CheckCIDC18CIDCheckgetCIDBirthday 88 U弲_d釚NeqZ!]=n絡蕡*I!ǖ9埈1@不眥螤z UQUHB嫽 2fk牅昏O嶐鳈0Q. 2E焧矢蛺; 9ay) getSKsubjectA getSubjectA  閎 n zz @n,瀙 1wy) sMonth_Change sYear_Change d戧7_L扡щC<驩錘U9嫻@埆z檸fRB>梊D庀.C$┏e圡碧肑bz輩對 洨嚇K弨萛:m塦$囑祱H2唪tmtP 閤y)Label134orderNo5subject5orderNo6 8subject,fee,fee_note,orderNo year,feeYear 窮.敜VI1/:脾刦堅O玞-$#C- 簮僳F攠9頟\L祄獼J&,1@K與k埁H╗J鶍枹Label52saveBtnLabel116subject4Label117orderNo1orderNo2orderNo3orderNo4year1year2year3Label118 fee_note1Label123 fee_note2 fee_note3Label132Label133Label131subject6Label140Label156Label142Label151Label120Label121Label119Label152Label155Label159 fee_note5Label160 fee_note6 fee_note4Label161delBtnfee4fee1Label162Label163Label164Label165Label166Label167fee5feeYear1feeYear2feeYear3fee6fee2fee3噟-*I壆旭j鶴 眮y)Label50Label35Label37directTotalFee_ClickdirectTotalFee_Changefee_note11_ChangeLabel132_Click fee10_Change fee11_Change saveBtn_Click delBtn_Click setListValue2caclProportion fee1_Change fee2_Change fee3_Change fee4_Change fee5_Change fee6_ChangefeeYear1_ChangefeeYear2_ChangefeeYear3_Change  88 48<@DHLPTX\|那蹫娗I 5GRw槉最L啣`A饒盭cO穀 Z~肣跜D毞H+祅bh瘢噟亄C)>襬btnokform3 btncannelR覌B糊 ` OptionButton1啾4悓A7G焢* 蓢y)Ptbxpsdtbxpsd2btncannel_Click btnok_ClickOptionButton1_ClickOptionButton2_Click tbxpsd_Changetbxpsd2_Change l48~~~~~~~~~~~~~~~~~~~~~~~;    #          ! %      ( 8btnCheckProtect1  yH applyDate  X schoolCode schoolNameapplyer projectNamesubject projectTypebtnCheckProtect feeYearXmlStr  h jfgsXmlStr jfgsTitle memberTitle chargerTitle projectTitlebtnEditProtectbaseData cyzkxxXmlStr jfgsxxXmlStr sqxmxxXmlStr sqrxxXmlStrpsd docPassword docStatusstatus strFullNamestr  x currentFormufitemscaptionsparentsource targetFrmcontiner controlName  txtKeyAscii canDecimal canNegativevaluepwordpisUsedkindTextcaption checkMaxLen #  #q# #1  #I% # ) )  !+Cancel  y+strValue strDividerMyStringToFind ReplaceTo #< = )(selectedCaption J )8 #iJHnum1num2 ㎡ )X 镼 )h 罶 )x 閁 ) 1Y )StrID15StrID18strId aa ) 9c )  ybtnindex entityNameTagtagNames successRowIdsrowIndex Yw ) y ) 閬 ) #y 駠 )srU $`,$`0$A`4$`8__SRP_2__SRP_3__SRP_4 __SRP_5=rU 0 y9@  AaI  )Q--   81 aY  ` @  $$ H  P1 a9  `  X1 ai ` ``  h1 a ` p1 a)  `  x I!! 1 aY  `I  y""  ## ``       1 a `I 1`I Q i   `  `       )  Q\ M  MMEy  9 Au - a A u     Au-a 9    -a9M19m9M-aAuWWW 0   0 @  0   0   tK!:h%x $ x,x:D:hNHHx Dx 0D )xD5H  $ 08t$/ xDHK:T:hNXXx Dx 0T )xT5X 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(棹0   +x $ xaX(h]3x5X0X4 +FX 5X$+x $ xaX:h]3x5X:h%X4,:h%X4,+FX 5XH$/ xXH +x $ xaX(h]3x5X0Xd +FX 5X$+x $ xaX:h]3x5X:h%Xd,:h%Xd,+FX 5XH$/ xXH0   0   0   0   0   0 H  0   0 8  L       \  D  | l d `4 T      t    < PX8h p         !"#$%&'()*+,-./0123456789:;<>?@ABCDEFGHIJKLMNOPRSTUVWXYZ[\^_`abcdeghjklmnopqrstvwxyz{|}~$`<$`@ $A`D$`H$`L$ `P$A `T$ `$ `!$ `%,`)0$ `X$`\  @L 1 @Q q@Q @Q @Q @Q @Q @,Q\ !@ I @qD  @q  @\|  @Dl  @8d @4 A@ T i@q @q @q @q  @q )!@Pqt 9"@hq Y#@tq y$@q<nrU~| )) AI@  !1! Y!!!)88)8a80   XhH LQh[dl`Ul #\0/\H罫%lC l`@X0/d`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  0   Kd  d4t5d lt點N d '寧'瀨:N:TdD:4$ 6 dD$瀨寧 ltx0,/xt$dD$瀨寧0        rU (`0,`=8` )=008` )=008!` I;=08I` ay;=04q`=0<` )I=&##(` 00 ` )I0##< `i)I=0##49 `i=0(a `0$ `(`#(`#$`$)`,Q`&0$y`8`  =0&nrU $`T$A`X$`\$``$`d,A`h ,`l$ !$`p,`t !$A __SRP_6__SRP_7Q__SRP_8]&__SRP_9frU --)"Y. 0./A/ @  )y//5Iy7A;;:2Q"y""")"L )Q Pq#I# T )# X )# ``` I\q#I# ` ) $ d ))$ hq#IA$ lq#Ia$ p )$ t )$ x )$ `` | )$  ` ` )  ` `I 1 i$   ` 1 i!%   `I%q% % % % % % & & 1& I& a& y& & &  1 i& `  )& ' ' 1' I' a' y' ' ' '  ( )( I( i( ( ( (  (  )1) `QWWW_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  XXXxx   | | g`x, `| !$ `,  ` !$I `(`#nrU~| 8a99Y:)hp^k^h '$flML@< ___)>dddA>``` 1 iY>xxx`  )`  >eee )}}} `  )>iii `I q#I>ccc )>fff`  )?::: 1 iA?yyy` i? W    W    W    _    _ 0   h4z$ x! x x4$/ x0   0   0 H  0   0   0   0 H  0   Px! x xP$/ x0   0 H  0   0   Dl=xx xICppCtt`  `' '@x! x 2tpx6@ `ICppCtt`  `' '@x! x 2tpx6@ `ICppCtt`  `' '@x! x 2tpx6@ `+x $  xa`:P ]鸃x5` *x $  xa`%x5`;(%:P%W`>@> 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   XTDLH   8 8 4O$ `p,  `t !$I `x$ `|$ `,  ` 0/(I `#nrU &y9@  / A塋aI盓酟镋IF!MiFAIYM丮筂))N镸IN Y;A;;:iI慖笽盓AILI%q%P )A 1)` TiJa 慗``Y   X1 i盝` \iJa 镴 `1 i K` b / M   '  ' g   0 H   ut,Td d ,T:D]鸃d5Ta%Td d ,T`10d5T3'幗': N440:DNTT 6T4幗C(D%C滎滎0T  T4佝 -佝l/滎6T4E(D%C滎滎0T  T4佝 -佝`1h/滎6T4'lTTd$ !d "d5T*lhFDNTTd$ !d "d5Tl郎d#$$ %d0/lh0(佝滎dT4幗T`! ` L` P`! ` Pl`2l龘 @:@%XHPB4d6P (@l!l龘 @dP黴點5POl(@P(0]36'P(0%l龘 @dP>A瘙:麛幗(俐%l龘 @d狛>慆A麛p`! ` H`6P瘙狛慆幗l(@麛Plu D,T,/dl4 `P瘙幗狛慆pP0   h  [x龍Hx黤h%XH黤h%XH黤h%XHch%XH=x$ xaH%XH8黤X]3x6H8 =$$ 4 l$ *FH%XH8 黤X]3/$6H8 3'酤'(:X N88:h NHH 6H8(酤 H5HF舺 $(/ $$xH8(酤.pj6j龘@:X%XH(B黴點6(]'逮(%j龘@:X%XH(>>棹=軋瀨! 瀨 H瀨6 (棹軋逮 kj﹑j / (/l$瀨(棹軋逮4 D`XTTPrU l$ `$ `$Q `, ` $ `( `/ @4 @DnrU X酦 O1OYO筃L ) 1)` P1 i盝` T1 i__SRP_e|__SRP_fLfundsWin-sqrxxWinH7B K`XI%q%\iJa 镴`Y a/M'g4 DT\LPrU h$`$`,Q` $`$` @4 @DnrU ㏄裀鵓!Q丳 41 i      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghiplmnorstuvxyz{|}~!遱Gr驕脾刦堅O玞-$#C- 簮僳F攠9頟\禠祄獼J&,1@K與k埁H╗J鶍枹xK與k埁H╗J鶍枹脾刦堅O玞-$#CMEPSPSSS06"<<0{BA0BB22D-CB90-46DB-947D-BF39EE505CB6}{B51CD54C-E26D-4AA8-9026-2C08143140A3}pbH4@bP<@bp@@bH@bP @bT @b\ @B槩Ksubject,fee,fee_note,orderNo% ` ` (` h` ` ` (` h` j` `劼 `勅  ` i円 8i冊Xi冎`勜 `勞 `勦`勡`勣 0 `   ` ;;`勦  ` ,p ` $$i(i冎Hi凗 `勦`勡```勣 ` `勞 `刕 `> `勜 `, `$$ii冎i凗 `勦`勡```勣 ` `勞 `刕 `> `勜 `  X `X i x ) %i i冘`勜 `勣 `勦`勞 `刕  ` i凗   `44 "8 ` $x ` & ` ( ` *8 ` ,x ` . `  0 ` 28 ` <`x !!i凗     %侢   %B悊 @HB悎Hb(8@bxD@bL@bX @b槧B pX x8 (h(  08 8 h x x (H Ph p凗`偁h%@ year,feeYear0h 8  @4Auy赾*\R5*#2e$*\Rffff*1W63da79aa逪3 `T dW ha le pf tg xV |h o y z { | 4 X Y Z  S         $U () ,+ 0 4 8 < @ D H L P T X \, `- dh l p* t/ x0 |^ (( @H  P`hpx " " 8@H 4P  ""  " 0@0Hx " "     "  "  "(0H "PXp "x $  ((@h p$$   6" PX`hpx  6 *8@PX "` hx< 8 (0  08Xh 6v  0X   0( XX    T <  X ` Dh 6     ,  H P  &X f n $X    6   6 8   ( 68 p ( H ` 6p  `   6     6     6 P  ( @ 6P  @ ` x 6  "x       ( H h 0 0 0 2 2P   """""8"` 6 6 6 80 8h """ ""@  h  H444@4x44 J  Jp J J  J`444 4X 4 4 L! LP! L! L! 8@"8x"8" " " # (#H#  VP#&# #  #$ "$$ :$ X$x$"$&$$$&%(% 0%P%p%%%% *% * & *P& *&  &&&'0'P' *p' *' *' *( *0( `(((( ( ( ( )  )@)   H)X)h)  x) ))) ") )) )B ))))****0*H*P* X*h*p*x*** * * (* + + 0+"8+&`+++++ ++ +B +,,,, ,(,0,H,`,h, p,,,,,, , , (,  - (- H-"P-*x----- -- " .... .(. 0. H. X. p...... . B . .<// /"/,/ 080P0 h0 0 0 0 01 16(1`1116111262P2p22 L2 22 23 P3 Lh3 23 23 (4 L@4 24 24 5 L5 2h5 25 5 L5 2@6 2x6 6667 787@7 H7 "P7X7p7 x77 "777 77 "778 888 "@8H8`8 h88 "888 88 "889 9(9 09 89 @X9 9 9 9 9 9 @: H: `: : : @: : ; (; 8; "P;X;p; "x;;; ";;; B ;;4;<< Z <<<*<*< < = 0= :P= >= := D> 8X> 8>">&> &?&@?&h? ?? ?]Dsubject,fee,fee_note,orderNo ]D year,feeYear ]@]@H]@駾(CmBUF1]@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 !H %請先填寫申請經費總額!A@< (Hko !H % (Hk $` $` .00 % (Ho  $Z'oX(oHPrivate Sub fee4_Change()End Subho  $Z'o  $Z'o(  $Z'oh *!!H] `. *!!H Bt ProjectApplyBudget Ak *!!H] `. *!!H Bt ProjectApplyBudgetYear Ak *!(%7*!(!d$ (H7*!(!d$ (Hq  !H$`  (. B@o0解析xml賦值給對應編號的控件(控件名末尾字從0開始)]x]]]] ,$p''   %   $  % % $. $ %%!d (H  'o校驗$<G|j !H$`  !H$` !H$` %殭櫃櫃? +間接費用 不能超出 申請經費總額 的40% 請修改A@<|kk !~!H 自籌經費項目 !H K你填報的申報類別為 “自籌經費項目” 該類別要求其它來源經費大於或等於 8 萬元A@<|8k0 !~!H 自籌經費項目 !H$` j你填報的申報類別為 “自籌經費項目” 該類別要求申請經費總額必須為 0 萬元🧒🏻,其他來源經費必須大於等於 8 萬元。A@<|xkp !~!H 規劃基金項目 !H L你填報的申報類別為 “規劃基金項目” 該類別要求申請經費總額等於或小於 10 萬元A@<|k !~!H 青年基金項目 !H K你填報的申報類別為 “青年基金項目” 該類別要求申請經費總額等於或小於 8 萬元A@<|Hk@ !H$` % !H$` !H$` !H$` %0申請經費總額 與 申請經費年度預算的合計值 不相等A@<|k !H$` !H$` % !H$` %)直接費用與間接費用之和不等於申請經費總額 A@<|k !H$` !H$` 其中外撥金額不應大於申請經費總額A@<|k If Val(fee9.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 If/ 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 !HG (Hj !HG (Hj !HG (Hj !HG (Hj !HG (Hj !HG (Hj* 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 格式化經費 !H0.00 % (H !H0.00 % (H !H0.00 % (H !H0.00 % (H !H0.00 % (H !H0.00 % (H/ 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") !H0.00 % (H !H0.00 % (H !H0.00 % (H !H0.00 % (H !H0.00 % (H *!!  *%B .Cell(3, 2).Range.Text = getControl(Me, ("fee" & 9)).value fee$!H7*!((d fee$!H7*!((d fee$!H7*!((d fee$!H7*!((d fee$!H7*!((d fee$!H7*!((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)).valueD .Cell(3, 3).Range.Text = getControl(Me, ("fee_note9")).value fee_note4$!H7*!((d fee_note1$!H7*!((d fee_note2$!H7*!((d fee_note3$!H7*!((d fee_note5$!H7*!((d fee_note6$!H7*!((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$!H7*!((d feeYear$!H7*!((d feeYear$!H7*!((dq *!(% !H7*!((d !H7*!((dqOThisDocument.jfgsXmlStr.value = setListValue("1,2,3,4,5,6,7,8,9,10,11", attIds) 1,2,3,4,5,6 $ *!(H1,2,3 $ *!(H A@ro0]p真的要刪除記錄嗎?   刪除...$<  *!!  *%  fee $(H fee_note $(H  feeYear $(H7*!((d7*!((d7*!((d7*!((d7*!((d7*!((d$ .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*!((dq8 *!(% (H (H7*!((d7*!((dqXML *!(H *!(H (. B@k`oX A@ro8 從控件到XML]h]]]]] ,$p' ,$p']] `.^](]@budget ^%B.>']X     $ $ $. ' G  'j $ % %'ProjectApplyBudget ^%B.   A   >B@   '8 >!p'i  從控件到XMLp]](]@]X]p] ,$p' ,$p']] `.^]] budgetYear ^%B.>']     $ $ $. ' G  'j $ % %'ProjectApplyBudgetYear ^%B.   A   >B@   ' >!p'i ] ] ] ]( ]@ ,$p' `.^    $  $. $ ^%B. !H (d  B@ (o  計算總經費X ~fee9.value = VBA.Format(Val(fee1) + Val(fee2) + Val(fee3) + Val(fee4) + Val(fee5) + Val(fee6) + Val(fee7) + Val(fee8), "0.00") $` $` $` 0.00 % (Hi8計算所占直接經費比例 !H !H %0 (H (H (H fee4_bl.value = 0# fee5_bl.value = 0# fee6_bl.value = 0# fee7_bl.value = 0# fee8_bl.value = 0# (Hd $` $`d.00 % (H !H$.0 !H (Hk` $` $`d.00 % (H !H$.0 !H (Hk $` $`d.00 % (H !H$.0 !H (Hkp F fee4_bl.value = VBA.Format(Val(fee4) / Val(fee9) * 100, ".00"), If Left(fee4_bl.value, 1) = "." Then+ fee4_bl.value = "0" + fee4_bl.value End IfF 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 If $` $`d.00 % (H !H$.0 !H (Hkko  $Z'A Call caclProportiono`8  $Z'A Call caclProportionox  $Z'A Call caclProportiono  $Z'A Call caclProportionop  $Z'A Call caclProportiono 8  $Z'A Call caclProportionoPrivate 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  $Z'o  $Z'o`  $Z'o88 '< applyTotalFee 申請經費總額$zzk feeYear1,feeYear2,feeYear3&年度預算經費,年度預算經費,年度預算經費$4zxkp  申請經費總額$6Gzj  其他來源經費$6Gzj 業務費$6Gzj 勞務費$6Gzj 設備費$6Gzj4 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 間接費用$6Gzj  其中外撥金額$6Gzj  年度預算經費$6Gzj  年度預算經費$6Gzj  年度預算經費$6Gzj'<i`X蠖Attribute VB_Name = "fundsWin"  鳥as|0{BA0BB22D-CB90-46DB-947D-BF39EE505CB6}{B51CD54C-E26D-4AA8-9026-2C08143140A3} dGlobaBl奡pacoFalse 奀re atablPr@edeclaI"d覶ru BEx0pose0TemplateDerivCustomiz婦 P Const attIds伂subject,fee_note,orderNo_yearwY2applyTotalFee_tmp As S雗gAotherSpourc @&1仿23456'IU78910Z肎萖JO乬N,?QRGC攆Index乭Intege2 '薷惱飫鏌眕ub_check的Allhas# = 刞 !Sub dir@V鍷Click()H If鄦A.Format( Q.value)!W" Then#MsgBox ("請先填寫申請經費總額🙍🏿‍♀️!~" Ac B End If 僠]hange頴xp0!繱$10VB$Va耹+%) - k), ".00!熄8A3_Ck仭= text /@Filter, , ˇ,#C`2鐢,鈽11(J2Fv a4' ' Label132_FN=瑳+!P烳!貹, O! 爣熾 $娡", 繜 -臡脦 1 g BUs餬p=_Initializ3ThisDocument.jfgsXmlStBr.<> "M?D豬m qKO俻c3 Set= G etCall.loadXM 0D1.F1s蔎PN解析xml賦值給對應編號的控件(A名末尾字從0開始 xPub纕8+(&s聹'$, itby殉Taging, tagQ顂74 (ep答99qaconQ2!i廇磭srow崏吳f繢Item"Variant= Split鞞 ( 0(,Ap= 1皣 Ea坈h A In 3".Ele酙sB鰕(罣1ia| To UBzo鶼(F x匤= `礑Me, W (i) +聭LTrim(str( ) A1D焒+ _ :).!`(0).T0NwX+/S剈b攕ave/'x '校驗鏎P播m(翞bO Exit+3>@!4BAL55557/摽e)q褦0.4Q9Q 錠間接費 不能超出 Y 的40% 請!滇'逫 !b 扗s S sqxm$xx .psgTypT("自籌癜項目" A@Mue < 8+ 你填報的申報類別為 “Y ” 該z鷚篤淥叢淳汛笥諢虻扔 8 萬元") Exit SubXEnd IfIf sqxmxxWin.projectType.value =@ "自籌氏@钅" AvVal(applyTotalFe,) > 0 Th enZMsgBox ("你畋ǖ納甌ɡ啾鷂 “ Y” 該C萇昵r讇芏畋匭-0兀鼷厈 3亇坾🙅🏻。規闌饑~恷=|1獆*東k或<小雬.7青裟贐78)v 7nF7VBA.Format(U) <> feeYear1C) + 獳D2R3D)B!澀 與 年度預算的合計值 啦幌嗟辱鑅;踵4n5憊直接費用與間#之壺筒弧Rj啀55<16髩其中外撥金藍畈揮α粺'A@9E?菣"KN0EC /E) - 0.2!_not鰁$蓮"銲F 姒當 會議稝/差旅屎獻饔虢渙鞣 超過 5 20%時,aL峁┫晗傅牟饉闥8得髏 GSetFocus 縝F吶 )@InStr(E 1, "版面"俼Empty猛J判吹膩fa中出現“#”字樣拿枋觶蕁陡叩妊U苧緇崢蒲Х比偌蘋ㄏ鈄式鴯芾戇旆ā肪嚀逯蔥杏泄厥孿釵蝕穡會\昧兄畚姆⒈恚,請修芨牧J& .0',&$2$ $"目K#2  1壱$3$`W$$$釦$CE4@:4$$T5?H?H?H?H?H?H?Hee5HZ667788=1彁彁~崘櫬版面費”字樣的描述,根據《高等學校哲學社會科學繁榮計劃專項資金管理辦法》具體執行有關事項問答,項目N不得兄畚姆⒈輳修改") ' fee_note11.Se@tFocusExit SubEnd If #;If A1.value = "" Then 0 +2 3 4 5 6 偉勵7 8  9  10Q H? 觨G 僷I'袷交褍 俈BA.F@ormat(, "0.00爜~  G  噣  莵    B姞'B+0荁+0gC+0鐲Kq嘍lh@ Yeauh礔6G礕happlyTotalFeefk( otherSourcr1鉲With牞isD牭ment.Tables(Thn.Count - fIn鴇ex 俊0#1A.Cell(3, 2).Rang@e.Text牴getControl(Me, ("/" & 9))瘍 p4u4靛1u5e2u6e3u7565?s8?ee蛁6710__昐7_ 11_踎S8_U2__筍10oe+ o鉪" 垘 3/0.09" 0颙0_4R4_ `0鱛_R1_T0_鸰R2_T0__齊3_T0__R~5_T0__R6籜1 r7 !1r8遶@1r1 X O,o1p\#蚛1#羢袵?6545~5/Y5绤 xY 提s颯飔4pCu68sd {漴e覧_ /ut ' ~jfgsXmlStr塻etListV霖("1,2,3,4,5,6,7,8,9,P`11", at餿Ids 縫!? 6 2D 9f_yt Un纋oad M`!茶 Private¢ delBtn_Click(Dim i As Integer盺P贛sgBox("真囊境鍬悸穡縋vbYesNo + vbQues0tion 楺...")0"B#飿%.媧Count - fIndex)  For i = 1 To 6X getControl(Me, ("fee" & i)).v恆luef""^_nothNextA 3XYearWB.Cell(3, 2).Range.T< `4!5!6!7!8'勦 僜10#1 2 U Pa3aa @a @a @a @a La9, ` 羓 纉 纉铩 `5-41+爄495End With! ThisDoc umentEvab les(6G applyTot alFee覓 otherSou黵cth鶅膌囌'XMLvjfgsXm餷Strj@! delBtn(.En&d`滷alse` 1.ShetF,sI坒 SubawPrivate A canc _@Click(1Unload M` '從控件D到"Pub@ Function setListV崛(successRowIds As String, tagNhameh)CD im犠`Inte鑗err !2tfor mItem"Va餽ian渥 G= Spli t(, ",")hs Ac#酢ObjecrootElei = G., (T#.怾en纃child& 摳"9F(.騂蟻J臜aN逬ic逬袹2Z↖颙ng颙颙`<颙#$n0/Pm )颙hW颙贕/Py颙颙" XCA 貺(颙q,0N?.te霬2菙*w/K姓/K/K%0'http://Kd(/K;/K呠/KO@a/KRA/K悰/K2/Ke/KD/Ki% /K/K("/K烯A oKhK_y犁縆p'縆11i#縆5鷳2螷d禝罧 鋾Sub荲par俺0, uf As UserForm, itemsString, rowIndex!L) Di m ele.ObPject,f擨怴arian:idInteger3controlNrootEl鄀ment ?o= Split紓(, ","SetJ= G鄀tDoc! i = 0 To UBound>(.#~%匵= getC_(uf, (i) +啝 仢= H.cr餰ate則;".TextR@.value僟丮par.appendchild 佊N End Sub '計算總褋Priv@! Function caclT otal(D!'fee9!VBA.亷at(VV1=234U5678)@r0.00s4 丄9 翧所占直接丄C比例 臗繩侭Propor#AF臗If J#"" Or 菶G)L"0" ThenCl1_bl30#23'AW5678aElsghWM!睰/ 燞* 100`:HC `2 Left( , a@S= ".0A4+蟻:2'2If74O麁`_ H'>Y闎FZ GO`u_I YFO鯵o燗qf9) ,C ,4哢`嘺Na繀C*m罒 i- :@o 怹o 5#Zo 曠:zf Wo 贗o @eo o h o h zf Wo j zSo 8) o o h o h zf Wo 聼70焵X 縕UH N ]6 _Dy[(悹K~1_Ch0ange~"tm p@t擝oxF`ilter鈋馂ee1_, Tr纔e, Fa0m膾餋all'攽 *F凧9嚢22qee2 3缐4㈧333s tne瑐楋44摕555匡#666埏'郈#7 '!7  7  槐,'#,,',y e8 0>>8 8  癉/ ?薍 <9 e9?39   Qg s KaclProportion 'End Sub  X以下為年度預算信息XPrivate feeYear1_Change() ,tmp = textBoxFilter( 8,z&, True, Fals.eFp2p2_]p2p&+p383838 8Func伱 check餏orm叏碔f (mastInput(M"applyTotalFee", "申請炎芏")) The鴥琢Exit 乣If亅s2,3粎巵,2%$e-岪-(J= =, 3=;楤= ;7other@8Sourc乀其他來莢磥15*C1#@業務費2^ @ "勞m A罍"設備'浱N 4A& $5專家茲裳?f %,@.6@7印刷費/宣碻延脳*8W9;1'98苯踴 *#間*a#其中 獠馉v, 谾&仺+偛in[+P伷/AQ襄蓽羥 亹菕亼a|r4 Gr傟鼺乼.綩巆撨油漒 &<>fG喫鸜oE鸅 R霯則秊:病?岬﹣P#Kρ稴@zyx?岬﹣P#Kρ稴@zy泯F乼.綩巆撨油漒MEL@SPSSS11>" LL"LLL  `凘 F` xk`j HH` dn J` hr)僊% R` lw)僓% XX` p \` t)僓% b ` x  dh ` @| )僓`% f `   h `  )僓% jh `棹k  `剅忐 ,<`  ++i凗  `剕`剙( %侢P( %b4@b8@b(@@bxHx@XhH(XhP凗偁P lp  @ x @t @p @ ` @ P @8 @ @0 @P @h  @ @瘙 x*`v ,@棹 h r@x `Xhx(T #uy赾*\R5*#e*\R5*#d$*\Rffff*1I63da7979$*\Rffff*1H63da7976$*\Rffff*1J63da7979*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#C:\WINDOWS\SysWow64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#46*\R0*#f$*\Rffff*1E63da7975*\R8005*#44*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#C:\WINDOWS\SysWow64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#44*\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 Forms 2.0 Object Library*#26*\R0*#1f*\R0*#1e2 L P T X \ ` d h l p t x |        (0@ " P:X          ( 8 H X h x       @ `        @`h   "    (0 " 8 @P`hp (Hh(HPh p  P  hx "  "  "   "   $ @@  F 4  L .p  "   "    "   ( "  0 08 h " p x  "  0  "   I I HI ,IB`@+ *?`@h  B * ` X`h px  B6( `px04 8  Xhpx4 ]@X]@]@]@]@(]@P]D選擇]D清空x真的要刪除記錄嗎🙎🏼‍♀️?   刪除...$<  (H (H (H (H (H (H (H (H (H (H (H (H "(H $(H &(H *!(%7*!((d7*!((d7*!((d7*!((d7*!((d7*!((d7*!((d7*!((d7*!((d7*!((d7*!((d7*!((d7*!((d7*!((dq *! ( *!x(H ,(. B@kHo@ 2!  (Hd '4v-'6 8B@Bko@ B@$<|k *!(% !H7*!((d !H7*!((d !H7*!((d !H7*!((d !H7*!((d !H7*!((d !H7*!((d !H7*!((d !H7*!((d &!H7*!((d !H7*!((d !H7*!((d $!H7*!((d "!H7*!((dq !H *! (] `.^]]Charger ^%B.> 申請者信息 > wapplyer,gender,birthday,IDCardNo,title,division,duty,eduLevel,eduDegree,language,email,address,postalCode,telOffice,telAD >!p *!x(H A@ro A@ro`  $'o8H $P (Ho TxGX'TjoPrivate 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  $Z'o(X  T %`$^'To $ $Z'o  T % %G'Tjoh " $Z'oh  T % %G'Tjo( Al男,女,$p (n教授,副教授,講師,助教,研究員,副研究員,助理研究員,研究實習員,高級實驗師,實驗師,助理實驗師,實驗員,高級工程師,工程師,助理工程師,技術員,高級農藝師,農藝師,助理農藝師,農業技術員,高級獸醫師,獸醫師,助理獸醫師,獸醫技術員,高級畜牧師,畜牧師,助理畜牧師,畜牧技術員,高級經濟師,經濟師,助理經濟師,經濟員,高級會計師,會計師,助理會計師,會計員,高級統計師,統計師,助理統計師,統計員,編審,副編審,編輯,助理編輯,技術編輯,助理技術編輯,技術設計員,研究館員,副研究館員,館員,助理館員,管理員,主任醫師,副主任醫師,主治醫師,醫師,醫士,主任藥師,副主任藥師,主管藥師,藥師,藥士,主任護師,副主任護師,主管護師,護師,護士,主任技師,副主任技師,主管技師,技師,技士,高級工藝美術師,工藝美術師,助理工藝美術師,工藝美術員,$p (n/博士研究生,碩士研究生,本科生,大專生,中專生,其他,$p (n博士,碩士,學士,其他,$p (n 1234567890 % - % . % ' *!x!H]P `.r *!x!H rBt r!x wapplyer,gender,birthday,IDCardNo,title,division,duty,eduLevel,eduDegree,language,email,address,postalCode,telOffice,telAvk !H ,(. B@ohh'< _applyer,gender,IDCardNo,title,division,eduLevel,eduDegree,language,address,postalCode,email,telY姓名,性別,身份證號,職稱,所在部門,最後學歷,最後學位,外語語種,通訊地址,郵政編碼,E-Mail,手機$zzxkp] ! ! %'| |En. !~ 青年基金項目F青年基金項目申請者年齡不能超過40周歲(1982年1月1日以後出生)👷🏿‍♂️,請修改🚶🏻‍♀️‍➡️! >警告...A<zkk] !H$'   >警告...A< B@z(k  &!H %  &!H@ % 申請者信息中 E-Mail 格式錯誤 >警告...A< &B@z k  !H$ !H %申請者信息中 郵編 格式錯誤 >警告...A< B@z k  "!H$申請者信息中 固定電話 格式錯誤 >警告...A< "B@z k  $!H$申請者信息中 手機 格式錯誤 >警告...A< $B@z k '<i 宓Attribute VB_Name = "sqrxxWin"  鳥as|0{3C26890C-3EE7-4766-86CB-FB596F4512FB}{EB1F0042-520A-4CEC-8474-B66AEE3AB2A1} dGlobaBl奡pacoFalse 奀re atablPr@edeclaI"d覶ru BEx0pose0TemplateDerivCust恛miz婦 P!% tmpPostalCod@e As S緉g TelO8ffi|Email IDCardNogNu mbersConst cho@J0Labe娧擇纎/D lea聄 清空 匜 Sub btn_kt_delete_Click () If MsgBox("真的要境鍬悸穡", vb(Yes6+@Question, "A ..."))羵 Thenapplyer.衯alu翋"@&!gendbi纑thday YAtitleRd0ivis@-uteduLevelR Degrelanguagaddress鏌 鄀刉tEW唀罺2With6isDocument.R e.T1s(2$D6.Cell(2, 2)ext罷h;m4# 63達C_4? # ? $ 5_C_! 6? # 7_A Endf 丮莾Th∟e卌黙p!JeN(KJ"8Xml糝[ .En!Z(雅 %SetF``sIf 牕獕礏$暟Btn8.狾. 辌鱗;S螼E騳E Bc續flagp10'3Y癮Bou= (1910) & "-"P0(2019=MonthDPWSho>w鎡 CommandBu鄑ton11 g(checkF皁rm(d騺)d郋xit AUKKq0s,?K 騣'}/9ko 0-縇 l [m 廙 d杗鏞n豲 q逳 [r? 噇蓧O zvP 絯/ 饃肎納A-wQ?Q@抔C+ Dim rootEle醷bjectPM= Ge>t皛cp>s`@H.ca胑("Cha rger"攧'昵胝噝畔Call makeXML(t, Me︿,7,4,E,2,e0,-,e+(,e&,r,d!,,邞 遞躥 . 丼Unload 黠c0S2 S蚲鈅ngeU紣蠒 tp絅oCNFilter(,1遺P(2V71 _AX(ByVa@l Canc笊MS慬s.Retu爎nBoomn$[OgetCID誶獵_Ke2yp鎠sAsciiA);Intep&4f= 120抏 888'閩'p^//筻)G 'End Sub 癙rivatex IDCardNo_Exit(ByVal Cancel As MSForms.ReturnBoolean) birthday.value = ge爐CIDB,(^~KeyPressAscii咺ntegDer咺f += 120 Thern 889園postalCode_Change(+乶tmpP ntextBoxFilter(, , Fal黶e%;^-|P!zOnly"Nu刴b PVBA.纔(E )%)telOE騎= 婥 翧?,▅A>@|4In Str(g d""v q<1Dim 褄Obj8ect B= xGet釪.loadXML(y 悋nueToControl( Ele1 , M纘"ap@plyer,K,,5,J,division,dputy,U,l 僽age,email,add!,鑱^,錙hIf3btn_kt_delete.Enabled}p(4 tF sm袧Funct check\()T溍倠c mastI餹put郵怺$s/'T 姓名,性,身份證號,職稱,所在部門,最後學鷦位,外鎘鎦,通訊地址,收編碼,E-M手機"亐 +1 u?-!/q`inMe.U# _1 =8Mid`.V 7, 8H,< 19820101 A sqxmxxWi n.proa5Typ《"青年粈鶼钅 9Qf1Msg (昵胝唚炅洳荒艹40周歲▉年1月1日以後出生)👨🏿‍🔬,請@修改!癑vbOK力警葛...-11/煉iid 觹C= `臗Q,6胚C1 撈袏sR, _ Y E.鎰5" @ p10Len(釦D > 0Not (c摣1, h @粈*)\*N "信息中 3. 格式錯犧   } 簾BItem( NyEOr.6_ l _ P 郵彬? lyO'q [tR 20糴~l紆 齡S*固定電活盁  豫 w 4 / $ 壈l MsgBox("申請者信息中 只 格式錯誤", vbOKOnly, "警告..@.") tel.SetFocus*Exit Function,End IfcheckForm = True /__SRP_10R__SRP_11__SRP_12Z__SRP_13$`  81 i!%`I<I%q%@q#IIQD%Hq#IaQL)>P ) 1)0`` dW48PP8rU \$`$A`$`$`$` nrU 筊酭 S1S慠8I%q% <1 iYS`  @1 iyS`ID )貳`H%L ) 1)bW<@DHrU X$`$A`$`nrU 賂U)UQU盩 41 i$`__SRP_14__SRP_15E__SRP_16w__SRP_17 c     "$%&')*+,-./012345678:;<=>?ABCDEFGHIJKLMNOPQRSTUVWXZ[\]^_`abcdefghijklmnpqrstvwxyz{|}~8 ) 1)`<I%q% @1 iAV`  D1 iyS`IH%L )aVP )乂 T1 i` X1 i蒝`  \1 i馰`I` )Wd&hi?lI'py'ta'mWWX\T4@D8(rU $`$A`$`$`$`$A`$`nrU $`,A` !$`,`  !$`$,A`( !rU X"QXyX蒟)Xd)(h )馲``Ql )1 1)`pI(t )塝``xi(|( )貯``Q )``( )=``(I%>蒠( (I%q%%罸 1 i`罳 )袽`` I9 1 i閅`Q )Z``%!Z )AZ` ` II' )QZ ` `Q ) ` ` )iZ`` )乑`` I~WWW____     hhttlw*P$`,,`0 !$`4,A `8 !$ `<, `@ !$  `D,I `H !$`L,`P !$ `T,I`X !$`\,`` !$ `d,I`h !$`l,`p !$ `t$I`x$`|(`/( `/ nrU~| WrU  $`(`Q (`i (` 0(!` 0n__SRP_18!|__SRP_19#!__SRP_1a(__SRP_1b9rU 檂羆閌aq`LI%q%P ) 1)`TiJa 慗` X1 i盝`Y\iJa 镴`Y `1 i K` b/M''gg4 D`T\PXrU l$`$`,Q` $`(`/(`/$Q` @4 @Dn__SRP_1c'__SRP_1d@6__SRP_1eYR__SRP_1foErU  Sqb檅羈閎IbXy' \' `' d'B B B h ) 1)`li?  p1 i慶( ( ( ` t1 i羉) ) ) ` x1 i馽- - - ` |1 i!d7 7 7 ` 1 iQd+ + + `Q 1 i乨1 1 1 ` 1 i眃2 2 2 ` 1 i醖5 5 5 ` 1 ie/ / / `Q 1 ig g g ` 1 i閅i i i `Q9  )Ae' ' ' ` ` II%ie )乪  ), , , ` ` )閑  )f  )Af  )if  )塮  )筬. . . ` ` )醘  )g  ))g  )Ig  )yg  )檊  )蒰  )駁  )h  )1h  )Qh  )yh  )﹉  )蒱  )駂* * * ` `I )i  )9i   )Yi  )塱  )﹊  )蒭  )閕   )j $ )9j ( )Yj , )乯 0 ) 4 )裫 8駄 < )k @ )9k D )ak H )塳 L )眐 P )賙 T )l X ))l \ )Ql ` )yl d ) h )裭0 0 0 ` ` Ql )鵯 p )m3 3 3 ``It )Am4 4 4 ``x )im6 6 6 ``| )憁8 8 8 `` Q )筸9 9 9  )閙: : :  ) n; ; ;  ))n< < <  )In= = =  )in> > >  )塶? ? ?  )﹏@ @ @  )蒼A A A $ _   WWW_____hptx|     hptx|ptx|h !"#?rU $`$A`$`$`$`$A`$`$`$`$A `  $ ` $ ` $  ` $I ` $`  $`$ $ `( $I`, $`0$`4$ `8$I`<$`@$`D$ `H$I`L$`PD`T  = =&/$ `X$I`\$``(`d#0  ` a! I ;000I !` i I 0000 "` I )000< #`I ;=00 nrU ` yv蓈駐Qv4A>8)><q#IaQ` @q#IwDq#IIQ`H ) 1)0``I L1 i$`  P1 i!%`ITI%q%X%fWWLPD<HH(rU d$`$A`$`$`$`$A`$` nrU !Ixqx檟義!xLI%q%__SRP_20u __SRP_21v__SRP_22__SRP_23P ) 1)` TiJa 慗`  X1 i盝` \iJa 镴`Y  `1 i K` b / M     ' g  ' 4 D`T\PXrU l$ `$ `,Q ` $ `( `/$ ` @4 @DnrU "$"`$A"`$"`$"`$"`$A"`rU #H醶 {1{Y{箊`亄3 3 3  d1 i檣T T T  `"h眥W W W l )褅a a a p駕e e e t )|f f f x )1|g g g |I'V V V  )Q|h h h  )q|o o o  )憒y y y  )﹟z z z  )羭{ { { 質| | |  )鵿 }  )9}  )Y} y} ` "檥 箎 iy  )墆  )﹜ I%> a'4 4 4  )蓎  )閩  )aVX X X  )乂Y Y Y  )WZ Z Z  )乑 `" ~ )~   ' I~ i~ 墌 ﹡  ) `I"蓗  1 iySS S S  `"閪      )    )I   i  )   ) $    (1 iU U U  `", )) ) ) `Q"0 )+ + + `"41   8Q   <q   @憖   D眬   H褉   L )駙 `"P ) `"T )) `Q"X )I `"\ )i `"` )亖, , , `"d )檨- - - `"h ) 1)` "lI%q% p% tA* * * xY/ / / |q0 0 0 W"_""""W""""W""""""""_""""_""""_"""h  d (  0`d,L\PTX$"`$"`$"`0A" ` a! I ;00$" `$" `$ " `0I" ` i I 0000"` i I 000<"`I ;=00( "`/$I"`$"`$"`$ "`$I"`$"`$"`$ "` $I"`$"`("`/n__SRP_24F__SRP_25Ipub_check氪setpsdWinrU %  墕眴賳a <1 i)`I$@A>D)>HI%A L1 iY` $Py) 烗`$T )I 1)`$X )I` $\ )a`I$`%f$W$$$$W$$L<PX\T(rU $l$$`$A$`$$`$$`$$`$A$`$$`n`GrR$T V〧┽ n娨F失Z>^0誁8Z茌際頚拾cG鯗E劚7>O鳁O癝2虸@n壚Q(xO癝2虸@n壚Q( V〧┽ n娨FME      !"#$%&'(),-./0123456789:;<=>?@ABCDEFGHIJKLMNOQRSTVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|?珚GrxMEP@00> "LLLLLLLPL `勜 `* `剅 `剶 `, `劼 `勅 +`  ((i4i僤`6`8 `劜+``@寧o  `凚t +6` %%)冨8@%i儕`i僁`凥`勦`6 陘@蕫xH陘6(@陘\ @p  (  P @  @內 8``x : ><@Pd @hT @D @4 @$ @ @ @酤 @瀨 @軋 @寧 @ X h(P @l @*8h8`% @f @T @P @L @D @B @@@ X @0 @h, @@* hh@ XXp@8l X*th`%@d @ T @8D @P4 @h$ @ @ @酤 @瀨 HpPh@h @d h@`_  @\ @L @< @+huy赾*\R5*#2e*\R5*#5f$*\Rffff*1H63da7976*\R0*#17*\R0*#f*\R0*#1$*\Rffff*1E63da7975*\R1*#173*\R1*#197*\R1*#198*\R8005*#42*\R1*#1dd*\R1*#1de*\R1*#1a1*\R1*#1a2*\R1*#85*\R5*#29*\R5*#28*\R0*#14*\R5*#3d & (0 8HP 4XB  & $"  8H PX `B  px 08 h p  B   8H` N    ("  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  v H .h      B  08@H.P b  < @"`  F @(`(8  B  (00 F` " p0x(( 8H`x  B       . (08@ 6HB   .* - /   ( 8 H X h x* 2  9 $ #(8 )@ )Xpx B h(08@HPX`<hB     ( X8   F   ! j!!! ! p!("0"8" @"P"h"\x"" "B" @# P# p`### # v$x$$$ $$$V$ %8%@% H%X%0p% % % 2% % & && & & & & & ,&  *('X'h' '( ( ( H ( h( ^( (   (( )B0) x) ) )(*0*8*@*BX* * * ~*@+H+P+X+Bp+ + + +h,p,x,,B, , , --- - -H.P.X. `. &p. `. . / r8/ / (/ / x0 0 0 0 0 d0P1R`11 1x2h22 23r3p4 Rx444p5 Rx555p6 x6 6  6t670787@7 H7~X7(7 8 888 8(8 08B H8 P8`8h8p8"x8   88 88   89 9(9 @9 $P9"x9299  $9":2@:x:  ::: :::; ;(;@; H;X;p;; ;;; ;;;< < (<H<`< x<< <<  < <= =  >0= p=== 4= "= .> 8@> &x> >>> B  >>>>> >?? ?(?H?P?X? `?@p???? ???@@@@H@ P@`@ h@$x@燖ˊ癅 窣菮郂鐯 餈鳣A AB A(A 0A&@A hAvNxA餉鳤  BB zBB  楤燘繠 6谺 C C C 0C8C@C<`C 燙–癈 菴 谻鐲餋D >(D hD pD D圖怐 燚F繢E E E (E0E8E@EHE XE] ]$eplugger_sinossA@r] ] ]駾(]P] @.獲得Table中Cell裏的值 主要為了去掉最後的回車符   % %'i8設置下拉為選擇 不可以直接錄入]p  !  %ComboBox  (ko必填校驗'z]0]H]`]x ,$p' ,$p']   $'  $. !H %x 必須填寫 $ >警告...A< B@zxkph'ziX必填校驗'4]P]h]] ,$p' ,$p']   $'  $. !H %x3必須按研究周期填寫年度預算經費,周期外年度請填寫 0 >警告...A<( B@zk'4i!為某Element添加指定控件集合的信息]p]]]] ,$p' `.^   $'  $. $ ^%B. !H (d  B@ o!為某Element添加指定控件集合的信息]]] ,$p']]   $'  $. $ %%!d'  (Ho在userForm中得到指定的控件對象]  ! !  .zpkh`.iPg控製textBox的數字輸入KeyAscii 為輸入的ascii碼canDecimal為是否可以錄入小數 canNegative為是否可以錄入負數]p 1234567890 % - % . % '  T % %G'Tj  T.G'Tj  T-G'Tj T. !d. %G'Tjm"."點號只能出現一次 T-,""-"號必須放在第一位,且只能出現一次 !d- %'TdX (k@k8 T'^i( T' T1KTF1'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@ T' T1KTF1'2KTF2'3KTF3'4KTF4'5KTF5'6KTF6'7KTF7'8KTF8'9KTF9'0KTF0'-KTF -'d 'k 🦸。KTF .'dh 'kX nP iH )控製textbox change事件 讓其只可以輸入數字z'防止錄入漢字 用在TextBox的_Change方法上 H'Z]P ]h ] ] 1234567890 % - % . % '  !H % !H  % %  $'   % H (Hz k   ' 'Z  (Hi 7控製textbox change事件 自動轉換全角到半角不允許漢字輸入 H']8 ]P ]h ] >1234567890abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ % - % . % '  !H % !H  % %$'   % H (Hz0 k(   ' '  (Hi 設置DOC安全鎖定密碼 ] ] ](  *!4(H"讓文檔的狀態變為保護狀態  *!F(H[ ThisDocument.btnCheckProtect.caption = "修改申請書" '讓按鈕的說明由檢查保護變為修改申請書A5 MsgBox "文檔校驗與加鎖成功📿!", vbInformation, "保護" \ Text Box 7 *%R(T \ Text Box 22 *%R(T *!( *!(v *!(. *!(.A@8  *%!(I&.BackgroundPatternColor = wdColorWhite  *%!(  *%!(  *!! *%!(  *!! *%!(0如確認無誤🌡,可保存並關閉文檔後🪔,上傳申報評審書!'  >保護A<A@8i解鎖@ *!4(H"讓文檔的狀態變為非保護狀態@ ThisDocument.btnCheckProtect.caption = "檢查填報內容並保護文檔"A V Text Box 7 *%R(T V Text Box 22 *%R(TA@8?false *!! *%%*!((d  *%!(J= wdColorGray10  *%!(  *%!(  *!! *%!(  *!! *%!(A@8? *!(? *!(v *!(. *!(.i`加/解 DOC安全鎖  * 5r t C@ kd5r t t C@kkqi/控製填報內容狀態 true:填報狀態 flase:只讀狀態  *A@87(]@ 5!   7(d  7(kA@8 5(. 5(. 5(. 5(.讓自由填的formfields]X 5!  7(.  5(  Text Box 227R(T  *!( *!(vd? *!(? *!(vkqix 檢查填報內容p *!!I申請書格式已被人為破壞,本申請書已不能正常上報,請使用原申請書重新填寫。 > 嚴重警告...A<':zk] ] ] ] ] 您的填寫有以下錯誤: % % '提示:申請書有以下未填寫: % % '''人員信息 *!x!H  '   % , 申請人基本信息 未填寫 % % 'kh *%5!7*!(!d$ %x %$'   '   % +, 申請者本人近三年來的主要研究成果 未填寫 % % 'kp  %  '   % 2, 申請者本人近三年來的主要研究成果 不能大於800字 % % 'k'q成員信息 *!~!H  '   % , 課題組主要成員情況 未填寫 % % 'k  *%7*!(!d$ %x %$'   '   % 1, 成員近三年來與本課題有關的主要研究成果 未填寫 % % 'k(  %  '   % 8, 成員近三年來與本課題有關的主要研究成果 不能大於800字 % % 'k'qp課題信息 *!z!H  '   % , 項目基本信息 未填寫 % % ' *!x!He]( ]@ `. *!z!H Bt projectType !x%%!d'  自籌經費項目 ]X  *%%*!(!d$`  '   % K你填報的申報類別為 “自籌經費項目” 該類別要求其它來源經費大於或等於 8 萬元 % % 'k`kX 青年基金項目 ]p ] `.r *!x!H rBtbirthday r!x%%!d'$d 1982-01-01 $ %  '   % N, 申請者的年齡已經超出“青年基金項目”的申請範圍(40歲)🤚🏻,請選擇其他 項目類型 % % 'kkk申請經費A If Val(ThisDocument.Tables(6).Cell(5, 2).Range.Text) = 0 Then n = n + 1W mess = mess + VBA.str(n) + ", 申請經費總額 未填寫" + VBA.Chr(13) + VBA.Chr(13) End If!replace(trim(strTemp),chr(13),"") *%7*!(!d$ %x %$'   '   % L, “一🙌🏽、本課題研究的理論和實際應用價值,目前國內外研究的現狀和趨勢” 未填寫 % % 'k'q *%7*!(!d$ %x %$'   '   % @, “二⚈、本課題的研究目標🥬、研究內容🧑🏿‍🍼、擬突破的重點和難點” 未填寫 % % 'k'q *%7*!(!d$ %x %$'   '   % R, “三💡、本課題的研究思路和研究方法🧑🏻‍🦱☁️、計劃進度、前期研究基礎及資料準備情況” 未填寫 % % 'k'q *%7*!(!d$ %x %$'   '   % D, “四、本課題研究的中期成果、最終成果😹,研究成果的預計去向” 未填寫 % % 'kp  %  '   % K, “四、本課題研究的中期成果、最終成果⟹,研究成果的預計去向” 不能大於800字 % % 'k'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 表八 經費概算 *%%*!(!d$` *%%*!(!d$`  '   % , 經費預算 未填寫 % % 'k@ *%%*!(!d$` % *!! *%%*!(!d$` *!! *%%*!(!d$` %  '   % ), 項目總經費 與 經費預算的合計值 不相等 % % 'k  *%%*!(!d$` % *!! *%%*!(!d$` *!! *%%*!(!d$`  *!! *%%*!(!d$` %  '   % 3, 申請經費總額 與 申請經費年度預算的合計值 不相等 % % 'k *!~! 規劃基金項目 *%%*!(!d$`   '   % O, 你填報的申報類別為 “規劃基金項目” 該類別要求申請經費總額等於或小於 10 萬元 % % 'k *!~! 青年基金項目 *%%*!(!d$`   '   % N, 你填報的申報類別為 “青年基金項目” 該類別要求申請經費總額等於或小於 8 萬元 % % 'k ] '& &  % % % 檢查系統為您檢查出以上 &X 項錯誤,請修改... '  檢查系統A@<':zk   % % % 檢查系統為您檢查出以上 X 項未填寫,是否真的沒有內容🎒? '    提示...$< ':zkk':i 生成上報數據 `.^] ]]( EPlugger_Data ^%B.>構建Charger塊(人員信息)]@ `.r *!x!H rBt構建Project塊(項目信息)]X `. *!z!H BtA@8向Project塊中加入 申請經費總額 applyTotalFee ^%B. *%%*!(!d$` (d  !xB@ 向Project塊中加入 其他來源經費otherFeeSource ^%B. *%%*!(!d$` (d  !xB@ 構建項目成員塊 *!~!H]p `., *!~!H ,Bt ,!x !xB@ k構建經費概算塊 *!!H] `. *!!H Bt !x !xB@ kp構建年度經費預算塊 *!!H] `. *!!H Bt !x !xB@ k加入一般項標示 projectMode ^%B.一般項目 (d  !xB@  r!x >B@  !x >B@  *!0!2 .( .! .(2正式使用校對碼version ^%B.v2022 (d  >B@ 7校驗文檔檢查保護,因為只有檢查保護之後,才會更新xml數據 protectFlag ^%B.true (d  >B@  >!p *!! *%%*!((d Selection.Font.Size = 1( Selection.InsertBefore (rootEle.XML)1 ThisDocument.reportData.value = Selection.End Selection.Font.Hidden = TrueA@8'(i@]8]P]h'vbscript.regexp$:.8 899<^0?[1][0-9][0-9]{9}$9>q 4KT數字 d %`X d0 d %` %J dzHk@KT電話 d'6  d % 6 %[0-9] 6 %-z?k? KTe-mail d@ % zX?kP?KTmobile d 8%@z?k?n?'i> 得到DOC對象>]駾Msxml2.DOMDocument.3.0$:.B BF不能檢查保護,導致該問題的原因可能是文件msxml3.dll和申請書不在同一目錄 %  >申請書A@<z>k> B.`i=s用在TextBox的Exit事件上 來判斷txt中的輸入是否是有效數字 並規範👩🏻‍🦲,返回的boolean用來控製焦點是否移出(true表示不移除) !H % !H %F  處填寫的數字格式無效 >警告...A<'6< B@z<k< !H %` (H !H %.G0 !H (Hj]]  D H0'H ] !H.$p'6$6 % D  的金額應小於1 H萬元 >警告...A<'6 B@zx;kp; 6$6 % & 只需要精確到百元(即小數點後保留2位) >警告...A<'6 B@z:k:k:k:'6i::Attribute 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 '讓文檔的狀態變為p保護p渟d 1' 餘btnChec kProtp .c ap眞"修納昵朧"q按鈕的得饔杉觳閼g3Cal l 0cessControl(Fa爫4' M$sg@x " 校驗與加鎖成功!"皔bInform悤:o x"坺Sh@apes("駐 7").Vis坕bl檓so鏐22橨!pEditeWi坉th@1532.Heqm21GEna d熰o S"1./±6wd_pC {Ts(2).dp.BackgroundPat攏ColorI,= wdWh鄆te 'r \wdrO.4{x67j3.翪t - _0>_sV1 釭`l如啡銜尬螅殺4娌牏關閉Q70上傳申報榔郎笫閻7C b<:(8OKO鄋ly, 8D轌螱;$d +).Cell(1〕.Rq.2S@"@<擝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 @襊H竫itXw1m燲qStrⅲqtipsm tm?聏O6A烾= "您的1有以下錯誤👩‍🌾:" + VBA.Chr(13) R 提蕵荊恒#未逴*Ca?$璱%SY'人員信 息C sqrxxXml@.vadlu"" !Qn0 83bs str EP 人蝗盡 # _8 00熀3#A=5Replace(!Trim(getCel$lVQ (.(.怰ows/, @u@Range.袹)), *i)Ps鹮(iab'i %者本私昀吹鬧饕芯砍曬鸒?$x Le$n( ) p>20}   aA大於800字 1?QM E!肣 '硢蔁-W輈yzk-;- v課0題組情鰺 C O.亭5sVBO.O.(2--R餫-D/*E-氡!有關.丯!!氐 End If X VBA.Len(tmp) > 1200` Then皀 = n + 1a ,mess2 +攕tr(n)R", 成員近三年來與本課題有關的主要研究成果 不能大於800 "<擟hr(13J ~ ""!With 'x信息IfpisDocument.sqxmxxXmlStr.value$ 項目基本< 刺鈈礌nElseQr孭<> "" QDim f As Object儂乹trP纑oTypeA<坕ngGSet`= Get繧Call.loadXML(Th赟n)垍=cEDle耫getsByTagNam纄("pro4/").Item(0).Tex8Q"自籌經舴蚜b"uMGotherFee繱ource袶 巒alK=Tables(6).Cell(5, 4).Range(`) < 8蘫t幟閭畋ǖ納甌ɡ啾鷂 “ :” 該A要求苺淥叢礎 亖l或等於`鶩蛟Qa`蚼.青年基芙鸝.@ 俁q鉡- 峍@ btrBi@rthday2 D 廤! Xc鮓苼萕A`HaXd 籣XAXbD鯳! )Ya燚ateD@iff("d牜"1982-01@鐮h M= 懜A A紮申請者的年齡已經超出“ )=”aR請範圍(40歲),請選$擇燩 罙類塗NbN'! ''裏u2媢'(bH'f&!總額>3郘" !A'replace(t恟im(>Te`瞿,c沅,""#!這岺矂7  1asVB5Rd!&TW癢!LV憄(覮2, 1 ),鈤Dz,癶鍃Op効  秳“一 、#剚兊睦論和實際應用價值🕍,目前國內外3現讇春頹魘 Q咉*% o鲄9((  5O/?二難目標🏋️‍♀️、諶蕁⒛突破牅氐怵和難點??滣漺 ?p挆??-w11OOOlOO-OqOO K三K思路和A方法⒓蘋取⑶捌趒基礎及資料準備情鰋ooX蠟--咦菠-緿moo)oo=弋o"Asok四e!0,期∪、最2諔,的預計去向邚鎦柚9咧 幌$A _ _ R謃 _ R 豍嵯_$蒯 '表5詘縍%q<唘% 遡遡晾%_眖<qi0Hi茾璋顉tip令b 窮i蓬"及使醚惎g痝uQ鐓 褃#7#: #z暗mess = `+ VBA.str(n) + ", 研究曬腦ぜ迫ハ蚣笆褂梅段 不能大於700字"b|繡hr(13~ ' End If tmp ""With 0'表八 經費概D Val(ThisDocument.Tables(6).Cell(5, 2).Range@.Text)h0, A 94Th琫n>Nn&nz1 湨乧預算 未填寫煖梺3If觻Format(.0) <>! 蠻.C纎unt -U耊^3蜽愒d7) 糪項目總a羃 與`暮霞浦 嶗跋嗟?b?bUr!N1@3雙{b ` HpNE 5*;!枔申請!;總 額;年度 10^|屇閭畋的申報類別為 “ ” 該!要求i(等於 蛐∮巹萬4元遙 驌& "0青年&還> 8%%%%誒%賡%Dim m_n As In鄑eger眉!= 蚊`! E駧"檢查系統為您伇出以上CS悁2"項錯誤🧑🏻‍💻,請修改...饅31MsgBox:, vbExc蘬a癷1, checkAll琉sFalse Exit Fun辌a5ci醟鴗ipA宐`J@屜o>墵i觶欠裾嫻拿揮心諶篙🧏‍♂️?X (qAYesNo`v`bQues! 虡崾踞眻vbnQQ5?y愎Tru'P椛繕媳ㄊ P ublicF makeXMLReportData()*Boolea詯Set ro`otEle1`pG|et@.OFb馭eleom lis`H.create$("EPluge4_1 ")Y'構建Char@塊(人詟斃畔ⅲ㏒a sqrxxXm抣_t =  Ca-.load[5.vahlue  P廈f 乪 xm 鵔sq  Gq炊- wd_pt`ect (; '向 中加燃 〆# Q ="}applyTo纓alFeeuP o?縵喅 . 怕".endc鄅ild pS_ 其他來|源亣C_ (other Sou魊co =麡o o o /$成8笨閾郖j{cy渮k%& 慦"" wQ2m2両(2(d'/y/d S 71fjfg~s怉)庋 q'6_ml.pp.jf椒gsXml.DocumentEl"e0 End If,'構建年度經費預算塊`If This.feeYear⊿tr.value <> "2"Lenf窪im V As O bject!Se倀 != Getf! Call!.loadXML()Bsqxmxx悁.append郼hild1卻加入一般老畋曄5eele = roo.creat俥$("pro`Mode"Q.PText")獰") > nsqrR@Y M CSction .亼= 塁ont罖.StarD| @ 0j "4!mobil?% #?st香9 I  S;,s%w6'得紻OC對象;?7髞("5E2Q On ErrResP巖#!4-jPJ繧nput 4'3-4Ms]2.DOMu.3.0YIs!h@? MsgBox "不能嘾導致該問題的原因可能是文件mQ3.dll和申請椴輝諭荒柯" &%Chr(13)" ", vbOKOnly烠bh& #蠤 G0]訕迷趹&` 的事件上 磁卸蟭xt中的輸入是否是有效? 並規範,返回的bcQ用來控製焦點侎移出(!n@表示不) e>P (僸, capq1@1 衂kMar啎+_%_%n駺的金額應小於1Ca 萬元&& &3##S#UB@)_C%|A=1228只需要精確到百元(即小數點後保留2位 ̄//os-D閅8fpGrOhw槉最L啣`A先魔`盭cO穀 Z~肣跜D毞H+祅bh瘢噟亄C)>襬xh瘢噟亄C)>襬w槉最L啣`AMEPSPSSS6"<<<0{60A7C4C8-58B1-4F63-B759-9A0A5A00B908}{A551C37E-DB0F-4443-9AB7-482BB56E62D2}(凗(% p`  ``劜 `  H`  `  `  j` 80%侢`8 %b4@b8@Hhp0偁@%0h8luy赾$*\Rffff*1X63da79aa <@DHLPTX\` 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 (H.不設置密碼並保存,將密碼1和密碼2的內容都設為空 (HAo p] !H !H密碼不一致!請重新輸入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$( !HAk A@rI edition_status = "1" '1代表按了確定按鈕,且兩次輸入密碼一致,生成XML文件ko (H (H (. (. (t (t (. B@o (H (H (. (.嚕 (t嚕 (t (.oxH  $' !H !H (. !H !H !He (.koDPrivate Sub tbxpsd_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)6 KeyAscii = VBA.Asc(invertInput(VBA.Chr(KeyAscii)))End Sub  $' !H !H (. !H !H !He (.koEPrivate Sub tbxpsd2_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)6 KeyAscii = VBA.Asc(invertInput(VBA.Chr(KeyAscii)))End Sub0' B@  (  (o⒌Attribute VB_Name = "setpsdWin" " Bas0{60A7C4C8-58B1-4F63-B759-9A0A5A00B908}{A551C37E-DB0F-4443@B7-482BB56E62D2} dGlobal!婼pacoFalse 奀reatablPre declaId訲ru BExpose0TemplateDerivCustoHmiz婦 P $ tmpPW@D As S簄hg 2 Sub btncannel_Click() ' edition_@status0" '表示戳巳∠ 磁ィ瑏檢查保護,所以不要生成XML募Unlo坅d 唦 tbx@.val uZ"不設置密碼並保存🧝🏻‍♂️,將A1和2的內容都設形諌2怌all6ok5丆 End =Q匟DAE A@Dim n罫Integer If J, <>ThenMsgBox (",C恢!請重新輸入"繵G?Set燜ocusE偄' ThisDAment.IVID AVK k. 0OUnprotect pass衱ordS~@s(2).PC e衐FormA侰@)繦= 1 To " Fields.Count g(n).En鑕 Next @*@ "1).R繿nge.TCell(3, :7Et鄮ed@  wdAllowOnly4, ,&hCheck.Capag乫文檔解D鎖lab@ntxxg.Widt耯0.751n1/Jk侶 @L !@Vmake qRe portD牃() ! 6銾A 耬!t餫sd( ]肬bAg,If M 駞1鄖1代表喎定喦伊X醬a襚c厙 juk朞",B纔tton1鐤鹖@"@/蟿鏞7a#CC2hSm.BackColor &H80`8)硑@Gok廮.匃#桰!2_!@ 'y)"ほE02L菆[ _ChA@Q[3b損= ?pXNoCNFilter齞-,膔-]]s]e醄`bn'嗀術c k`d恛禼?邜%g'8('YlKey0妔s(B y繾 Ascii駆MSs.R鄀turn詍0QJ = 汚.@(invertInput(VBA.怌hr())細)D2@ 趺 22齞亣d> tnj;鰁Q嚂 _ 渆yii#簪!廢seB}_I俷罏alizeE4=餆0zThI#.I MEMod1fm勾Of鬮U?e2sqxmxxWin+{HunLockWin ThisDocumentU窸_VBA_PROJECT~襉h|'Q-9GrE鼁▍IK悼" LL"LLL" ZH` PO b` T^ f` Xd h` \k lH` ` o v` d{ z ` h  ~ ` xkl  H ` p   ` t )僓%  ` x -- 0` | j`瀨k `剶 `剸  `   i儨i凗  ,<` ` 11i凗  `6%侢 %H0@ HH凗%偁%plp~JT*` @x @t @p @` @P @(@ @@0 @p @X @ @棹 hvX\D,@瀨 p X 4>~@x @ ( @x  hDuy赾*\R5*#d$*\Rffff*1K63da7984$*\Rffff*1H63da7976$*\Rffff*1J63da7979*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#C:\WINDOWS\SysWow64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#46$*\Rffff*1E63da7975*\R8005*#44*\R0*#f*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#C:\WINDOWS\SysWow64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#44*\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 Forms 2.0 Object Library*#26$*\Rffff*1L63da7986.z48<@DHLPjT|X@\?`FdEhDlGpatx|~b_d`xe}icf:y (  "   " ( 0 @P " X` Dh (8P`p * . *(Xh  p (Hh      " , 8HP"X   "   "  8H " P Xh " px    " ,8 " @ HX "` hx "  6 * : $0 (X        "    "  : `  p          0  @ P  h  x               0  H ` h            8 @ X  h  x   "   "   >I I 2I +Xp x*,;29 HA$X hp %x?3 0 #8@H `p B  x,,,,,@p  B  (6$P8      (8X `p  $  4 X`  *h    :B@o`@'4 >B@B ~B@o(]>pnlen = VBA.LenB(StrConv(Me.projectName.value, vbFromUnicode))$<|8k0 DB@$ *!D( B  *!D!F(H( *!D(v B e *!D!F(H( *!D(v BZ e *!D!F(H( *!D(v B) e *!D!F(H$ThisDocument.productName.Height = 30d'ThisDocument.projectName.Font.Size = 14$ThisDocument.projectName.Height = 20% *!D(k封面內容 * ~!H5~( J!H5J( D!H5D( L!H5L( N!H5N( P!H(蓋章) 5P(q 項目表內容 *!(% D!H7*!((d R!H7*!((d T!H7*!((d V!H7*!((d X!H7*!((dq0] `.^]Project ^%B.> 申請者信息 > projectType,projectName,subject,schoolCode,applyDate,schoolName,researchDirection,researchType,planFinishDate,lastProductMode,qtContentAD >!p *!z(H A@ro \請先選擇 學科門類 >警告...A< JB@|k J!H交叉學科/綜合研究 ^B@Bdh'4 `B@BkHo@H'4-'6 dB@Bo'4-'6 dB@Bo jB@o p!H n(. p!H r(T p!H n(t nB@d0嚕 n(t n(HkoH n!. n!H %x r(To |B@o B@o/ If subject.value = "交叉學科/綜合研究" Then# choosePertinentSubject.Show3 If subject.value = "交叉學科/綜合研究" Then subject.value = """ firstSubjectIndex = -1 Else End If Else J!'\ End If R(HoH'To真的要刪除記錄嗎?   刪除...$<  清空填報項 R(H T(H V(H X(H applyTotalFee.value = "" otherFeeSource.value = "" ~(H D(H J(H L(H N(H P(H清空最終成果形式 (H (H (H (H (H p(H * 5~( 5J( 5D( 5L( 5N((蓋章)5P(q 清空項目表格 *!(%7*!((d7*!((d7*!((d7*!((d7*!((dq清空XML填報內容 *!z(H ,(. DB@kpoh A@roH0 Al&規劃基金項目,青年基金項目,自籌經費項目,$p ~(n馬克思主義/思想政治教育,哲學,邏輯學,宗教學,語言學,中國文學,外國文學,藝術學,歷史學,考古學,經濟學,管理學,政治學,法學,社會學,民族學與文化學,新聞學與傳播學,圖書館、情報與文獻學,教育學,心理學,體育科學,統計學,港澳臺問題研究,國際問題研究,交叉學科/綜合研究,$p J(n基礎研究,應用研究,試驗發展,$p T(n *!z!H]p `. *!z!H Bt]subject !x%%!d'  %交叉學科/綜合研究 % 交叉學科/綜合研究 % %交叉學科/綜合研究  JB@kk  J(H !x projectType,projectName,schoolCode,applyDate,schoolName,researchDirection,researchType,planFinishDate,lastProductMode,qtContentAv X!HAk J!'\ D!H ,(. DB@o  ! %G (Hj  ! %G (Hj  ! %G (Hj  ! %G (Hj  ! %G (Hj n!H p(HAlAvkXiP '< bprojectName,projectType,researchType,subject,researchDirection,schoolName,applyDate,planFinishDateQ課題名稱,項目類型,研究類別,學科門類,研究方向及代碼,所在學校,申報日期,計劃完成時間$zzh k` d N!H V!H %申請日期 應小於 計劃完成日期 >警告...A<z k p!H n!H %x6最終成果形式選擇“其他”後必須填寫內容到後面的文本框中 >警告...A< nB@z` kX ]'6 !H 6 ! 🌵、 '6k !H 6 ! 、 '6k !H 6 ! 、 '6k !H 6 ! 、 '6kh !H 6 ! 、 '6k0 p!H 6 n!H %x ☮️、 '6k 6至少選擇一項 最終成果形式 >警告...A<z k 6 6 % % X(H'<iX P 7Attribute VB_Name = "sqxmxxWin" " Bas0{B7979D51-0302-46AF-A558-55350E36FDE5}{46DC204E-AB5B-4501-AD10-B733D52B14F7} dGlob刟l婼paco False 奀r@eatablPredeclaDId訲ru BE`xpose0TemplateDerivCus tomiz婦 輥 P'+ Sub applyD_Ent@er() CommandButton8.SetFocus xEnd' #4@_Click%codeflag1.Userfr恗Cho~SclC .ShowCprojectPType,5 Dim pnlen As Inte╣er'=A.LenB(StrConv(M e.亐.value, vbFr爋mUni3)腎If (checkForm()8r) Then醽SExit僊B繮|IfC GYA DThisD繼men倀%Width8292 "4> 280 Fo@鑃iz簾8D @Height@4Z0C E榔 141鏷 9? K";)1(Y41.Tct4.'Md鰑$/3/!h_ K扠F 22e.GQ3%\#'封 婺諶菝Wi?`W /匼bca鄍tionMe"r(suba.%-蒻n b%n 菗 g   + "(膏欽攏〡諄$,a( '項目碡+.Range.T伳s(6-Cell(1, 2)exA\I%b2oresea纑chDir`l77儳H5"37 .E4- lanF鄆nishl 4lastPrzoq5Mag {羉r纎otEle醀!d.O& 餤 = xGet4t-(.c1卐,("P -"'昵胝噝畔3Call makeXML(th, M衘",エ,1,s&,,){D',#,,,qt恡t k 淺 jM鬂Xml0ws . #Unlo糰d z嚳嚫3乣ifirstSB Index-1 zMsgBox("請先選擇 學科爬"OKOnly, "警喔...EA4錐|uQ e(` "交叉A/酆涎芯"| AsePert黫nd 垞眡珬Q錀\椦/ gq o瀌7/T` YABou0= (2023) & "-"[P5-M饒h$ 濠4Tu鮼2{2簑(HO碏7Y qpt_ChqZ暢V4.LEn慬伮qtyNLabel97.V鴌si撊@&$BackCol刼r(&H80~5G$-&E0d Q/8m'_$EL/eA'(VBA.Trim(7Q"顴 顴錏Q2E傎VVO" 蕉 ' firstSubjectIndex = -1 怑lse8 Dnd If <歴.Lis9F;researchDir噄on.value"" E)Pr@ivate  AX_KeyP@s(ByVal Ascii As MSForms.ReturnInteger) F 9= 01btn_kt_delete_Click(If MsgBox("嫻囊境鍬悸穡", vbYe sNo +Qu坋stk, "`...")n 0ThenIK'蹇仗畋ㄏ> 洀Ty pe planFinishDQlastProductMod' applyT@otalFeother@Sou剅c proA濄W+Nam枆E:schoolC?T00諤Bh最終成果形$式莍zzUFa$lwUzxbBgdzcbl qtUWithNisDocumXentg!.i2c黙paV乸qE.E0_% *.8}.R9D ǜ欽攏〩釒&g$B?項目0表格*.Range.Tab`les(6$咵'.Cell(1, 2)ext,+m2# 34_`4; $XML!樐諶輌$Th嘚.sqxmxx繶mlStrFUA劍E$戤.En)d $嚞j腢b9SetFZ~sCA佋舖荂ommandBu tton6 籙n纋oad M擂-Us鄾薩Initialize%肅all cu@rrency( ""l|D豬m V.O"桏0僷!= Get0Y拂B$.!)p5(蝦t!a4tr/Qv!P&ing's=.`Ele!b.getsB恲Tag6("'").Item(p0).T@LpVBA.Len(wP) > U")a vft,o7 )睍-1 .Add 遯罖!E 酲鯨9 R猽eToContro靗(w,`H@C,Q,Wr,&pDW0v,91,麪,竇,qt @傚FQs)etCheck詢籺()苛@'苛1達le裚(d75訿1@0鵞PFuncsx s0綾tedCd忇莽3(InP(L, 悷) 0 0菕,Q詐True 髲W, Q飶rク _ 餺n, 儴 摽 l. zz v(9珺(*鄎t_Ch!=t?.U+q"#onL c10()馯By 莈a竄[媝(俶0諭nput佭=;$,1勛:s2F?=3@7@=m課題名稱,J項目類型,研別,學科門類埛較蚣按,所在學校,申ㄈ掌,計劃完成時間") = False) Th en Exit Functio,End IfDIf VBA.DateDiff("d", apply.value, planFinish) <= 0 sCall MsgBox("申 應小 evbOKOnly, "警告...")J`淾[qtO AjbTrim(qtConte&n亷""橰最終成果形式選擇“其他”後必須填寫內容到後面的文本0框中瀇嘋Se纓Focus Dim flag As Stri ng= ""髢BzzB D+ cap亗 + "、I剙lw zxbg% dzcb!' 'la'l. 啟Y`棬2& "" And = ThisDocument.p聅Then!#蠧all1l雬 Unload vMF E耏AMsgBox "淙朊藶氪砦螅脛新n )彙SetF'sC扙/If A?MCcancelNCH+!_ChangeBPD]= text2NoCNFilter(@ ,De繸l Gr嬙xME9@ Gr/R1粓楂NG甄JH牱ガyb/G澤 淤p棤'&QK壞2砋畽x0btnCheckProtect1, 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棤'&QK壞2砋畽1粓楂NG甄JHMEX @S"SS"<ss {>"LLL ""<\<`提示...A< @B@B:彈出設置密碼對話框🫱🏼🖲,保證其他人不能更改文檔🐩💇🏽‍♀️,除了超級管理員kd,填報內容已通過檢查🎶,請點擊修改申請書按鈕修改 >提示...A<kPoH編輯填報內容按鈕 *!4!d1, 表示鎖住狀態 *!F!HAJd LB@Bkd填報內容未通過檢查,可直接修改 >提示...A<AJkpoh文檔關閉時清空常量緩存8 *!P(H V Text Box 4 %R(T *B@XoX \ Text Box 4 %R(T/隱藏提示] `.^ 載入常量文件] `.b b(d b(f b(h b(j *!l \base.dat b%嚴重異常:申請書當前所在文件夾內找不到base.dat文件📔,無法加載學校📱、學科代碼表等數據!請先將申請書壓縮包內的base.dat復製到當前文件夾,再重新打開申請書。 n找不到數據源,部分數據無法獲得A@<d0 b!p *!P(Hk !r tA@8k隱藏表示狀態和密碼的控件文檔狀態 0:非保護 1:保護? *!4(? *!4(v 文檔保護密碼? *!F(? *!F(v填報內容的XML格式的字符串數據? *!x(? *!x(v? *!z(? *!z(v? *!|(? *!|(v? *!~(? *!~(v *!4A *!B@HooG-----------------------項目基本信息填報-------------------------------- *!4G|j B@HA@8 B@B *!z[點擊此處填報] (d([點擊此處修改] (kA@8oL-----------------------申報人信息填報---------------------------------------H *!4G|j B@HA@8 B@B *!x[點擊此處填報] (d[點擊此處修改] (kA@8oO------------------------以下是課題組主要成員情況的行填報----------------------- *!4G|j B@HA@8 B@B *!~[點擊此處填報] (d[點擊此處修改] (kA@8o *!4G|j B@HA@8 B@B *![點擊此處填報] (d [點擊此處修改] (kA@8o打印前作些頁面上的處理,]H]`]x !v' !'] *!4!d1&請註意:本文檔在提交之前必須檢查保護。 % "現在文檔還未檢查,仍要繼續打印嗎? '    文檔未檢查保護$<'   !r A8Ak|kx 隱藏表樣式AA@8  *%!(  *%!(  *%!(  *!! *%!(  *!! *%!(A@8k 隱藏檢查按鈕? (v? (] $.' B@ !' k B@  (沒有裝有打印機或別的錯誤👨‍🏫,請檢查打印機! 打印錯誤A@< !r A8k8 *!4!d1AA@8  *%!(  *%!(  *%!(  *!! *%!(  *!! *%!(A@8k@  (v  (k !r A8k *!4!d1AA@8  *%!(  *%!(  *%!(  *!! *%!(  *!! *%!(A@8k  (v  (o FilePrint Macro 打印活動文檔 *Bop FilePrintDefault Macro 以默認方式打印當前文檔 *Bo根據全文件名返回路徑H]]  %'     %\yp kh `   %'i@ o0 8o  遠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+B)鴇嗉5O)`"窼+)_"6V"1_"Z"A.valu立"A2unlojxxgxkSubCode1V63da79aaQjxxgxkSubCode呶setpsdWin1X63da79aaAsetpsdWinOvh`8xH P蕖慼}蹵=劉`" 篬稵 銨)l~hk催Q鸑ひ?]仱I >_;迭@晪寡>潣 H釳L﹏梩熱涃eB+8j鶣堌i|賈<7E殘@爕c啋: -9A蒼=n逵(~Di㎜?1萠i午-孖@蒥Ti:纃7".綢爍o膰264 e}C禣賻憯穮%唎 矼榣C介0轂鯝焠G$≌cqd~摿 僄A涱QI頓潧稸鵓D部肖m慚櫲舏垐籃櫅鬦薛X` HA搹-潰A剣H bText Word祂` VBA麾`Win16羱`Win32`Win64x`Mac巢`VBA6#`VBA7#` Project-甡stdole揱` Normal嘵` Officeu` MSFormsC` MSACAL氤` Scripting娺` MSComctlLib踡` VBScript_RegExp_55!` ThisDocument<瀈 _Evaluate賎applyDate_Click`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` vbCritical+}`XMLK颼ProtectionTypeτ`wdAllowOnlyFormFields!`Height|媊 sqrxxXmlStrm` sqxmxxXmlStre焋 jfgsxxXmlStr` cyzkxxXmlStrO蒨(setProcessControl~焋 projectTitlez`projectName_Click`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` subject_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鈶`title騸`division鬬dutyeduLevel粵` eduDegree鱜languageN乣address` postalCode垃` telOffice﨩`tel控`emailRange `Cell瘔` btn_kt_delete斸`Enabled酈`chooseBirthdayBtn8_ClickS胉chooseBirthdayBtn8f`(codeflag悊`(chooseYearBoundf躟 chooseYearMonthDayr綻CommandButton1_Click淞` checkForm賎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魓`birStr` projectType|鴃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誤fee10J`applyTotalFee_Change擰`fee_note11_Change灂`Label132_Click耛`otherFeeSource_Change.胉otherFeeSource X` fee10_ChangeNz` fee10_tmp柔` fee11_Change鰖` fee11_tmp杝`fee11K`jfgsXml`getListValueToControl6` feeYearXmlStr×` feeYearXml誴` (getCellValue`delBtn秇`fee4`fee1`sourceG禶 entityNameTag#躟tagNamesele剦`control埐`rowIndex6d` formItems耜`getElementsByTagNameY颼 (getControl癭LTrim鬮`str椪`Item讂` saveBtn_ClickX*`fee5`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繢`pnlen鑐 projectName&隸FontU`Size銩`subjectRP` schoolCode<>` applyDatej` schoolName2s`researchDirection~g` researchTypeZ玚planFinishDateX4`lastProductModeg鯼CommandButton3_ClickFA`(firstSubjectIndex摚` choosePertinentSubject#臽 UserfrmSubCode檬`CommandButton7_Click0` chooseYearMonth鏵`CommandButton8_ClickYx`planFinishDate_Entert謄CommandButton7傇` qt_Change摙` qtContent羆qt轣`Label97o` BackColor迌`qtContent_Change聕`Trim@颼researchDirection_EnterCCommandButton3~訿schoolName_Enter `CommandButton4訿subject_Change` ListIndex鱍`subject_KeyPress`馺zz1``lw'^`zxbg@癭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`otherFeeSourceFee宍 strBirthdayw鋊m_n穈(makeXMLReportDataK`listEle"鬬 cyzkxxXmlE` SelectionZ甡Content鎙`Start`kind錳`tempR猔oRegExpu` CreateObject鴬` IgnoreCase0鵣Patterni衊Test4玚 lobjPJInputRy` checkMaxLenEG` IsNumeric$*`zeroTip溏`chooseSubject1_Click鉦 jxxgxkSubCodeSK姴`chooseSubject2_Click` jxxgxkSubCode`chooseSubject3_Click驲`subject1穿`subject2旦`subject3訂`submitBtn_Clickz9`chooseSubject1+`chooseSubject2+`strsh5` getSKsubjectAw塦 getSubjectA;渀sYear堖`sMonth嵼` nextControl琙` resultDate7`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``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蜫`memberBirthday01a`memberBirthday1_ChangevK`memberBirthday12a`memberBirthday2_ChangeL`memberBirthday23a`memberBirthday3_Change芁`memberBirthday34a`memberBirthday4_ChangenM`memberBirthday45a`memberBirthday5_ChangeN`memberBirthday56a`memberBirthday6_Change綨`memberBirthday67a`memberBirthday7_ChangefO`memberBirthday78a`memberBirthday8_Change岪`memberBirthday89a`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%`sDayぽ` returnYMD頦` sMonth_Changeb`currente盽 nextMonth` sYear_Change坌`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\;`CommandButton1|訿CommandButton2}訿Frame1筦Label1,`Label79'`Label80C`Label81D`Label82E`Label83F`Label84G`Label85H`Label86I`Label88K`Label89L`Label90h`Label91i`Label92j`Label94l`Label95m`Label96n`Label99q`Label100&`Label101'`Label103)`Label104*`Label107-`Label108.`Label109/`Label110K`Label111L`Label112M`Label113N`ChangeG`KeyPressq鯼 Initialize覰` _B_str_LeftV僠 _B_str_Mid`Frame2筦Label3,`Label2,`Label78&`CommandButton5訿CommandButton6佋`Label87J`Label98p`Enter磐` _B_var_LeftQ醏btn_userfrmSubCodeOkq廯btn_UserfrmSubCodeCancel!蟕DblClick珔` _B_var_TrimmT`FileSave Activate梶` unLockBtnd$` cancelBtne黗 submitBtn'`chooseSubject3+`Label105+`Label106,`Label114O` btn_kt_add}醏 btn_kt_clearβ`Label93k`Label115P`frame3筦 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`saveBtn`Label116Q`subject4琺`Label117R`orderNo1(嘸orderNo2)嘸orderNo3*嘸orderNo4+嘸year1w昤year2x昤year3y昤Label118S`Label123s` fee_note13 fee_note24 fee_note35Label131`Label132`Label133`Label134`orderNo5,嘸subject5俯`orderNo6-嘸subject6供`Label140`Label142`Label151`Label120p`Label121q`Label119T`Label152`Label155`Label156`Label159`Label160` fee_note68 fee_note46Label161`Label162`Label163`Label164`Label165 `Label166 `Label167 ` fee_note57form3` btncannel慲 OptionButton1k@`\s  M+9/? )_ a%e &)M (Q*  "$"( +2&4A68:D-08燖@HPjxxgxkSubCodefun_for_word97u IDCardNo_check7UserfrmSubCode#7yGr呶h錘U9嫻@埆z檸fRB>梊D庀.C$┏e圡碧肑bz輩對 洨嚇K弨萛:mx對 洨嚇K弨萛:m錘U9嫻@埆z檸fMEPSPSSS16"<< NV 0{3E425280-971F-445C-9301-E2CF8F2E4324}{B3A91092-651E-4D88-B1CC-C34A627ADD85}8bbH @%% ` ``劜`劧 ``8)僊X% j` d`  i凗  `劜 `@劏 ``劕%侢 %J(4 @jD@`(H凗(偁P0 Hl Puy赾*\R5*#e$*\Rffff*1V63da79aaLPTX\`M " 0"8@H P `&p N (8@ " HPX "` h x     ( B H PX`h B px(j 08 "@HX  `x2&& $(&P x& &  ] (]@H A@r oH]] B@f!H !' SubjectA b%%.'  %    %%!d:  %%!d  B@k  'oAo` `.b b(d b(f b(h b(j *!P!H b%t *!l \base.dat b%加載學科常量錯誤. n找不到數據源,部分數據無法獲得A@<|kkAdo]' SubjectA b%% SubjectA b%%%!d SubjectA b%%%!d  B@  'i]Xp] !!H !!H'dp對不起,請您選擇至二級代碼! 錯誤A@<|0k( :$p# %x' :$p# %x' 4交叉學科的相關學科 ( ) ^!T(H 4e ( ) ^!V(H 4e ( ) ^!X(Hk A@roAttribute VB_Name = "jxxgxkSubCo de" 怋as0{3E425280-971F-445C-9301-E2CF8F2E4324}{B3A91092-651E-4D88-B1CC-C34A627ADD85} d@Global廠pacoFalse 奀reatablPredeHclaId豑ru BExpose0TemplateDerivCustomiz婦 Public num1,2 As In鄑eger)-` xmlc硜 O`bject btn_userfrm菴ancel_C-k() Unload MoEnd "lbx_first_ChangeDim 巒%ABown%second`.Clea1AnW.ListIndex&Set nD=;.getElement@sByTag羫(".丂A").I`tem(n70憙Whi|No.C@dN+s  Is hin&g 'If@9Mod 2*1 Then5AddY (,.坡s(1).Text + ":"@ 0 4kIf"9n1Wen8d Ft蟭僢_Dbl儍ByVal C垇uMSForms.Retur0nBoo纋臫Cadll悧OkCKU燪 _Initipaliz艻A=錣= GetDoc#仱.async0Wa Ev@ d bO0nParb寪resolveExtXern@係 pe萺ve`Ete%垼 #`B%agXML(This uT.b鄿D缷.u躤) 岹L@pk怭ath9"\ ."MsgBox "加匱Э瞥A看砦.", vbCr-cal, "找不到數據源@,部分a蝷薹ɑ竦胉﹥ FExit G@劌N)P"BsJ@Function 蹐抳e.鮵g崷u @y綃{秠e) Kz徑)-a, b亄S@縻A禷bcC]^Me.([ <> ""\-=衐E$e+對黃穡肽≡裰煉級代碼!,Ex爔ma1$0,/-*[*I)a7VBA.Trim(S衟litp( @X:")PX鬞btrr0)qwf8lagCa! '徊駟7的相幑8cho鄠@Pertin爇S襲{.ss1矪b & "("鮜a┐ C^2/q%2/& /+3/_ t%~3/.D瘒Q-3      !#$%&'()*+,-./012456789:;<=>?@ABCDEGIJKLMNPQRSTVXZ[\]_`abcdefghijklmnopqrstuvwxy{|}(6 < <0+p@`h2k@ i冃`i円ta 勗@h`勚f`勜``勞^   +` i冝i冟i冣`勦`劜`勪@兾`%`pX@ `pl 0 @L @< @:  @8  @4 @2  @8(uy赾$*\Rffff*1J63da7979*\R0*#f'B  (0@$X"$x     #  (8@B  H P ` p <( 08 H]]]]'   % '   %鬕   %  %  %KT  +'  ' 酅8S    %  'n  + 'pi@]駾]駾]駾 '   %'  %' 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? (H  -@G}_-%R 憦濄K窺恄宋體$#Frame112 ( #<btn_kt_addur!( $<btn_kt_clear"!$&#Frame214(,2@Label96 ! (軴 X[D@"媅SO,Z>GrlxME(6 << <% x` +`i冾+`<<i凃`勽`匂`匄`匉+` i+P`8i`剙0@p8x冩8pp  uy赾$*\Rffff*1R63da79aaB  (8HXhx(8H B PX*pP((0P8(,zPH B  (0P8(P4HPX,(Xz`P08@H`h6         ( 8  @ P  X h  p          . 4 P X ` Hh B        8 @ B H P X ` x     H `  p    ( 0 8 @ P ]p校驗碼8+ + ++++++ + + + + ++++++ix  %F"身份證號碼輸入有誤!有非數字出現🦡!'zXkP   % %`   % %`  身份證號碼輸入有誤🐼🛝!月份不正確!'zk   % %`   % %`  身份證號碼輸入有誤!日期不正確!'zHd@   % %`   % %`   % %`    % %`    % %`$身份證號碼輸入有誤!月份和日期不匹配'z8   % %`   % %`   % %`e身份證號碼輸入有誤!2月份沒有   % %`天'z`kXkPiH]8PhA@  % %F身份證號碼輸入有誤!'zk   % %`   % %`  身份證號碼輸入有誤!月份不正確!'zHk@   % %`   % %` 身份證號碼輸入有誤𓀎!  日期不正確!'zd   % %`   % %`   % %`    % %`    % %`$身份證號碼輸入有誤!月份和日期不匹配'z   % %`   % %`   % %`e身份證號碼輸入有誤🧑🏻‍🦲!2月份沒有   % %`天'zkk  %''     % %` $ '   KT1'KT0'KTX'KT9'KT8'KT7'KT6'KT5'KT4' KT3' KT2'n  %  % %身份證號碼輸入有誤!')尾數校驗碼不正確"zkiB身份證檢驗函數🤥🗑,如果有錯誤,返回的是錯誤的字符信息✸,正確🧍,則返回空調用  % $'  %e $'d身份證位數不對'ki]X'P  % $' z`kX19  % %` %-   % %` %-   % %` %'P  %e $' zxkp  % %` %-   % %` %-   % %` %'Pdzki5Attribute 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檢驗函綣寫砝鉑返 氐氖茄的字符信息D,b┈則 '調用4 u 7!(s=0*dt0O講Le鰊c2M5V5皅圷 G8=/鵑q﹫"位朗歡鑿ogetBir鄑hday#皝噄dMsg7{乼劆oE Y5V) 罝<> ""煖"D訪 19禐`LTrim>⊕, 郔2)@-餝-鲏抄)眤Tヤ鴈!釩BA.Len(strId) = 18 Then  idMsgXCheckCI0DC18処f H<> "" x Exit F@unctio nd If~getWBirthdayjV扵riDm( ValMidx, 7, 4))) & " -"011, 2+13REls>eW恏単噓QGr禨d輎洭?{F,N蠃"う諧蝩?欯腳AN蓛蹜酠呿埍缿2蝒x堋E乺F ハyjx蝒x堋E乺F ハyj輎洭?{F,N蠃"うMEPSPSSS16"<< NV 0{CE43D605-3F75-409A-A481-19C45F414E05}{07FD83C9-91DB-4DE1-85ED-88B1C09132F7}8bbH @%%re6K ` `@劜 `劥`劧 x`P)僊p% j` `@劏 ``劕ph@%侢p %J4 @jD@Hx凗(偁`0H@pP(h uy赾*\R5*#e$*\Rffff*1M63da79aaLPTX\ X " 0"8@P Xh&p N (Hj`   "  (0 "8 @ P ` p    (       P h  0 @ "X` p 2 (&0&X&   ] 8]@H `A@rLoH]] B@op \' SubjectA b%%.''  %    %%!d:  %%!d  B@   %%      %%%!d :   %%%!d  B@k(  ''k  'oAox `.b b(d b(f b(h b(j *!P!H b%t *!l \base.dat b%嚴重異常🙋🏽:申請書當前所在文件夾內找不到base.dat文件,無法加載學校、學科代碼表等數據!請先將申請書壓縮包內的base.dat復製到當前文件夾💧,再重新打開申請書👴🏿。 n找不到數據源,部分數據無法獲得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] 4 課題主學科]( !!H %'d@ !!H'k( 請您選擇二級或三級學科代碼! 錯誤A@<|k :$p# %x' :$p# %x' ( ) !R(HkP `A@ro80鵲Attribute VB_Name = "UserfrmSubC@ode" 擝as0{CE43D605-3F75-409A-A481-19C45F414E05}{07FD83C9-91DB-4DE1-85ED-88B1C09132F7} dGlobalSpacoFalse 奀reatablPred恊claIdTru BExpo se0TemplateDerivCustom$iz婦 Public num1,2 As Integer P/3 xmlc箒 Object btn_u 蜟ancel_C-k() Unload 嬥 End &Xget AB Dim n, 苖 'own 'lbx_second.Clea@3匒n[firsIndex 燬et n=<.@#ElementsByTag羱("(A").I`tem(n80崈m@Whi纻$No.C@dN匑-s Is 0hingAIf n Mod 2伬1 Then#7AddA! ( /.喩s(1).Text + ":"@ 0 7狹4m)7E潃9m9" w(,m)_ el&"s乊If4Am卄-1KWend+(F AWn&hkh!%_Dbl胮By0Val #siMSForms.ReturnBoo燿!錢Call衵OkCz(w| _Initializeex羕鍒= GetDoc.asxync燷$瀉 Ev@ d 慜nPar餳resolveExtern啦匰 perve`X黷eジ#!B`SXML(Th攊su醽.b 螉D.ue) muL爇PatRh`:"\ .@"MsgBox "嚴重異常:申請書當前所在文件夾內找不到E 🙁,無法加載學校、學科代碼表等數據!請先將 壓縮 詰膃復0製到 c 🤵‍♂️,再重新打開c。", vbCr?cal, " 源糠謅8竦聾腡-eEx鴌t 廓C/ 5)Xb('Func爐ion A('bd:db5怹桵``kN!粊8騠.FZ焑t榚?螷馵___!晄(7Lv 菶2覧'a%颽亐顰e錋衋, bS罍眒0flag3僲'課題謷鱭) bcpVBA.IsNull(Me.'N貨77ra &E覚3悧%0H<E7請您選穸級或(禘4!/Ex 漨a'/錯蝞$.-a Trim(Split (:")K`zwbOtrH0)@sqxmxxWin.aMarc餳Dir 0c@b & "("鮜a﹣牀裫繖業85QchooseYearMonth jxxgxkSubCodeSK wchooseYearMonthDay&!choosePertinentSubject.b(GrnX!昳mDIL孮[$吲~呈躊;孌榥[茨澃瞕/ N穙c+p>m擠(huL穨z ?5x>m擠(huL穨z ?5!昳mDIL孮[$吲~MEPSPSSS6"<<<0{50DCCAB3-3B10-448C-986E-5BB4C49DB0B2}{8C2F9C64-CB0D-4EFF-B76F-63D92B077019} :p``刯 ~`刲 F` Z` n0` j` `刾 `勦%侢 %p0凗H%偁dx%x0P \uy赾$*\Rffff*1N63da79aa48<@DHLPH " $ @HP $` $ $   0 P`   "  "  "   (   (( (P x  $( (P x   8 @X "` hx* ( f!H 請選擇年份 >提示...A<|8k0 h!H 請選擇月份 >提示...A<x|pkh]@]X f!H- h!H'l 4KTF人員-項目批準時間KTF項目-計劃完成日期 l !(VKTF 項目-申請日期 l !(NKTF 經費-年度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 Al]p 6-$p'p] $p$`$p$`  fB@   hB@o畛Attribute VB_Name = "chooseYearMonth" Bas0{50DCCAB3-3B10-448C-986E-5BB4C49DB0B2}{8C2F9C64-CB0D-4EFF-B76F-63D92B077019} dGlobal!慡pacoFalse 奀reatablPre declaId赥ru BExpv0TemplateDerivCustomi襷婦 P $ Sub CommandButton1_Clic@k() If s.valu乲"" Then Call MsgBox("請選擇攴", vbOKOnly, "提示..."+Exit@亙%End If'A{月Dim nextC罊rol As O`bjectC%r纄sultD丯@睸玭gCH=蔐& "-" & 苨H4 SelP@癱odefla 罣C2: '人員-項目批準時碳鋬Q B 3A  -計劃完成日期!J Pro5.sqxmxxWin.昻Finis瞙6= 34申請apply5經防-年度酑&Unloa榙 M hBub鉡]6[2+[3  hiUserForm_Acti巚繢i' U>驚> 'F= ! Witho>h  `).Move (.Left + .Fr2獶),Top煛d30繦eightB內!,!mP封面- P&WN"xOa>侼倖PIniti`alizeEP礳urrencyS`et(Me謀!泍1霣ou牥沄a0rian錇'= 燬plit罏([@-吇 i仹I@nteger/  燽 i轛al(& (0)) T鋙 1)t q)鉭AddItem ziNPZS112CCW aCGrhn絡蕡*I!ǖ9埈1@不眥螤z UQUHB嫽 2fk牅昏O嶐鳈0xk牅昏O嶐鳈0n絡蕡*I!ǖ9MEPSPSSS16"<< Nr0{F931AD88-A614-408C-B2BB-B17BCEA07ADA}{5108550B-0155-4248-8BBB-9F0DCF043266}8xbbH @%% ` ``劜`劧 ``8)僊X% j` b0` i凗  `劜`匂 d`p  i凗  `劜 `@劏 ``劕`X0%侢` %J4 @jD@H`0凗(偁L0H0`H l uy赾*\R5*#e$*\Rffff*1S63da79aaLPTX\`Z" 0"8@H P `&p N (8@ " HPX "` h x     ( B H PX`h B px(&  j B (jP`h "px  2&&0 $X& & & 0 @] S]@H A@rroH]] B@ !' SubjectA b%%.'  %    %%!d:  %%!d  B@k  'oAo` `.b b(d b(f b(h b(j *!P!H b%t *!l \base.dat b%加載學科常量錯誤. n找不到數據源,部分數據無法獲得A@<|kkAbo]' SubjectA b%%] SubjectA b%%. %!d110zk SubjectA b%%%!d SubjectA b%%%!d  B@  'hi`0]' SubjectA b%% SubjectA b%%%!d SubjectA b%%%!d  B@  'i]] !!H !!H'd@對不起,請您選擇至二級代碼! 錯誤A@<|k :$p# %x' :$p# %x' 4交叉學科的相關學科 ( ) ^!T(H 4e ( ) ^!V(H 4e ( ) ^!X(Hk A@ro惖Attribute VB_Name = "jxxgxkSubCodeSK" Bas0{F931AD88-A614-408C-B2BB-B17BCEA07ADA}{5108550B-0155-4248-8BJ9F0DCF043266} d@Global慡pacoFalse 奀reatablPredeHclaId赥ru BExpose0TemplateDerivCustomiz婦Public@ num1,2 As Inte纆er P(,` xmlc硜 O`bject btn_userfrm菴ancel_C-k() Unload MnEnd "lbx_first_ChangeDim 巒%ABown%second`.Clea1AnV.ListIndex&Set nD=;.getElement@sByTagAz(".丂A").I`tem(n70憙Whi{No.C@dN+s  Is hin&g 'If@9Mod 2*1 Then5AddY (,.F聅(1).Text + ":"@ 0 4kIf"9n1Wen8d Ft蟭僢_Dbl儍ByVal C垇uMSForms.Retur0nBoo纋臫Cadll悧OkCKU燪 _Initipaliz艻A=錣= GetDoc#仱.async0Wdma Ev@ d bO0nPar"寪resolveExtXern係 pe萺ve`Ete鍑c #`B%agXML(This uT.b牅D.u躤) 岹L@pk怭ath9"\ ."MsgBox "加匱Э瞥A看砦.", vbCr-cal, "找不到數據源@👩🏼‍💼🥅,部分a蝷薹ɑ竦 ﹥ FExit ?G@劌N)P"BsSKsuB慉夽Fun纁tion J[壙w.uz仈sa\鰩ε丳s5 .峴`:(s)}w "1108/埪,%$#LA +Г鎸S?IHtH 鐧 # n鬾 鱜\ atx^(y__骭晄(杹@;Ye鮕a, :b0S罍uo1abcm)Sp.Me.$} <> "v"|N=饏E!1匧對不起,請您選擇至二級代碼!"M銭x牂ma1EPM窴{Ky4ap8VBA.Trim(Sphlitp( @:,")pyvbtr90)憳flagc傖 '交叉Y的相笹cho啵P爀rtin缹Ss0.T1觕b & "("`a蕞2/1%2/& /+3/_ t%3/.(e熄 p8GrAc`r+JwL圑!I渵脈-M1e#玵嗭媊1荎綴 惃鱒P嗝╗Bヤ郚PQx嗝╗Bヤ郚PQr+JwL圑!I渵MEPSPSSS6"<<<0{A4107DC3-C394-4D2D-8731-6523AB7186EF}{7FDD608B-3115-4BC7-BE59-0A90A8F7AE50}` :p`33`刲`刯 % F` Z` x``勦`剮`剱 ` n` j` `刾 `勦h%侢 %px凗 %偁8P%h(d uy赾$*\Rffff*1U63da79aa 48<@DHLPTX "0@HPX $h  $  "  (0 08h p x     ( 8H Xh x      "  "  "  @HP&X < L0 &8 ` p " "       0 H     ( @   x  8     "     * ( 8 @ X h p     ]@ f!H h!H !H'l0k( f!H 請選擇年份 >提示...A<|hk` h!H 請選擇月份 >提示...A<| k !H請選擇日 >提示...A<|k]X f!H- h!H- !H'l 4KTF l !8(HKTF l !<(HKTF l !@(HKTF l !D(HKTF l !H(HKTF l !L(HKTF l !P(HKTF l !T(H KTF l !X(H KTF l !(Hn@ A@ro(p A@roo B@ f!H h!H]0]H]` f!H- h!H-1' h!H12 f!H %` % %-01-01'd f!H- h!H %` % %-01'k d   %  B@ kxopxAoX !Select Case codeflag 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 SelectqPoH Al]8 6-$p'p]P $p$`$p$`  fB@   hB@ 4 4  f(Hk`oXPAttribute VB_Name = "chooseYearMonthDay"D as0{A4107DC3-C394-4D2D-8731-6523AB7186EF}{7FDD608B-3115-4BC7-BE59-0A90A8F7AE50} 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 伬Object翏AIJn蓛& "-" &媰1 reDw:-Sel {codef琹a銷Ca~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 i 1 w !Diff("dd,  檙!AddIte鑝 iwN纁&亄'l'聓 )o+悓UserP m_Activ+With Pr趏ak.刡 '_fUf'jfMe.Move (.LeDft.fr惇3' ha),To鎝30!-乵Heightd l 黴1b 盹 . %u1 咭 2 涳 2 亐2. Ew C$畢ay3 3 邠忓| 4鞬&4 4 厒w 5 5 5 %堬 蓓 6 6 ~6 艒 7鳳 7 7 咩 e擄 8  8.1Top + .memberBirthday8.Height) ' Cas e 10:LMe.Move (sqrxxWin.0LeftFr衋me1,b0<),@ ?30 ZC 2 肊nd Select With  ubPrivate Sub UserForm_Initialize(剦Call currencySet(Me Dim yearBou8As Vari an: = SplitStr(c@hooseY, "-"&i "Integer僝!J i =-l(((0)) ToY 1)$鈙1.AddItem bi&Nex'112 Mon thC If codeflag @> 0 Or<羳 Then# value219L80cIf e   # !"$&%',()*+.6I/012345@A89:;<=>?BHCDEFGJR^KLMNOPQSVTUWYXZd[\]_u`abcegfhjikmlnqoprtsv|wxyz{}~&Gr2|+c 峴X虸純鯱R4﨣瓽P|A迪0eiX 膠BQ畝+駈F嬢韄颶x+駈F嬢韄颶+c 峴X虸純鯱R4MEPSPSSS6"<<<0{47AE4BFE-5007-417C-B5CF-07306569580C}{B3F87FB5-7AC4-4202-B711-1D5102C4B692} J@` N` R` :` ZX`&&`6 ` j` `刞  %侢H  %@X凗%偁^%  Puy赾$*\Rffff*1P63da79aa48<@DHLPTX\`dhlptO "  "(0 8H "PX `p "x    "8 (082P 2 42P   0 &8 ` p "  " ( HP (`'4 LB@B`oX@'4 PB@B~B@o0'4 PB@Bo T(H V(H X(H !R(Ho8 T!H至少選擇第一項關聯度較高的學科 >警告...A< \B@|k T!H V!H第一項 與 第二項不能相同 >警告...A< \B@|`kX T!H X!H第一項 與 第三項不能相同 >警告...A< \B@|k V!H X!H V!H X!H第二項 與 第三項不能相同 >警告...A< ^B@|`kX]@ T!H、 '6 V!H 6 V!H 👼🦓、 '6k X!H 6 X!H 、 '6k 6 6 % %'6 6 !R(H A@roxX A@roX !R!H] !R!H)$p'`$`) T(H ` $` %) V(Hk ` $` %) X(Hkpkho`X汲Attribute VB_Name = "choosePertinentSubj@ect" 碆as0{47AE4BFE-5007-417C-B5CF-07306569580C}{B3F87FB5-7AC4-4202-B711-1D5102C4B692} dGlobalSpacoFalse 奀reatablPred恊claId釄Tru BExpy0TemplateDeriveCustomibz婦 P 儹1_Click() codefla gP1jxxgxkC SK.Show EnRd% -2-2+-(33.CommandBut(ton CsC1.衯aluv"绬AI23qxmxxWin.researchDi鈘@磇on 訳@mitBtnK>I f "( ThenB+Call MsgBox("至少選擇第一項關聯度較高的學科", vbOKOnly, "警告p..."剢嫀.SetFocusExit唩 A3麵fC*/( 與 第二項不能相?墔]?郱?蝨 "" Ad-%%=EJ"c12;鮄222Di刴 鈹As S嗲 1蘕 %u$=MiC(1), 2&A2<2qr UserfrmChooseSchoolCode0 !jfgsWin{珎 悽珎 f=o|DNGrm&h礬 姊K搢z酌>豂IL払t>並誏"N)AKGm庣"y$旔3濬戞 7x$旔3濬戞 7冹礬 姊K搢z酌MET@SPSSS1>" "LLL "LL 08`b*n<@x @h @PX @H @ 8 @( @$ @h @ @酤 PPPx8H @8l 8b@X @H @8 @( @8 @  @ @h棹 @瀨 @軋 @寧 @逮 hPhPb@` @P @@ @0 @ @  @@ @( 瘙 @ 幗 @X 玄 @p 俐 @ 剝 @ 狛 @ 慆 @ @ p @` @P 4<p x@d @ T @0 D @` 4 @H @x  @ @瘙 @幗 @滎 @佝 rH@l huy赾*\R5*#e$*\Rffff*1L63da7986$*\Rffff*1H63da7976$*\Rffff*1E63da7975*\R8005*#44*\R1*#173*\R0*#1*\R0*#17*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#C:\WINDOWS\SysWow64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#45$*\Rffff*1J63da7979*\R0*#f$*\Rffff*1K63da7984*\G{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#C:\WINDOWS\SysWow64\FM20.DLL\2#Microsoft Forms 2.0 Object Library*#44*\R0*#1f*\R0*#1eLPTX\` M "  0 "8@ P,`x  % ,3&C&E'(*8H P` "hp  (2 ! NX`px"   "      =(= 38    B (08*6@<]p  ] @]@H A@roH] 4 !!H鬕] !!H'dh對不起,請您選擇學校! 錯誤A@<|0k( :$p# %x' :$p# %x'  !L(H  !P(Hk A@ro]Ph] B@ !'  SchoolCode b%%.'  %    %%!d:  %%!d  B@k  'oAoh `.b b(d b(f b(h b(j *!P!H b%t *!l \base.dat b%嚴重異常:申請書當前所在文件夾內找不到base.dat文件🙎🏿,無法加載學校、學科代碼表等數據!請先將申請書壓縮包內的base.dat復製到當前文件夾🙋🏿,再重新打開申請書⏳。 n 找不到數據文件,部分數據無法獲得A@<|kkAo@]'  SchoolCode b%%  SchoolCode b%%%!d B@  '8i0(EAttribute VB_Name = "UserfrmChooseSclCo de" 窧as0{05163E16-49D8-4C49-9242-15743EB2A214}{4E224CD5-29AA-4B41-AEC9-476D8EE72279} 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$A5(諷 坢g @"媅SO$)&^rf鱏y樑_kX{5"褳SOHH  %<}+*S蟸9崅i梴 (USMONCQ)R 憦濄K窺恄宋體! 4zxfOk$4tszlf[.g  4lwf緆$4sjcjfct1g  4ysfOkE$4dyclfg E  4glfOk i01 n`粑浲`{珎 悽珎 f"o3CompObjFp$ 4sbgzfg  4 qtfOk$ 4xxhyfg (28 Label104a(28 Label105a`(28 Label106a(2@ Label107 (28Label108aL(24Label109(24Label110`(24Label111( 24Label112 (!24Label113L("28Label114](%2,total1  H,D{5"媅SO H,D{5"媅SO H,D{5"媅SO H,D{5"媅SO H,D{5"媅SO H,D{5"媅SO 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(u9M 5"媅SO( \媁O畫9D5"媅SO(═鈰95"媅SO(砇95"媅SO(pS7R95"媅SO(t95"媅SO(vQ諲5"媅SO( T9(u5"媅SO!: 5"媅SO n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦i38 n`粑浲`悽珎 悽珎 fHoOPCompObjUpHH  -}+*y橆v;`蟸9USMONCQ R 憦濄K窺恄宋體,'4otherFeeSourcekXk((2<Label807, *4applyTotalFeeg (+28Label93{()2<Label817S{(-28Label115'{  H, D{5"媅SO (3u鲖蟸9;`潣5"媅SO H, E{5"媅SO* 5"媅SO (vQ諲eg恘蟸9 5"媅SO*abe5"媅SO n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦 Microsoft Forms 2.0 FormEmbCompObjWaVBFrameY$PROJECT^zycyWin悽珎 悽珎 edded Object9瞦VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} jfgsWin Caption = "經費概算填寫" ClientHeight = 5484 ClientLeft = 48 ClientTop = 432 ClientWidth = 6588 StartUpPosition = 1 '所有者中心 TypeInfoVer = 71 End ID="{00000000-0000-0000-0000-000000000000}" Document=ThisDocument/&H00000000 Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} 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=jxxgxkSubCodeSK BaseClass=zycyWin BaseClass=sqrxxWin BaseClass=chooseYearMonthDay BaseClass=jxxgxkSubCode BaseClass=fundsWin BaseClass=setpsdWin HelpFile="" Name="Project" HelpContextID="0" VersionCompatible32="393222000" CMG="3B399720582458245D295D29" DPB="0002ACB3C9B3C94C37B4C977470F8E6B000A98F5F2FB88D7CD4EB382B9A7A437ED19EF67" GC="C5C769B6EB7AEC7AEC7A"[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 sqxmxxWin=0, 0, 0, 0, C, 104, 104, 1242, 581, C pub_check=0, 0, 0, 0, C UserfrmSubCode=0, 0, 0, 0, C, 156, 156, 1294, 633, C chooseYearMonth=0, 0, 0, 0, C, 0, 0, 1138, 477, C UserfrmChooseSchoolCode=0, 0, 0, 0, C, 130, 130, 1268, 607, C unLockWin=0, 0, 0, 0, C, 26, 26, 1164, 503, C choosePertinentSubject=0, 0, 0, 0, C, 182, 182, 1320, 659, C jfgsWin=0, 0, 0, 0, C, 26, 26, 1164, 503, C fun_for_word97=0, 0, 0, 0, C IDCardNo_check=0, 0, 0, 0, C jxxgxkSubCodeSK=0, 0, 0, 0, C, 208, 208, 1346, 685, C zycyWin=0, 0, 0, 0, C, 52, 52, 1190, 529, C sqrxxWin=0, 0, 0, 0, C, 52, 52, 1190, 529, C chooseYearMonthDay=0, 0, 0, 0, C, 78, 78, 1216, 555, C jxxgxkSubCode=0, 0, 0, 0, C, 104, 104, 1242, 581, C fundsWin=0, 0, 0, 0, C, 78, 78, 1216, 555, C setpsdWin=0, 0, 0, 0, C, 130, 130, 1268, 607, C (H  r@}塢"R 憦濄K窺恄宋體$#frame311a( <btn_kt_addGk( <btn_kt_clearQk (軴 X[12D@"媅SO(諷 坢00 @"媅SOfzo~xi02 n`粑浲`悽珎 悽珎 f3H  rV}fZ槝膥;N亯bXT鶺,g酧o`( NS+T3u鲖篘酧o` 鵞bXTL饄0t^劅I{ gP6R gbXT颯 NkX)R 憦濄K窺恄宋體Op(28Label93( 4memberUnit0:", 4memberDivide0kX孨",4memberSpecialty00"( 4memberName0e", 4 memberDivide1ty0孨( 4 memberUnit1Q:,4memberSpecialty10( 4memberName1e, 4memberDivide2ty0孨 ( 4memberUnit2a: ,4 memberSpecialty20 ( 4 memberName2a , 4memberDivide3ty1孨 ( 4memberUnit3e: ,4memberSpecialty30 ( 4memberName3e , 4memberDivide4kX孨( 4memberUnit4a:,4memberSpecialty40( 4memberName4r, 4memberDivide5ty0孨( 4memberUnit5r:,4memberSpecialty50( 4memberName5e, 4#memberDivide6kX孨( 4"memberUnit6e:,4!memberSpecialty60( 4memberName6e, 4(memberDivide7ty4孨( 4'memberUnit7e:,4&memberSpecialty70( 4$memberName7a, 4-memberDivide8ty6孨( 4,memberUnit8e:, 4+memberSpecialty80( 4)memberName8a(2<.Label98 (28/Label1000(2@0Label101:(281Label102峃( 4memberTitle0 "( 4memberTitle1 ( 4memberTitle3 ( 4 memberTitle2  ( 4%memberTitle7 ( 4memberTitle4 ( 4memberTitle5 ( 4 memberTitle6 ( 4*memberTitle8 (r2<2Label1032( i43memberCode881( j44memberCode071"( k45memberCode141( l46memberCode2r1 ( m47memberCode3Q1 ( n48memberCode481( o49memberCode541( p4:memberCode681( q4;memberCode781(28<Label99"0W24=memberBirthday05""0X<>chooseBirthdayBtn0kX+"0Y<?chooseBirthdayBtn1+0Z24@memberBirthday16"0[<AchooseBirthdayBtn3+ 0\24BmemberBirthday28" 0]<CchooseBirthdayBtn2+ 0^24DmemberBirthday3" 0_<EchooseBirthdayBtn7kX+0`24FmemberBirthday48"0a<GchooseBirthdayBtn4+0b<HchooseBirthdayBtn5+0c24ImemberBirthday56"0d24JmemberBirthday62"0e<KchooseBirthdayBtn6kX+0f24LmemberBirthday75"0g<MchooseBirthdayBtn8kX+0h24NmemberBirthday86"  n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦 Microsoft Forms 2.0 FormEmbo7CompObjpCompObjaVBFrame0h覻 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 {u"媅SOhN N {u"媅SO$h錧 \O US MO{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翄鯪鱏13{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( 閎15{@"媅SO( 閎{@"媅SO H,  {5"媅SO( 閎8{@"媅SO H,  {5"媅SO( 閎{@"媅SO H,  {5"媅SO( 閎{@"媅SO H,  {5"媅SO( 閎{@"媅SO( 閎{@"媅SO H,  {5"媅SO H,  {5"媅SO( 閎15{@"媅SO H,  {5"媅SO( 閎.{@"媅SO H,  {5"媅SOedded Object9瞦VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} zycyWin Caption = "課題組主要成員情況填寫" ClientHeight = 5076 ClientLeft = 48 ClientTop = 432 ClientWidth = 13572 StartUpPosition = 1 '所有者中心 TypeInfoVer = 679 End (H G@}韂-R 憦濄K窺恄宋體P$,#Frame166"fundsWin悽珎 悽珎 foi556  n`粑浲`悽珎 悽珎 ( <cancelBtn9嵃R($<saveBtn5>($@delBtnn5餑((2@Label964!/((2<Label116砮(2<subject1砮E(2<subject2砮 (2<subject3砮: (2@ subject4砮(2< Label117遜(28 orderNo1%mE(28 orderNo2$m (28 orderNo3$m: (28orderNo4$m(28year1Pl(28year2131羢(28year31172{(2<Label118$m(28orderNo5$m3(2<subject5砮2(28orderNo6$m(2@subject6砮(2<Label800{>, 4applyTotalFeekXg ,4otherFeeSourcey7f7(2<Label140z-a(28Label94>(20Label142>(20Label151a$%#Frame262! (諷 坢E@"媅SO(軴 X[8E@"媅SO, R d  @"媅SO$)&^rf鱏y樑_kX{5"褳SO ,蟸9嵮y顅q{u"媅SO @H,q}N905"媅SO @H,q}砇975"媅SO @H,q}緥Y9 T5"媅SO$@H, q}魐9(uT5"媅SO ,蟸9峵^q{u"媅SO@H,}2ee65"媅SO@H,}3~95"媅SO@H,}4ee65"媅SO@H,}1[SO5"媅SO@H,q}20225"媅SO@H,q}20235"媅SO@H,}20245"媅SO ,抍廭鱏{u"媅SO@H,}5[SO5"媅SO @H,q}魰9(u5"媅SO@H,}65"媅SO$@H, q}vQ-NY鑒褢潣5"媅SO (3u鲖蟸9;`潣86 5"媅SO H, : {5"媅SO H, ; {5"媅SO (vQ諲eg恘蟸9y7 5"媅SO*~9嵲5"媅SO(NCQ5"媅SO(NCQ5"媅SOfCoCompObj/pi805  n`粑浲`悽珎 悽珎       !"#$%&'()*+,-.023456789:;=>?@ABCDEGIKLMNPQRSTUWXY[\]^_`abcdefghijklmnopqrstuvwxy{|}~dH  G4}鬦3u鲖蟸9崉槜{USMONCQ ;`潣=魐9(u+魰9(u R 憦濄K窺恄宋體(Z28Label50 [4fee1 \0fee2 ]0fee3(_2<Label354(`2<Label37 (c2@Label522(d2<Label972(28Label123( 0 fee_note1T( 0 fee_note2 ( 0 fee_note3(2< Label131f7(2 Label132f7(2Label133f7 (2Label134f7 Y8fee4O(/2@Label152O(22LLabel155^7(32<Label156(82hLabel159(92PLabel160f7 :4fee6( ;0fee_note6 <0fee5( =<fee_note4(uO(>20Label161f7O( G<fee_note5(u ,{|+R{u"媅SOH,5"媅SOH,5"媅SOH,5"媅SO ,N910u"媅SO ,砇9u"媅SO$, 褢潣(NCQ){u"媅SO ,緥Y9u"媅SO,魦fk{u"媅SOH啲k5"媅SOH琸5"媅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,c(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"媅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"媅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"媅SO4,YOSUSMOD(0b舃剉xvz鸑!"5"媅SOH, "5"媅SOH琸"5"媅SOH, 5"媅SOH,嚕l}7 @"媅SO$!{5"媅SOH,嚕l7 @"媅SO n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦TH  E$}鬦3u鲖蟸9峵^剺梴( N+TvQ諲eg恘蟸9)R 憦濄K窺恄宋體 $)0feeYear1 (-2<Label119"a(@20Label162a$*0feeYear2a$(+2<Label120a(A20Label163z-a$'0feeYear39(,2(28Label96l' (28 Label97 9(28!Label99y+*(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(覻 T5"媅SO('` +R5"媅SO(L 饄5"媅SO( 鶴u錯g5"媅SO( @b(W钀钑g5"媅SO(L 5"媅SO( gTf[哠5"媅SO( gTf[MO735"媅SO( Y韹韹蛓哠5"媅SO( 惎0W@Wg5"媅SO(異 5"媅SO(Kb :g5"媅SO( 鶹歔5u輯g5"媅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*5"媅SO*[SO5"媅SO*e5"媅SO*[SO5"媅SO*[SO5"媅SO*[SO5"媅SO( 珟齆翄鱏輯5"媅SO H,> {5"媅SO*5"媅SO*[SO5"媅SO*5"媅SOp(`俌3u鲖篘鄀E-Mail0Kb:g鲖kX橯y橆vT鹼篘剉E-Mail0Kb:g 錘縊嶯b霳N╜諷梍蔛鰁剉T鹼095"媅SO*5"媅SO n`粑浲`Microsoft Forms 2.0 框架Embedded ObjectForms.Frame.19瞦 Microsoft Forms 2.0 窗體Embedded Object9瞦VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} sqrxxWin Caption = "申請人信息填寫" ClientHeight = 5268 ClientLeft = 48 ClientTop = 43CompObjaVBFrame(PROJECTlkNPROJECTwm 2 ClientWidth = 9792 StartUpPosition = 1 '所有者中心 TypeInfoVer = 971 End #瀸棸暈-?@覌B糊 `@2譱甕$4tbxpsdo5: $ 4tbxpsd2Q: i( 28Label2n50 1pOptionButton1" fCoXCompObjpCompObja,(芠xP栺倗eW[蚹bpeW[  u"媅SOH,* {5"媅SOH,* {5"媅SO( 峇搹N!k45"媅SOPF纮a1rde菓硚塠hQ衏:y 緥n軴芠xchoosehQ@"媅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} setpsdWin Caption = "設置保護密碼" ClientHeight = 2724 ClientLeft = 48 ClientTop = 432 ClientWidth = 5292 StartUpPosition = 1 '所有者中心 TypeInfoVer = 17 End (H  @}d@.R 憦濄K窺VBFrame&sqxmxxWin悽珎 悽珎 foP恄宋體 ,j4lastProductMode]$o#Frame12? $#Frame22q,<CommandButton5!*,<CommandButton6kX6*, @btn_kt_delete5+*( 4schoolCodeet(2@Label961E+(2Label98  H,x5"媅SO(軴 X[2E@"媅SO(諷 坢E@"媅SO, R d5  @"媅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"媅SOLH  *}0= g葉b済b__(髞\ 愰bNy)R 憦濄K窺恄宋體8d pXzz諲 tXzl誴2 uXlw:  v\zxbg$w`dzcbwin" Xqtcb( <qtContentiE(0LLabel97= i111  n`粑浲`悽珎 悽珎 foCompObjo<F纮 {0W刓OproductMode5"媅SO<F纮 {0N)RproductMode5"媅SO<F纮 E{0N)R簨噀productMode5"媅SO@F纮 *{0y═鈰JTproductMode5"媅SODF纮 {0刓O5uP[鶴HrireproductMode5"媅SO<F纮 E{0媷evQ諲productMode5"媅SO H,嚕 {7 @"媅SO0)鲖(W噀,gFh-NkX橯g葉b済b__5"褳SO n`粑浲`Microsoft Forms 2.0 框架Embedded ObjectForms.Frame.19瞦<H   <}0='y橆v鶺,g酧o`R 憦濄K窺恄宋體u(28 Label3(2< Label17143  n`粑浲`悽珎 悽珎 fsoCompObj,o      !"#$%&'()*+-/1234678:<=>@BDFGHIKLMOQRSUWY[\]^`abceghkmopqrtuvxz{|} ( 4projectNameg ( 4researchType+(28Label2"`424researchDirectiond 028 planFinishDateW)1,<CommandButton34 ,<CommandButton44(2<Label78? , 24schoolNameDa (28Label86L, 24applyDateype 1(28Label85(28Label83$4subject E( 4projectTypeo (28Label82`(28Label87;{(28Label90;f (28Label88 (28Label89  (28Label91;(28Label95(28Label92;(28Label94;,< CommandButton741,< CommandButton8'1 ( 槝 T饄e5"媅SO (xvz筫T蔛鉔x 5"媅SO H,(!/{5"媅SOAH,{5"媅SO( xvz{|+Ri5"媅SO H, '{5"媅SO H,  {5"媅SO( 閎{@"媅SO( 閎{@"媅SO (R孾b鰁魰 5"媅SO H, '{5"媅SO( @b(Wf[!h饄5"媅SO H, {5"媅SO( 3u鲖錯g5"媅SO( f[褃钑{|!hq5"媅SOAH,{5"媅SOAH,{5"媅SO( y橆v{|+Re.5"媅SO*[SO5"媅SO*[SO5"媅SO*5"媅SO*[SO5"媅SO*[SO5"媅SO*5"媅SO*5"媅SO*5"媅SO( 閎{@"媅SO( 閎{@"媅SO n`粑浲`Microsoft Forms 2.0 框架Embedded ObjectForms.Frame.19瞦 Microsoft Forms 2.0 窗體Embedded Object9瞦CompObj.aVBFrame0+unLockWin悽珎 悽珎 f5VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} sqxmxxWin Caption = "申請項目信息填寫" ClientHeight = 6804 ClientLeft = 48 ClientTop = 432 ClientWidth = 9348 StartUpPosition = 1 '所有者中心 TypeInfoVer = 411 End (H  @} R 憦濄K窺恄宋體( <unLockBtn  $#Frame1( <cancelBtnm]  (銐 晄@"媅SO(諷 坢@"媅SO8H  }噀ch銐R 憦濄K窺恄宋體T 4pwdO >(28Label1 H,* {5"媅SO( o 9xi03 n`粑浲`悽珎 悽珎 f;o?l銐暺[x5"媅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} unLockWin Caption = "解保護" ClientHeight = 1860 ClientLeft = 48 ClientTop = 432 CCompObjApCompObj CaVBFrameE jxxgxkSubCode 悽珎 悽珎 lientWidth = 3552 StartUpPosition = 1 '所有者中心 TypeInfoVer = 14 End (H  (@ }'R 憦濄K窺恄宋體$#Frame1140#<btn_userfrmSubCodeOk'I4$<btn_UserfrmSubCodeCancellI (nx 歔6@"媅SO(諷 坢 T@"媅SOfJo Nxi02 n`粑浲`悽珎 悽珎 fPdH  "4 }b$A鲖HQ(W鎉Fh匭 愰bNf[褃 峇(W骃Fh-N 愰b孨f[褃鉔xR 憦濄K窺恄宋體\O( !@lbx_secondhd( "@lbx_first `g5"媅SO`f 5"媅SO n`粑浲`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19瞦oTCompObjVpCompObjXaVBFrameZ* Microsoft Forms 2.0 FormEmbedded 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  @ }{'R 憦濄K窺UserfrmSubCode悽珎 悽珎 f_=odxi03 n`粑浲`悽珎 悽珎 恄宋體<kaK鷓綃呇眏鯉(6(J鷓綃呇眏鯉(6(I鷓綃呇眏鯉(6($#Frame1.a0<btn_userfrmSubCodeOk'u4<btn_UserfrmSubCodeCancellu (nx 歔s@"媅SO(諷 坢.@"媅SOHH  !}$A 愰b孨b Nf[褃鉔xR 憦濄K窺恄宋體0 ( ffoi@CompObjjpCompObjla@lbx_secondi `I!5"媅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} UserfrmSubCode Caption = "學科選擇" ClientHeight VBFramen'chooseYearMonth /悽珎 悽珎 fso$wx = 4344 ClientLeft = 48 ClientTop = 432 ClientWidth = 5724 StartUpPosition = 1 '所有者中心 TypeInfoVer = 12 End (H  @}U R 憦濄K窺恄宋體a,<CommandButton1;  ,<CommandButton2 $ #Frame1 (nx 歔.@"媅SO(諷 坢@"媅SO8H  }v 愰bt^gR 憦濄K窺恄宋體O$4sMonth; (20Label1 $4sYear(20Label2 AH,{5"媅SO(t^5"媅SOAH,E{i10" n`粑浲`悽珎 悽珎 fyo!#~CompObjp5"媅SO(g{5"媅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} chooseYearMonth Caption = "請選擇年月" ClientHeighCompObj %aVBFrame*jxxgxkSubCodeSK (悽珎 悽珎 ft = 1944 ClientLeft = 48 ClientTop = 432 ClientWidth = 3720 StartUpPosition = 1 '所有者中心 TypeInfoVer = 29 End (H  (@ }'R 憦濄K窺恄宋體$#Frame10#<btn_userfrmSubCodeOk'I4$<btn_UserfrmSubCodeCancellI (nx 歔@"媅SOo'-xi02+ n`粑浲`悽珎 悽珎 fo*,(諷 坢11@"媅SOdH  "4 }b$A鲖HQ(W鎉Fh匭 愰bNf[褃 峇(W骃Fh-N 愰b孨f[褃鉔xR 憦濄K窺恄宋體\( "@lbx_first( !@lbx_second `f 5"媅SO`g5"媅SO n`粑浲`Microsoft Forms 2.0 FrameEmCompObjpCompObj).aVBFrame,chooseYearMonthDay&&81悽珎 悽珎 bedded ObjectForms.Frame.19瞦 Microsoft Forms 2.0 FormEmbedded Object9瞦VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} jxxgxkSubCodeSK Caption = "相關學科選擇" ClientHeight = 4524 ClientLeft = 48 ClientTop = 432 ClientWidth = 5784 StartUpPosition = 1 '所有者中心 TypeInfoVer = 13 End fo06xi044 n`粑浲`悽珎 悽珎 fs(H  @ }k"U R 憦濄K窺恄宋體O,<CommandButton286v ,<CommandButton1861 $#Frame114 (諷 坢3@"媅SO(nx 歔@"媅SO<H   }l 愰bt^g錯R 憦濄K窺恄宋體$4sMonth T; (20Label1. $4sYear[(20Label200(20Label3 4sDay AH,{5"媅SO(t^be5"媅SOAH,E{5"媅SO(g{5"媅SO(錯SO{5"媅SOAo35,CompObjpCompObj27aVBFrame/H,{5"媅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} chooseYearMonthDay Caption = "請選擇年月日" ClientHeight = 1944 ClientLeft = 48 ClientTop = 432 ClientWidth = 4992 StartUpPosition = 1 '所有者中心 TypeInfoVer = 10 End (H  %@"},R 憦濄K窺恄宋體 $#Frame1.E( <submitBtne.( <cancelBtne.a$(2Label1(!2@Label96,%<CommandButton1 choosePertinentSubject.A:悽珎 悽珎 fqo9?i02= n`粑浲`悽珎 悽珎 (nx 歔.@"媅SO(諷 坢@"媅SO-z鑜a╜3u剉/f 蒘f[褃/鼅Txvz 剉y橆v 鲖9hncy橆vNf[褃剉sQT貧NO漁!k 愰b鴙sQxvz筫T孨f[褃 S靊t錧{|f[褃 CX)5"媅SO$)&^rf鱏y樑_kX{5"褳SO(n zzt@"媅SO<H  $ }X) 愰b鴙sQf[褃f3o<>0CompObjpCompObj;@aR 憦濄K窺恄宋體 $4subject1q,<chooseSubject1? ,<chooseSubject2? $4subject2q,<chooseSubject3? $4subject3q ( 28Label90&{("28Label97{{(#28Label98{($28 Label992{   H, '{5"媅SO( 閎.{@"媅SO( 閎{@"媅SO H, '{5"媅SO( 閎{@"媅SO H, '{5"媅SO*Mon5"媅SO(,{N"@"媅SO(,{孨"@"媅SO(,{ N"@"媅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} choosePertinentSubject Caption = "請選擇相關學科" ClientHeight = 4344 ClientLeft = 48 ClientToVBFrame5UserfrmChooseSchoolCode0C悽珎 悽珎 foBHxp = 432 ClientWidth = 6468 StartUpPosition = 1 '所有者中心 TypeInfoVer = 34 End (H  $@}(% R 憦濄K窺恄宋體O$#Frame10a0!<btn_userfrmSubCodeOk4"<btn_UserfrmSubCodeCancel?  (nx 歔6@"媅SO(諷 坢@"媅SOi02F n`粑浲`悽珎 悽珎 foEGpCompObjo8H  $%}5%b!hN葔R 憦濄K窺恄宋體\( $0lbx_first#( #@lbx_second  `V n5"媅SO`m5"媅SO n`粑浲`Microsoft Forms 2.0 框架Embedded ObjectForms.Frame.19瞦CompObjDIaVBFrame0WordDocumentMN0TableLV袺 Microsoft Forms 2.0 窗體Embedded Object9瞦VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} UserfrmChooseSchoolCode Caption = "院校選擇" ClientHeight = 4668 ClientLeft = 48 ClientTop = 432 ClientWidth = 5820 StartUpPosition = 1 '所有者中心 TypeInfoVer = 14 End Data :YWpsCustomData&Dd饜  餜A(8??亙Control 13"2養u4陋藂uI=璭`!u4陋藂uI=璭饕$$渕=0 厽擈梤X墘憴亄q啚q棬恅@b鞌D霸蕐韯@ ]H$黫jH\h+As諫o甔k鼊 }蠍駝盧厀鎦q>bE哖pE*鈞+sc妛fY:饈+V贓悓斳<錶n獇_煉(扵搋禸o蹦鑤9_6類6仵Jn8蘦?_m朼啄uj誏悛嗙式摰邗甒FDdh饜  餜A(8??亙Control 43"20`煨.T ;=V `!鷸0`煨.T ;=V r{$鴟渕怟! D粌q雽璻錔迠[q 廈<&8凐*$$鼿X `萟\`薠礀-аs蒿ZI) a鱜7;S趜g燔d瑃餋Z2芚H﹖~恾j+襸_HW6&殤?`臹n縰Y芥昹)瑍嬡9<2%椀O3)f2Ddh饜  餜A(8??亙Control 63"2餘曡)}r詭穏峝Z*`!"曡)}r詭穏峝Z{$鴟渕惐N0砈 cI+訢*K'ㄔヽ}徏弨7(%"咼煨wu]姤嬑撅;_LH爣t%柈dd\!V楎龞 3螻韮鈈孫(╇xⅪ伳連:q嗵訩(楳覦\.丯號筧*6鈔匊k鑠獰殤?$浌n^銉d ?辛1ぉ倦椯q薔(鼊疃oX筟繿]畫V諼煣礄-a幟wJ轁 湳: 婢&膌}@=Dd饞  餞A(8??亙Control 543"2瘊餕sb飈[/禘H`!鷂餕sb飈[/禘Hr渕愅! 呥tfO烎`WtE諧虂d>#!/L@ x繴孹u島bGoDら飫絻薾Υ餯嶎9'澁'謩肶J梧t:媂_O朖34溠闁澮$U 鰏壑蟠蝃E梓vO [EbU$0忇Dd饞  餞A(8??亙Control 563"2瘊餕sb飈[/禘H`!鷂餕sb飈[/禘Hr渕愅! 呥tfO烎`WtE諧虂d>#!/L@ x繴孹u島bGoDら飫絻薾Υ餯嶎9'澁'謩肶J梧t:媂_O朖34溠闁澮$U 鰏壑蟠蝃E梓vO [EbU$0忇Dd饞  餞A(8??亙Control 583"2瘊餕sb飈[/禘H`!鷂餕sb飈[/禘Hr渕愅! 呥tfO烎`WtE諧虂d>#!/L@ x繴孹u島bGoDら飫絻薾Υ餯嶎9'澁'謩肶J梧t:媂_O朖34溠闁澮$U 鰏壑蟠蝃E梓vO [EbU$0忇Dd饞  餞A(8??亙Control 603"2瘊餕sb飈[/禘H`!鷂餕sb飈[/禘Hr渕愅! 呥tfO烎`WtE諧虂d>#!/L@ x繴孹u島bGoDら飫絻薾Υ餯嶎9'澁'謩肶J梧t:媂_O朖34溠闁澮$U 鰏壑蟠蝃E梓vO [EbU$0忇Dd饞  餞A(8??亙Control 623"2瘊餕sb飈[/禘H`!鷂餕sb飈[/禘Hr渕愅! 呥tfO烎`WtE諧虂d>#!/L@ x繴孹u島bGoDら飫絻薾Υ餯嶎9'澁'謩肶J梧t:媂_O朖34溠闁澮$U 鰏壑蟠蝃E梓vO [EbU$0忇Dd 饞  餞A(8??亙Control 653"2瘊餕sb飈[/禘H`!鷂餕sb飈[/禘Hr渕愅! 呥tfO烎`WtE諧虂d>#!/L@ x繴孹u島bGoDら飫絻薾Υ餯嶎9'澁'謩肶J梧t:媂_O朖34溠闁澮$U 鰏壑蟠蝃E梓vO [EbU$0徾Dd饞  餞A(8??亙Control 203"2瘐'くR*僀$8嚨`!鶘'くR*僀$8嚨R`$淯廇! E楱c4銓{'q迨僸+掇偦p`瑵F寫A!~豰櫘A瑩5p p+X砟'淩墊7H7皌蔮wWRD湦#)暢昄)9熑鯽)洡挜'櫃}崵N櫞N鏈篲MX彾饋茆<wm*鉏 |mGb<O鎦領鳽鬤oH灪lE杄镮鳹)S Cy( O }婏J蜫蠝O:RU昘蠱鳵熎76u禛/7$疈傒脬魢#l蒿薽袤Й籒 鱃{涊$飩.眏杚鳷>O啠彷襻("]"vw鞱 掌DDd饞  餞A(8??亙Control 243"2饋~*寕I択XK塴迗~]`!餟~*寕I択XK塴迗~(M HL#渕懲J聾呄漣V-j莞褺煚.|,j}>BV釼 拀+_@俒\窹 f榖nr孓箏Ln !吔j - 建l篇%樟4b>縔刹煜縂瀩mp塓\U1茡幠 yJ-炋筌*瓠觕!y獠Y枼'u郲sぬ惽 逕(|'汶檑磽懎bn漠惝]N~KFDd饞  餞A(8??亙Control 263"2饊識lz阭7\`!餞識lz阭7(M HL"渕=N聾呥&61?UPRNQpD徦7@ 焾; !QP0oVx5鮪欦嵶硞`DX嘵5啎贈5歈5g詬C嚏7+i汘鵺瘸:捫岐臮E杄镮 |-Gb<OfY鍵鳹鑁oH灩lEE酙鴸))脁2蟬O}嗺"鷾暆:CUb揣猐┆FT2咎G櫧kM]脫篪嚿 恅氌竺<釕M鱜畜猾籒 鱁=蚽c 現鼪>8z(>嚕犴頧珮彪-ei軳~譖E砮Dd饞  餞A (8??亙Control 283"2粊枘[xG\bd劔Wi緰#1E濻'<鰥 |k舁7$蟎"瞬鬱鳹)S)脁( O }嗺2淯4s啰膆OU籖U崹\g|肫kM]眈箐囬 恇縶爭O麂0禧菡]瀎/M皥%VcM=擮煟耔v騰w琔虒膗鞀祽凵/跰E脆Dd 饞  餞A(8??亙Control 303"2瘊餕sb飈[/禘H`!鷂餕sb飈[/禘Hr渕愅! 呥tfO烎`WtE諧虂d>#!/L@ x繴孹u島bGoDら飫絻薾Υ餯嶎9'澁'謩肶J梧t:媂_O朖34溠闁澮$U 鰏壑蟠蝃E梓vO [EbU$0忇Dd 饞  餞A(8??亙Control 323"2瘊餕sb飈[/禘H`!鷂餕sb飈[/禘Hr渕愅! 呥tfO烎`WtE諧虂d>#!/L@ x繴孹u島bGoDら飫絻薾Υ餯嶎9'澁'謩肶J梧t:媂_O朖34溠闁澮$U 鰏壑蟠蝃E梓vO [EbU$0弍Dd 饞  餞A (8??亙Control 343"2饖悗◇?&4e A傷lf`!館悗◇?&4e A傷l@穰,湇=N聾呥&1垘( M)'H 8G@ 贒J仩pE哫9旹亜P2陳珝犂重篌舉駱P:惈婁i U~/+蓤發"湫靘⑵螼q遚烕lcb鈋垼G%i宷$y簴%盄>睴嶭捘懯觤癋>鵣%Y#撣[$-況d殾幀x&嚦+ 寉W奊Jz姺OeU懜蹏淜=霯 氠"霚悼x吳t=<楣楠禨轂(謝W1謕6x瓦7'靬p倏夯瀻喢U築卒2F 坭PNDdw饞  餞A (8??亙Control 363"24驡]僌袑5緄}u`!疸4驡]僌袑5緄}uy,垺渃d郿``頱```b恆 ff鋊`臆L 媷I捔垜葤c`2嚜譭d櫭 甩瑞嫅 囊儷cb1A.酊?! @Bm  J>鐿ddlh釀B矯衻;y9壘6l8q乆`Y 廞擜 P!H:蘞A!睜Dd饞  餞A (8??亙Control 383"2N摽/t*晾@彍`!痄N摽/t*晾@彍 繺.渃d郿``頱```b恆 ff鋊`臆L 媷I娏瀾葤c`2嚜譭d櫭 甩瑞嫅 囊儷cb1A.酊?! @Bm  J>鐿ddlh泥≥!h缽濟宻尲鄋`浤 禥垗窣,,衝Q(鄁@ 陮3僓'!nDd饞  餞A (8??亙Control 403"2 P暩抏鳼鮦杈鬏&`!疝P暩抏鳼鮦杈鬏&$`渃d郿``n````b恆 ff鋊`臆L 媷I垇憗葤c`2嚜譭d櫭 甩瑞嫅 囊c勆21倶 黤z瑵aH◢羴Ai隅廨潓 ^hu叁餭>#2 俶b#.,  咐鐿ddlh睦∵!h缽濟宻尲鄋`浤 禥垗窣,,衝Q喤+v縵h馢Q 僒3 V 狽%亡Dd$ 饞  餞A(8??亙Control 463"21N聽FrI夎g溴褷`!痄1N聽FrI夎g溴褷 渃d郿``頱```b恆 ff鋊`臆L 媷I哸3%搶$eU2嘇朚戓H%L #H'垾揺b1A.酊?X;怭円鯟嘔;1x鑥叁餭>#2&q俶b#.,碵擜 P!H:蘞 "璉Dd# J饞  餞A(8??亙Control 483"2*3qFur.]$9;F`!痄*3qFur.]$9;FFh$p2渃d郿``頱```b恆 ff鋊`臆L 媷I宎-3%搶$eU2嘇朚戓H%L #H'垾揺b1A.酊?X;怭円鯟嘔;1溞霅4嗲N}9F^ep70侻(腇\ Xh(p3燘 u櫫*\#檜Ddu!饞  餞A(8??亙Control 643"2饛瀄`檢夛3 潥k`!餭瀄`檢夛3 潥@;狚R1湇懡JA3{蓹S腇壣E雲坃Mj}_醊繥岸窗8寘匨┐"卄謧誥!垐:s榰E 鎣ff 撈P2 崱$8雿zc噸xs.$I爵+翶4 xA 蓖7$Q]i璾$yd 齔-褤#4u${簹hT霌沑筧<iyOf[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 瀃寶N裇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 60,g!ky橆v3u N緥3ucWSNy橕Ny橆vdY 3u鲖篘9hnc陙珟剉xvz鶺@x孴f[/gyr w軶脋0陙L堖b歔xvz槝03u槝亯藌硩 $N*NN~vt^ 哠騍Gl筽 SO皊湝f剉鰁鉔yr乢0顣槝黐T孴R癳a茓0xvz槝 T饄擽h堭從0芉nx0{m0 `N褟s^癳鰁鉔-N齎yrr>yO;NIN`骮xvz亯鑜蛻蜰烻R'`f[tSf[褃S N駇Sxvz柺 yr+R/f燫:_ZQ剉AS]N'Y錘eg`N褟s^;`fN皨(W啒黐╟蹚癳鰁鉔籰齎t?e瀃鯈-N衏鶴剉wQ g烻R'`0鰁鉔'`0c黐'`蛻'Y`骮聣筽剉xvz柺0鶺@xxvz亯芠R邖*廄V匭Yf[/gxvzMR縧孴f[褃鷁緥梺 SO皊wQ g烻R'`0_觔'`剉f[/gR癳鱊

yO褃f[f[褃SO鹼f[/gSO鹼輯韹SO鹼鷁緥0擽(uxvz亯藌硩ZQ孴齎禰婲N裇U\桞l 鬡諂╟蹚ZQ-N.Y蛻'Y砆V{钀ryr+R/fZQ剉AS]NJ\擭-NhQO\O鶴剉sQ鹼hQ@\0婲sQ曑復'Ybeu孴蛻'Y>N猚 Z&qhQ@\'`0beu'`孴MR粀'`剉蛻'Yt簨N皊瀃顣槝 SO皊wQ g垟鵞'`0瀃He'`剉砆V{耂鱊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 P800W[  槝膥;N亯bXT臽礠蔛~{ T覻 TL饄/L鶴u錯gN N錧\OUSMOR錧臽礠~{ T 錘 NbXT褟 Nt^egN,g槝 gsQ剉;N亯xvzb済 鑜f Rir剉t^0gb鶴Hr>y0鶴Hr錯gP800W[  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鱊

y褃xvzt钀钑a翂 Ta3u0 US MO lQ 鄗 t^ g 錯   CONTROL Forms.CommandButton.1 \s  <EPlugger_Data><protectFlag>false</protectFlag></EPlugger_Data> PAGE  PAGE 10 ╜皊(W颯錘ck8^蹚L坘X ╜皊(W颯錘 N Oy橆v3u鲖fN N OMR鲖軴X[3u鲖fNv^sQ頃Wordo忲N 俌済╜梺夘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 @BDFH   胼擅砍灇巺yui`ZTPD;j>UCJ5j朓 VCJ5乁CJ5 CJ5乁 CJ5乁j UCJ5j朓 VCJ5乁CJ5 CJ5乁 CJ5乁j&UCJ5j朓 VCJ5乁CJ5 CJ5乁 CJ5乁jUCJ5j朓 VCJ5乁CJ5 CJ5乁'B*phCJ PJo(mHsHnHtHUCJ5乵HsHnHtHU'B*phCJ PJo(mHsHnHtHU   @ B D F H     @ B D 鐝讜問鏡悐剙tke_[OFjUCJ5j朓 VCJ5乁CJ5 CJ5乁 CJ5乁j UCJ5j朓 VCJ5乁CJ5 CJ5乁 CJ5乁j UCJ5j朓 VCJ5乁CJ5 CJ5乁 CJ5乁j UCJ5j朓 VCJ5乁CJ5 CJ5乁 CJ5乁jUCJ5j朓 VCJ5乁CJ5 CJ5乁 CJ5乁D F H J L N    \ ^ ` b d v x 礴彷訝錄懂枎qf^VNFCJOJQJUCJOJQJo(CJOJQJo(CJOJQJUjYUCJOJQJj朓 VCJOJQJU CJOJQJCJOJQJUCJOJQJo(CJOJQJo(CJOJQJo(CJOJQJo(CJOJQJo( CJo(5 CJo(5 CJ5乁j~UCJ5j朓 VCJ5乁CJ5 CJ5乁 CJo(5 CJo(5 CJo(5 CJ5乁x   " $ < > 咦鍁粱丟晬噦vmga]QHB CJ5乁jUCJ5j朓 VCJ5乁CJ5 CJ5乁 OJQJUjUOJQJj朓 VOJQJUOJQJ OJQJUCJOJQJo( OJQJo( OJQJUj'UOJQJj朓 VOJQJUOJQJ OJQJU OJQJo(CJOJQJo(CJOJQJo(CJOJQJUjUCJOJQJj朓 VCJOJQJU CJOJQJ     . 0  猷諞棠即巿xpkaXNECJ$OJPJQJCJ$OJPJQJo(CJ$OJPJQJCJ$OJPJQJo(OJQJCJOJQJo(CJOJQJo(CJOJQJo( CJ5乁j UCJ5j朓 VCJ5乁CJ5 CJ5乁 CJOJQJCJOJQJo(CJOJQJo(CJOJQJo( OJQJo(CJOJQJo( CJ5乁jUCJ5j朓 VCJ5乁CJ5 CJ5乁  208^bfh蹯庳聞徊晪亁ne[RH?CJOJPJQJCJOJPJQJo(CJOJPJQJCJOJPJQJo(CJOJPJQJCJOJPJQJo(CJOJPJQJCJOJPJQJo(CJOJPJQJo(CJOJPJQJo(CJOJPJQJCJOJPJQJo(CJOJPJQJCJOJPJQJo(CJOJPJQJCJOJPJQJo(CJ$OJPJQJo(CJ$OJPJQJo(CJ$OJPJQJCJ$OJPJQJo( 蹯賡掀汲枍儁of\SI@CJOJPJQJCJOJPJQJo(CJOJPJQJCJOJPJQJo(CJOJPJQJCJOJPJQJo(CJOJPJQJo(CJOJPJQJo(CJOJPJQJCJOJPJQJo(CJOJPJQJCJOJPJQJo(CJOJPJQJCJOJPJQJo(CJOJPJQJCJOJPJQJo(CJOJPJQJCJOJPJQJo(CJOJPJQJCJOJPJQJo( dfFHJPRlnp蹼嶙兔汞憞}tkia[UOIC= CJ4PJo( CJ4PJo( CJ4PJo( CJ4PJo( OJQJo( CJ0PJo(CJOJQJo(o(CJOJPJQJCJOJPJQJCJOJPJQJo(CJOJPJQJo(CJOJPJQJo(CJOJPJQJo(CJOJPJQJo(CJOJPJQJo(CJOJPJQJo(CJOJPJQJo(CJOJPJQJo(CJOJPJQJo(CJOJPJQJo(CJOJPJQJo(CJOJPJQJo($&(*.>@檫濁喊攰xh[QG?5CJ OJPJo(>*CJ OJPJo(CJOJPJo(>*CJ OJPJo(Uj%UCJ OJPJo(j朓 VCJ OJPJo(UCJ OJPJo(CJ OJPJo(UCJOJPJo(>*CJ OJPJo(>*CJ OJPJo(CJ OJPJo(>*CJ OJPJo(Uj"#UCJ OJPJo(j朓 VCJ OJPJo(UCJ OJPJo(CJ OJPJo(UCJ OJPJo(CJ OJPJo( CJ4PJo(@BDxz|~黜逭染椽灁寍oe]UME;CJ OJPJo(UCJOJPJo(CJOJPJo(CJ OJPJo(CJ OJPJo(CJ OJPJo(Uj(UCJ OJPJo(j朓 VCJ OJPJo(UCJ OJPJo(CJ OJPJo(UCJ OJPJo(>*@CJ OJPJo(@CJOJPJo(>*CJ OJPJo(Uj 'UCJ OJPJo(j朓 VCJ OJPJo(UCJ OJPJo(CJ OJPJo(UCJOJPJo( $468lnprv麋諦憑冬噠skcYQA4j.UCJ OJPJo(j朓 VCJ OJPJo(UCJ OJPJo(CJ OJPJo(UCJ OJPJo(CJ OJPJo(CJ OJPJo(>*CJ OJPJo(Uj,UCJ OJPJo(j朓 VCJ OJPJo(UCJ OJPJo(CJ OJPJo(UCJ OJPJo(CJ OJPJo(CJOJPJo(>*CJ OJPJo(Uj*UCJ OJPJo(j朓 VCJ OJPJo(UCJ OJPJo( &(,246>@DJLNVXZ蹼汜咻塾寺付悲!櫁晧噮}{yqomecaYPJo(nHtHo(o(PJo(nHtHo(o(PJo(nHtHo(o(PJo(nHtHo(o(OJPJQJo(nHtHo(o(PJo(nHtHo(o(PJo(nHtHo(o(OJQJo(CJOJPJQJo(CJOJPJQJCJ OJQJo(CJ OJQJo(o(o(o(o(CJ PJo(>*CJ OJPJo(>*CJ OJPJo(U"Zbdhprt "*.0248:<>BDFHLNPR簣鑭邈圪形棠呂付船┃ィ潧櫁晸憦崑墖厓}{yo(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(PJo(nHtHo(o(PJo(nHtHo(o(PJo(nHtHo(o(PJo(nHtHo(PJo(nHtHo(o(PJo(nHtHo(o(PJo(nHtHo(o(/RV""" """:">"D"F"P"R"Z"\"b"d"l"n"v"x"~"""""""""""""""""趄痤礻桄溻噢苴刂蘊募船あ殥妭zrphPJo(nHtHo(PJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHo(PJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHo(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(%""""""""""""""""""""""""""黠邕漬團降搵儃sqiaYQIPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHo(PJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHo(PJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHo(PJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtH""""""""""""""""#### # ####p#t#x#z#|#~##黲礤菡團沒倡搼墎yqia_\ZXSo(o(o(o(o(PJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHo(PJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHo(PJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHPJo(nHtHo(PJo(nHtH################$ $$"$$$&$:$<$@$B$$$$$$$$$$$$$$$$$$$$鐲脬徇漬鈾汕拷懷悲Д槚敀悗寠垎剛~|zxvto(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(PJo(nHtHo(o(PJo(nHtHo(o(PJo(nHtHo(o(PJo(nHtHo(o(PJo(nHtHo(o(PJo(nHtHo(o(PJo(nHtHo(o( B*pho(o( B*pho(,$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$%%%%% % %%%%%%%%%% %"%$%&%(%*%躞耬黼殮邈徇蕆僮沼嚴退汕琶量交狗黨悲┃ィ潧櫁晸憦o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(8*%,%.%0%2%4%6%8%:%<%>%@%B%D%F%H%J%N%P%R%T%X%Z%\%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%躞耬黼殮邈徇招退汕琶量交狗黨悲┃ィ潧櫁晸憦o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(CJaJ CJo(aJo(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(7%%%%%%%%%%%%%%%&&&&& & &&&&&&&&&& &"&$&(&*&,&0&2&4&&&&&&&&&&&&&&&&躞耬黼殮邈徇蕆僮沼嚴退汕琶量交串Д!煗洐棔搼弽o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o( CJo(aJ CJo(aJo(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(6&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&''''' ' ''''''''躞耬黼殮邈徇蕆僮沼嚴退汕琶量交狗黨悲┃ィ潧櫁晸憦o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(8'''"'$'&'(','.'0't'x'|'~''''''''''''''''''''''''''痍玨闋沼嚴退汕琶涼抱ィ洆墖厎ukigo(o(o(mH sH nHtHPJo(nHtHPJo(nHtHo(o(o(mH sH nHtHPJo(nHtHPJo(nHtHo(o(o(mH sH nHtHPJo(nHtHPJo(nHtHo(o(o(o(o(o(o(o(o(o(o(PJo(mH sH nHtHo(o(o( CJo(aJ CJo(aJo(o(o(o(&''''((((((((@(B(F(H(R(T(Z(\(^(`(d(f(h(j(n(p(|(~(黠黼闞賢嗣還帆煋噮{ywujheYMPJo(mH sH nHtHPJo(mH sH nHtHo(o(o(mH sH nHtHo(o(o(o(mH sH nHtHo(PJo(mH sH nHtHPJo(mH sH nHtHPJo(mH sH nHtHPJo(mH sH nHtHo(o(PJo(nHtHPJo(nHtHo(o(o(mHsHnHtHUPJo(nHtHPJo(nHtHo(o(PJo(nHtHPJo(nHtH~((((((((((z)|)~))))))))))))))********+++ ++D+H+J+T+V+X+Z+\+j+l+n+t+v+|+~+++黠溻噢苴刂砸橋昧拷還Δ灉殬o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(o(PJo(nHtHPJo(nHtHPJo(nHtH7++++++++++V,Z,\,`,d,f,r,t,v,z,~,,,,,,,,,,,,耠暹巰評寒牁攽弻厒uspndZB*phCJo(5B*phCJo(5o(0JU0JmHsHnHtHU0JUo(0JU0JUCJOJQJo(CJOJPJQJo(nHtHCJOJQJo(nHtH CJo(5 CJ5乁j0UCJ5j朓 VCJ5乁CJ5 CJ5乁 CJo(5 CJo(5CJ5乵HsHnHtHU,,,--,-.-0-x-z-----(.*.R.T.....賅痔練檹厈qg]SI?B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5.//z/|/////0000蹼嶙兔暴CJOJQJo(B*pho(5B*pho(5B*phCJ5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5B*phCJo(5 H J L  d $ 0 w & F hdhG$ hH$ & F Hdh H & F Hdh H & F Hdh H & F Hdh H & F hdhG$ hH$dG$H$dG$H$dG$H$  vdp4`4dp4`4dp4`4dp4`4dp4`4dp4`4dp4`4dp4`4dp0`0d\a$$7]7` & F hdG$ hH$ & F hdhG$ hH$ fHRnp G$H$$If G$H$$Ifa$$a$$a$$a$$a$$d 4`4dp4`4dp4`4dp4`4dp4`4dp4`4 ,xocW dG$H$$If dG$H$$If G$H$$If$$If:V 444404f4斃0|-!枲55     & !"#$%'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUfWXYZ[\]^_`abcdenghijklm~opqrstuvwxyz{|},.@BxocW dG$H$$If dG$H$$If G$H$$If$$If:V 444404f4斃0|-!枲55zqe d軋G$H$$If G$H$$If$$If:V 444404f40|-!枲55"xocW dG$H$$If dG$H$$If G$H$$If$$If:V 444404f4斃0|-!枲55"$6txoc d,G$H$$If G$H$$If$$If:V 444404f4斃0|-!枲55tvxob YD2G$H$$If G$H$$If$$If:V 444404f4斃0|-!枲55xlf`ZTI da$$G$H$# ^# # ^# # ^# # ^# dG$H$勞^勞$$If:V 444404f4斃0|-!枲55 i`WN a$$$If a$$$If a$$$If$$If:V 44J44J0` 覽4f4#  覽p 覽5#$Ifd d (*,46@B a$$$If a$$$If a$$$If a$$$IfFfO3 a$$$If a$$$If a$$$IfBD$$If:V 44J44J0` 覽4f4旞謀! # (覽覽覽覽p(覽覽覽覽5!5585DLNXZdfhrt a$$$If a$$$If a$$$If a$$$IfFf5 a$$$If a$$$If a$$$If a$$$If a$$$If a$$$If $$If:V 44J44J0` 覽4f4旞謀! # (覽覽覽覽p(覽覽覽覽5!5585E<3 a$$$If a$$$If$$If:V 44J44J0` 覽4f4旞0!# 覽覽p覽覽5!5 a$$$If a$$$IfXO a$$$Ifp$$If:V 44l44l04f4旞#5# a$$$Ifa$$Ff8 a$$$If a$$$If a$$$If a$$$If ",./$$If:V 44l44l04f4旞謀#55558 a$$$If a$$$If a$$$If.0246 a$$$If a$$$If a$$$If a$$$If68:<>JA8/ a$$$If a$$$If a$$$If$$If:V 44l44l04f4旞謀#55558# <覽覽覽覽覽覽p<覽覽覽覽覽覽5!5585t55pFfO3]$$If:V 44J44J0` 覽4f4旞謭! l# <覽覽覽覽覽覽p<覽覽覽覽覽覽5!5585t55pFf5]$$If:V 44J44J0` 覽4f4旞謭! l# <覽覽覽覽覽覽p<覽覽覽覽覽覽5!5585t55pFf8$$If:V 44440` 覽斦譃@ !# 諪覽覽覽覽覽覽覽p諪覽覽覽覽覽覽覽558555 55Ff:$$If:V 44440` 覽斂譃@ !# 諪覽覽覽覽覽覽覽p諪覽覽覽覽覽覽覽558555 55Ff)=$$If:V 44440` 覽敜譃@ !# 諪覽覽覽覽覽覽覽p諪覽覽覽覽覽覽覽558555 55Ff?$$If:V 44440` 覽敜譃@ !#>@BDFA8/ a$$$If a$$$If$$If:V 44l44l04f4旞謀#55558 a$$$IfFHJLN8/ a$$$If$$If:V 44l44l04f4旞謀#55558 a$$$If a$$$IfNPRTV/$$If:V 44l44l04f4旞謀#55558 a$$$If a$$$If a$$$IfV"""$Ifp$$If:V 44l44l04f4擜#5# a$$$If"" """<"{ 刬`刬$Ifa$$a$$p$$If:V 44l44l04f4攩#5#<">"F"R"\"d"n"x"ypg^ULC a$$$If a$$$If a$$$If a$$$If a$$$If a$$$If$$If:V 44440` 覽4f4斒#  覽p 覽5#x""""""""""""""" a$$$If a$$$If a$$$If a$$$IfFf)= a$$$If a$$$If a$$$If a$$$If a$$$If a$$$If a$$$IfFf: a$$$If""""""""""""""" a$$$If a$$$IfFfsB a$$$If a$$$If a$$$If a$$$If a$$$If a$$$If a$$$IfFf? a$$$If a$$$If a$$$If 諪覽覽覽覽覽覽覽p諪覽覽覽覽覽覽覽558555 55FfsB$$If:V 44440` 覽敜譃@ !# 諪覽覽覽覽覽覽覽p諪覽覽覽覽覽覽覽558555 55FfE$$If:V 44440` 覽敜譃@ !# 諪覽覽覽覽覽覽覽p諪覽覽覽覽覽覽覽558555 55Ff紾$$If:V 44440` 覽敜譃@ !# 諪覽覽覽覽覽覽覽p諪覽覽覽覽覽覽覽558555 55FfbJ$$If:V 44440` 覽敜譃@ !# 諪覽覽覽覽覽覽覽p諪覽覽覽覽覽覽覽558555 55FfM$$If:V 44440` 覽敜譃@ !# 諪覽覽覽覽覽覽覽p諪覽覽覽覽覽覽覽558555 55Ff琌$$If:V 44440` 覽敜譃@ !#"""""""""""""""Ff紾 a$$$If a$$$If a$$$If a$$$If a$$$If a$$$If a$$$IfFfE a$$$If a$$$If a$$$If a$$$If a$$$If""""""""""""""" a$$$If a$$$If a$$$If a$$$If a$$$If a$$$IfFfbJ a$$$If a$$$If a$$$If a$$$If a$$$If a$$$If a$$$If"""""""""##### # a$$$If a$$$If a$$$If a$$$IfFf琌 a$$$If a$$$If a$$$If a$$$If a$$$If a$$$If a$$$IfFfM a$$$If # #####r#t#v#d^$Ifp$$If:V 44l44l04f4>#5#$Ifa$$FfQR a$$$If a$$$If a$$$Ifv#x#z#~####vp$If a$$$Ifa$$@&a$$a$$p$$If:V 44l44l04f4斦#5#####WNE a$$$If a$$$If$$If:V 44l44l0` 覽4f4旊0p# 覽覽p覽覽5p5l######WNE<3 a$$$If a$$$If a$$$If a$$$If$$If:V 44l44l0` 覽4f4斍0p# 覽覽p覽覽5p5l##$$If:V 44l44l0` 覽4f4斖謀pl# (覽覽覽覽p(覽覽覽覽5p5 5p# $ $$$$&$E<3 a$$$If a$$$If$$If:V 44l44l0` 覽4f4斖0p# 覽覽p覽覽5p5l a$$$If a$$$If&$<$>$ a$$$If a$$$If>$@$B$$$If:V 44l44l0` 覽4f4斖謀pl# (覽覽覽覽p(覽覽覽覽5p5 5pB$$$$$$$$$$$|vpjd^$If$If$If$If$If$If$If$Ifk$$If:V 44l44l0#5#$If $$$$$$$$$$$$$$$$$$$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$$$$$$$$$$$$$$$$$$$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$$$$$$$$$$%%%%% % %%$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If%%%%%%%%% %"%$%&%(%*%,%.%0%$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If0%2%4%6%8%:%<%>%@%B%D%F%H%J%L%$If$If$If$If$If$If$If$If$If$If$If$If$If$IfL%N%P%R%V% a$$$Ifa$$a$$m$$If:V 44l44l0(#5#V%X%Z%\%%$Ifa$$a$$k$$If:V 44440桘5%%%%%%%%%%%|vpjd^$If$If$If$If$If$If$If$If$Ifk$$If:V 44l44l0#5# %%%%%%%%%%%%%%%%%%$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If%%%%%%%%%%%%%%%%%%$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If%%&&&&& & &&&&&&&&&&$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If& &"&$&&&(&*&.&zxr$Ifm$$If:V 44l44l0攊/#5#$If$If$If$If.&0&2&4&&$Ifk$$If:V 44440桘5&&&&&&&&&&&ztnhb\$If$If$If$If$If$If$If$If$Ifm$$If:V 44l44l0敂#5# &&&&&&&&&&&&&&&&&&$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If&&&&&&&&&&&&&&&&&&$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If&&&&&&&&&&&&&'''''$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If$If' ' '''''''''' '$If$If$If$If$If$If$If$If$If$If$If$If '"'&'*' a$$$Ifa$$m$$If:V 44l44l0-1#5#*','.'0'v'$Ifa$$a$$k$$If:V 44440桘5v'x'z'|'m$$If:V 44l44l0斝#5#$Ifm$$If:V 44l44l0敂#5#|'~''''''kbYP a$$$If a$$$If a$$$If$$If:V 44l44l0` 覽4f4攽#  覽p 覽5#$Ifa$$''''5,# a$$$If a$$$If$$If:V 44l44l0` 覽敭諪 #    覽覽覽p覽覽覽555'''',a$$WD劋`劋$If$$If:V 44l44l0` 覽敭諪 #    覽覽覽p覽覽覽555 a$$$If''''#$$If:V 44l44l0` 覽敭諪 #    覽覽覽p覽覽覽555 a$$$If a$$$If'''' a$$$If a$$$Ifa$$WD劋`劋$If''''5& a$$$Ifa$$VD劋^劋$If$$If:V 44l44l0` 覽敭諪 #    覽覽覽p覽覽覽555'''(,# a$$$If$$If:V 44l44l0` 覽敭諪 #    覽覽覽p覽覽覽555 a$$$If((((#$$If:V 44l44l0` 覽敭諪 #    覽覽覽p覽覽覽555 a$$$If a$$$If(((( a$$$If a$$$If a$$$If((B(H(5,# a$$$If a$$$If$$If:V 44l44l0` 覽敭諪 #    覽覽覽p覽覽覽555H(T(`(l(n(p(~((((((($Ifa$$FfW a$$$If a$$$If a$$$If a$$$If a$$$IfFf鯰 a$$$If a$$$If a$$$If (((|)~))yiXG6d\凞]凞刞`刞$Ifd\凞]凞刞`刞$Ifd\凞]凞劙`劙$IfdhG$H$刬^刬$If$$If:V 44l44l0` 覽4f4,#  覽p 覽5#)))))c]$If$$If:V 44l44l0` 覽4f4擿 #  覽p 覽5#$Ifd4a$$剒`剒$If)))*** +ysd^M9d4a$$劋]劋剼`剼$Ifd4劋]劋刕`刕$If$Ifd\WD劋`劋$If$If$$If:V 44l44l0` 覽4f4#  覽p 覽5# + ++F+sm$If$$If:V 44l44l0` 覽4f4旪 #  覽p 覽5#$If1r1r歫:歫: h刪^刪剺剺(0 H凥^凥刓刓) 勳^勳刓刓. 剱^剱刓刓. 44^4刓刓)  勜 ^勜 刓刓. | 剕 ^剕 刓刓.   ^ 刓刓) 勀^勀刓刓. 匎^匎剺剺() 勣^勣刓刓) 剛^剛刓刓. &&^&刓刓. 勈^勈刓刓) n 刵 ^刵 刓刓.   ^ 刓刓.  劧 ^劧 刓刓) Z刏^刏刓刓.歫:1r&66666666 0@P`p6666 0@P`p 0@P`p 0@P`p 0@P`p 0@P`p 0@P`pJ@Jck噀 a$$1$ CJaJKHmH sH nHtH_H$A@$貫祂=刉[SONi@Nnf恏FNV"<"x""""" #v#####&$>$B$$$$%0%L%V%%%%%&.&&&&&' '*'v'|'''''''(((H(()) +F+\++d,,*.00456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~]G.郲x @Times New Roman-(媅SO3$ .郲x @ArialA4  N媅_GB2312N媅A4  wiSO_GB2312wiSO- 鷟8褳SO;4 噀'Yh媅{媅SO N,倅橆v3u鲖fN NHr F1g漑^t (萉hE月F¨曮& !嗕{jN!),.:;?]}    & 6"0000 0 0 00000 =@\]^([{  0 0 00000;[哌P)?鍉+* ^^^^m& 鵐Y竒瓃QgRm褃&n銃 91?\琩(ef檌胟 ,8痳);K /@@欱aHLO瀧簘= e * 6 = 乮 G , z \ 黿  : U Y 襜 衘 鈑 A  Lr %/??媧F|Q O#F:AHW%.1?鍰磏-* 81H!皉銁m}pGYC,116M<抧%KoRVW{[U]箄/猏#g琱飡+OBpN[\xpH)粃'穚)v ! !;!tB!廎!o!r~!5";"義"#o5#F#稫#軰#R#Y#2$$C$E$,$%%%(*%C?%紽%鋂%/H&?e&s& 'Y#'&'怹'踚'Pu' (b(f'(#L(&)+) 1)0<)zT)梄)頴)*"%*9*(+6+>+遠+鍉+,, ,!,S,荰, W,芢,&-齨-.>.羂.蔨.[b.剅././pC/&Y/閤/( 0L70H0Pc0Yz0 1 1 1Q16>12g 2$2 3/33A63&E3u^3鏯30 4#4癘4]U4膠4n$5,5TH55P556,6>06a`677 ,7-7<7:?78-8?8狾8{j8E9 9R9.9:d9畉9鎦9:F:#:wY:#_:竊:篶:Ph:耾:B|:|);=@;;碽;<<3<鬌<霿<<q=TI={X=s]>a>耬>譲? @ :@窹A^hA媓AB[CC%0C痓C萾C1D蔆DykD>rDE@%E%E鑆E/EFF-F*F4>F鳿F鱧F+}F^G=G鞨GfTGHH+.HQ:HyIH%I-I;I羬I鐍I恔JpK!K?=KzBKYRK媓K+uKu|KLL L.)L8=L嶦L蒄L2HLaMu}M8N籌N9 O&O5OPP;PtDPQhQ濼QlQ(R(Rf)RJJR簈RSm$SSPT4TVZTzcT蟬TEU_!UQtU陊U諥VGV楽V糫VWmW宼W|xWNZXGsX_)Y6Y抧Y{Z嶳ZiZ.rZ [e[\f\f\4]t]G8^~D^t[^_郃_``X;aTaba鉷abbbb:b駽b.#c.+cKZcQd奛d鴋d:$e(e8eFe@}e+f匩f!!g%g汿g宺gIOh薴h0i 8i蒝i禿i"j綶jVkk2kX;kTMk擶k;\k輄kl+lg$l$l3l8lldlm)0ma3mAIm襅mlmn n甞n襣n攐noG9o賃op> p蠥p鯯p辠p瞸p#qR*q rr&Nrr俲rurqvrs'sR3s\s^sR_stR?t*wtu'u)u闕uv vvv螸v滿v鷔v #w0w齅wABx奧x鵚xyI y_!y羖y辸yzz{{#m{葄{z{{C#|8|G| o|~, +- !;\<薈鯤MW] Ae4\Z昣Lup 譥奾紐'ELE痜.(3,Q-楥檤G=eC0$ 9$r"*Lt竜8H昉cS^l胠- LfPw_痡,>砎~ F:M隫荳Zi﹜`T6秇噋!9+P(YoZ猦J.bNh抷 礚WSv=M@酟疶dha$$G$H$劆]劆$$If:V 44l44l0` 覽4f4攠 #  覽p 覽5# 匄`匄$Ifd4a$$剒`剒$Ifd4a$$刕`刕$If+++X,Z,\,^,`,b,d,qeP 9r 9r &dP  9r 9r dha$$G$H$劆]劆I$$If:V 44444f4旍5dhG$H$劆]劆$Ifdha$$G$H$劆]劆dha$$G$H$劆]劆 d,v,x,z,|,~,,,,,,,,,, &dP 9r 9r 刪]刪 9r #$匋&` 9r   9r 9r   9r 9r  9r 9r 刪]刪 9r 9r 刪]刪 9r #$匋&` 9r ,,,-.-0-z---*.| d劋^劋劋`劋Q & F d E苺p骹) & F d d &dP *.T.../|////0~n^YVd & F d  & F d  & F d  & F d  & F d Q & F d E苺p骹) 0000dha$$G$H$劆]劆;0皞. 捌A!拔#悹"盃$悹%癝班2P18/R 0?0P皞. 捌A!拔#悹"盃$悹%癝班2P18/R 0; 0皞. 捌A!拔#悹"盃$悹%癝班2P18/R 08皞. 捌A!拔#悹"盃$悹%癝班2P18/R 0; 0皞. 捌A!拔#悹"盃$悹%癝班2P18/R 0; 0皞. 捌A!拔#悹"盃$悹%癝班2P18/R 0; 0皞. 捌A!拔#悹"盃$悹%癝班2P18/R 08皞. 捌A!拔#悹"盃$悹%癝班2P18/R 0; 0皞. 捌A!拔#悹"盃$po 6瑌 甔Gn,魿Ap ( vh`?P$y/<m]"#2.V1ib踕(^欰|S朧唂%(\FP9/>@\oG"):騡:t +=Tx#0889PF`s?)粿/` m,俧5bO, ?6_A &/5u #銱4a-q#A59YX_xNc Z`g憓aY!橭bi#!47$E=d;NK);*;|s 1醱Q(t-匷>醟鬹~E +",?揝m\耾<@ U雗[S羬#2$P9慲縤RkT57嶲沢A糡SjZ/)3d$DJ蘊<'鰿╱ v薫({8.vGXJYa桹\躨唜+w &+3t7NBT$4f9bAP甊昚餭Y|?aD'o'J*9諫ibMw}8M_鉮@ 1漀K)5瑻_N譜裻孒^O|l:鳹闣/; J%瀃 g<眗/鏴* r,x2Dv1_Ig:?篩嘮vG}-i9,FP `-/9淽坉踤6LEeE籉6|w"'u6圿媀O"v="n穡6sM R<醩n{.lK孮ipnx"n/'M苰:QCd鱣僴絫,\SYI8 KCMfWm28Qo99K &oyE(3)+烪1, '-IO70&y4=73Ku7SH8]C=zM?#馌F Dd7翭u4G礬塉U豃%J鬔r+鸎縹^N*萇d鱋X'RS軾蘏_2僒yL蚑7"Vs璙玞L[^[- Ua無筫mMf苮."錸k91q"聑_A﹞R%鷞`D \  !]=~2o#]###########################################################################&餳  /2$u4陋藂uI=璭2$0`煨.T ;=V 2$曡)}r詭穏峝Z2$餕sb飈[/禘H2$'くR*僀$8嚨2$4N6 甓塒顨9~R2$~*寕I択XK塴迗~2$識lz阭72$粊 H c e r ]W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙W晙 ]!!晙 _Hlk13735039 _1544993090 _1545042441 _1545033130 _1545033131 _1545033133 _1543729331 _1545029401 _1544943273 _1543729335 _1543729336 _1543729337 _1545033141 _1545033142 _1544943280 _Hlk62638473 _Hlk62552337 _Hlk62638488 _1578137179 _1545042459 _1545033263 _1545033264 _1545042462 _1545042463 _1545042464 _1545033151#&DdMsu! H r ] #&DdM! H r -]VVVVVVVVVV V V V V VVVV V V V VVVVVVVVVVProject.IDCardNo_check.CIDCheck"Project.IDCardNo_check.CheckCIDC15"Project.IDCardNo_check.CheckCIDC18%Project.IDCardNo_check.getCIDBirthdayProject.ThisDocument.FilePrint%Project.ThisDocument.FilePrintDefaultProject.ThisDocument.GetPath Project.ThisDocument.PrintTheDocProject.fun_for_word97.SplitStr!Project.fun_for_word97.VB5ReplaceProject.pub_check.GetDoc$Project.pub_check.OnlyKeyPressNumberProject.pub_check.checItemProject.pub_check.checkAllProject.pub_check.currencySetProject.pub_check.exitFunProject.pub_check.getCellValueProject.pub_check.getControl#Project.pub_check.getValueToControlProject.pub_check.invertInput!Project.pub_check.invertInputNum2Project.pub_check.makeXML#Project.pub_check.makeXMLReportDataProject.pub_check.mastInputProje悹%癝班2P18/R 08皞. 捌A!拔#悹"盃$悹%癝班2P18/R 0; 0皞. 捌A!拔#悹"盃$悹%癝班2P18/R 08皞. 捌A!拔#悹"盃$悹%癝班2P18/R 0; 0皞. 捌A!拔#悹"盃$悹%癝班2P18/R 0; 0皞. 捌A!拔#悹"盃$悹%癝班2P18/R 0 諪覽覽覽覽覽覽覽p諪覽覽覽覽覽覽覽558555 55FfQR$$If:V 44l44l0` 覽敭謗j F# 2覽覽覽覽覽p2覽覽覽覽覽55R55N5H Ff鯰$$If:V 44l44l0` 覽敭謗j F# 2覽覽覽覽覽p2覽覽覽覽覽55R55N5H FfWct.pub_check.mastInputFee#Project.pub_check.setProcessControlProject.pub_check.setpasdProject.pub_check.textBoxFilter#Project.pub_check.textBoxNoCNFilterProject.pub_check.unlockDocProject.pub_check.wd_protectPROJECT.THISDOCUMENT.FILEPRINT%PROJECT.THISDOCUMENT.FILEPRINTDEFAULTPROJECT.THISDOCUMENT.GETPATH PROJECT.THISDOCUMENT.PRINTTHEDOCPROJECT.PUB_CHECK.CHECITEMPROJECT.PUB_CHECK.CHECKALLPROJECT.PUB_CHECK.CURRENCYSETPROJECT.PUB_CHECK.EXITFUNPROJECT.PUB_CHECK.GETCELLVALUE PROJECT.PUB_CHECK.GETCONTROL PROJECT.PUB_CHECK.GETDOC #PROJECT.PUB_CHECK.GETVALUETOCONTROL PROJECT.PUB_CHECK.INVERTINPUT !PROJECT.PUB_CHECK.INVERTINPUTNUM2PROJECT.PUB_CHECK.MAKEXML#PROJECT.PUB_CHECK.MAKEXMLREPORTDATAPROJECT.PUB_CHECK.MASTINPUTPROJECT.PUB_CHECK.MASTINPUTFEE$PROJECT.PUB_CHECK.ONLYKEYPRESSNUMBERPROJECT.PUB_CHECK.SETPASD#PROJECT.PUB_CHECK.SETPROCESSCONTROLPROJECT.PUB_CHECK.TEXTBOXFILTER#PROJECT.PUB_CHECK.TEXTBOXNOCNFILTERPROJECT.PUB_CHECK.UNLOCKDOCPROJECT.PUB_CHECK.WD_PROTECTPROJECT.FUN_FOR_WORD97.SPLITSTR!PROJECT.FUN_FOR_WORD97.VB5REPLACE"PROJECT.IDCARDNO_CHECK.CHECKCIDC15"PROJECT.IDCARDNO_CHECK.CHECKCIDC18PROJECT.IDCARDNO_CHECK.CIDCHECK%PROJECT.IDCARDNO_CHECK.GETCIDBIRTHDAY@     ! $ '*-0369<?BEH