ࡱ> [^Zq` R.'bjbjqPqPE::QC00004"""h(#Dl#8$$@D$D$D$&&&1P7P7P7P7P7P7$:h<t7!;'%"&;';'t700D$D$7&)+)+)+;'r08D$D$/)+;'1)+)+h)+D$# }2"()+-7H8)+=)=)+"=K+@&"&&)+>&R&&&&t7t7*&&&8;';';';'$d< <000000  q\^"?e@\eNq\^QNQQg@\ "Q02019012S  q\^"?e@\ q\^QNQQg@\sQN N2019t^wsNQNSU\NyDё cMRyb vw ^^\ gsQUSMO 9hnc 0Ym_lw"?eS Ym_lwQNQQgSsQNcMR N2019t^wsNQNSU\NyDёvw 0Ym"Q02018073S Bl s\2019t^wsNQNSU\NyDёcMRyb 89.1NCQ N~`ONDN v^1\ gsQNywY N N0`ON cgq NvDёT^NR =[]\Oce ĉyv{tTDёO(u w~~[e nxO(Wĉ[eQ[b^NR0 N0yv[bT,SeZP}Y;`~T~Heċ,R:_bHe[ O,ib'Yyv^q_TRT&^RR0 ,g!k NDёR 2130199vQNQN/eQ {yv0 DNq\^2019t^wsNQNSU\NyDёcMRyb RMh q\^"?e@\00 q\^QNQQg@\ 2019t^6g52019t^6g6e DN q\^2018t^wsNQNSU\NyDёcMRyb RMh ^Syv Ty^USMO^Q[ёNCQ 1"$8:LPRTlnprtӰyiM=/h{BhCDCJ OJaJ o(h{BhCDCJ OJQJaJ o(6jhmhu<CJ OJPJUaJ mHnHo(uhs[hmCJ OJPJaJ o(h4sCJ OJPJaJ o(hgnkCJ OJPJo(hCDCJ OJPJo('h\*h\*5B*CJPOJPJo(ph*h\*h\*5<B*CJPOJPJo(phhqCJ OJPJaJ o(h(hCDCJ OJPJaJ o(hCDCJOJPJaJo(hG*hCD5CJ OJPJo($28:L7kd$$Ifl40" t0644 lap$ 4$Ifa$gd\*l7VD ]^7gdA]$  ^`a$gdA]&(','LNPRTnZN?2 $ la$gdlU$ 4a$gdA] 4gdgnkkd$$Ifl40"  t0644 lap$ 4$Ifa$gd\*lnrt @ sssee pdWD`pgd\*$pdWD`pa$gd\* $da$gdJe;Q$ dDC$EƀOvGa$gd A$ dDa$gd A$ da$gd{B t    D F N P T X \ b j @ B D Ÿpppp^O^h%CJ OJPJQJaJ o(#h/h\*CJ OJPJQJaJ o(h%CJ OJPJQJaJ o(h\*CJ OJPJQJaJ o(h%CJ OJPJaJ o(hCDCJ OJPJaJ o(hJe;hCDCJ OJPJaJ o(h\*CJ OJPJaJ o(hCDOJPJo(hhCDCJ,OJPJaJ,o(&HhOvGhW$CJ,OJPJaJ,o(hW$CJ,OJPJaJ,o(   < @ P R V b d l r t ްޚ{{k^O=#h/h\*CJ$OJPJQJaJ$o(h\*CJ OJPJQJaJ o(h\*CJ OJPJaJ o(hJe;h\*CJ OJPJaJ o(<h%hW$CJ OJPJQJaJ cHdhdhdhOvGo(*HhOvGhW$CJ OJPJQJaJ o(<h\*hW$CJ OJPJQJaJ cHdhdhdhOvGo(h%CJ OJPJQJaJ o(h\*CJ OJPJQJaJ o(#h:[h\*CJ OJPJQJaJ o(     )] dC$EƀOvGWD` gdW$oOvGd&WD`] dC$EƀOvGWDn` gdW$oOvGd&WD`  dWD` gd\* pdWD`pgd\*   > @ d n`RJdgd\* pdWD`pgd\* dWD`gd\* dWDn` gdW$oOvGd&WD` dWD` gdW$oOvGd&WD`] dC$EƀOvGWD` gdW$oOvGd&WD` $d$1$Ifa$gdK$dp--XD2YD2a$gd\* dp-XD2gd\* $$$$$:$<$l$n$r$t$v$x$z$$$$$$%%% %Ⱦraaaa!h| CJKHOJQJ^JaJo(.Hhz2vh9CJKHOJQJ^JaJo(!h%CJKHOJQJ^JaJo(h\*CJKHOJQJ^JaJU!h\*CJKHOJQJ^JaJo(h\*CJKHaJ$h\*5CJKHOJQJ\^JaJ'h\*5CJKHOJQJ\^JaJo(h/h\*CJ$OJPJaJ$o($ $$&$<$n$t$o^M^^M^$d$1$Ifa$gdK$d$1$Ifa$gdKkdh$$IfTlrT~(/&& & &/644 laTWB\Rir2u]\Oq\^QNQQg@\ q\^\ugr}Q;S@\ WB\RiruuvKmfvKmNAmǑ7h4474N 112u*s{Qksu{k*se[SYtq\^QNQQg@\ q\^\ugr}Q;S@\ 2017t^{Qksu{k*se[SYtϑ224604Y 2019t^{Qksu{k*se[SYt62.43QNT(ϑ[hQv{q\^QNQQg@\bQO[hQSQNT(ϑ[hQv{13.74ؚQN:ghb^ePeW{YOb^bb:gS/WY 8S1.5nf1g{YOb^bb:gS/WY 2S0.5T 89.1 b q\^"?e@\RlQ[ 2019t^6g25epSS     PAGE    PAGE 1 PAGE    PAGE 3 t$v$z$$$$%o^M<<M$d$1$Ifa$gd| $d$1$Ifa$gdK$d$1$Ifa$gdKkdA$$IfTl+rT~(/&  /644 laT% %"%&%:%L%l%^M<M$d$1$Ifa$gd| $d$1$Ifa$gdKkd($$IfTlrT~(/  /644 laT$d$1$Ifa$gdK %"%$%&%8%:%J%L%j%l%t%v%x%z%|%%%%%%%%%%%%%%%% &&&&&Ӹ㓧㓧}j}ZhJe;h\*CJ OJPJaJ o($hmJ5CJKHOJQJ^JaJo(*hmGBh\*5CJKHOJQJ^JaJo('hHih\*CJKHOJQJ^JaJo(!hmJCJKHOJQJ^JaJo(h\*CJKHaJ!h| CJKHOJQJ^JaJo(h\*CJKHOJQJ^JaJ!h\*CJKHOJQJ^JaJo(h\*CJKHaJo("l%v%x%|%%%%%^MM$d$1$Ifa$gdKkd $$IfTlrT~(/  /644 laT$d$1$Ifa$gdK%%%%%%%n]L]L]$d$1$Ifa$gdK$d$1$Ifa$gdKkd$$IfTl4rT~(/  /644 laT%% &&n]]$d$1$Ifa$gdKkd$$IfTl4rT~(/  /644 laT&&&&&4' dgdW$oOvGi~dC$EƀOvGVDCWD^~`gdW$oOvGd&VDWD^` $da$gdJe;Vkd$$IfTl0~(/(/644 laT&&& &&&(&D&F&H&J&T&V&X&ʺw^>3#hThA]CJOJPJaJo(hA]CJ OJPJo(>h]xhA]hW$CJOJPJaJcHdhdhdhPvGo(0hA]hW$OJPJcHdhdhdhPvGo(4hA]hW$CJOJPJcHdhdhdhPvGo(&HhPvGhW$CJ OJPJaJ o(&HhPvGhA]CJ OJPJaJ o(hJe;hCDCJ OJPJaJ o(hJe;hW$CJ OJPJaJ o(#HhPvGhW$CJ OJPJaJ &HhOvGhCDCJ OJPJaJ o( & &"&$&&&(&*&,&.&0&2&4&6&8&:&<&JdC$EƀPvGgdJe;dgdJe;&~dVDCWD^~`gdW$oOvGd&VDWD^`<&>&@&B&D&F&H&T&&&&\- ^gdW$oPvGd&$ ^$d &d (d N P R $$d &d (d N P R gdUcdgdJe;JdC$EƀPvGgdJe; X&j&|&&&&&&&&&&&&&&&&&&&&&&&&&&&ξ򾞓}w}wsj^V^I^jheF0JCJmHnHuh%0JCJjh%0JCJUh%0JCJo(h% h%0Jjh%0JUhYjhYUhA]CJ OJPJo(>hThA]hW$CJOJPJaJcHdhdhdhPvGo(hThrCJOJPJaJo(&HhPvGhW$CJOJPJaJo(hThA]CJOJPJaJo(hW$CJOJPJaJo(&&&&&&&&&&&&&&'''"'$'&'('*',' hh]h`h&`#$&&&&''' ' '''''"'&'('*','.'hA]CJ OJPJo(hKhYheF0JCJmHnHuh%0JCJjh%0JCJUh%0JCJo( h%0Jjh%0JUh%,'.'- ^gdW$oPvGd&$ ^$d &d (d N P R D&P 0pu1Z2P/R :p{W. A!4"#2$%S G&P 0pu1Z2P0/R :pmJA .!"2#4$%S o&P 0pu1Z2P0/R :pW$A .!"2#4$%S CPvG920. A!4"#2$$$If!vh55#v#v:Vl4 t06+,55p$$If!vh55#v#v:Vl4 t06+55p$$If!vh55 5 55#v#v #v #v#v:V l/6,55 5 559/ /  / T$$If!vh55 5 55#v#v #v #v#v:V l+/6,55 5 559/ / / /  T$$If!vh55 5 55#v#v #v #v#v:V l/6,55 5 55/ / / /  T$$If!vh55 5 55#v#v #v #v#v:V l/6,55 5 55/ / / /  T$$If!vh55 5 55#v#v #v #v#v:V l4/6++,55 5 55/  /  / / / T$$If!vh55 5 55#v#v #v #v#v:V l4/6++,55 5 55/ / / /  T$$If!vh5(5#v(#v:V l/6,5(5/ /  / TJ@J cke $1$a$ CJKH_HaJmH nHsH tH$A@$ ؞k=W[SOFi@F nfh77r1KmpMElq*9_9(!=r{WRXLfMi(&'( 7:;=L`  AcceptRevisionsl% BookNamese CurUserNameEhahaT$NewInfo>TitleStr?@ABCDEFGHIKLMNOPQSTUVWXY\]p{`kbcdefghijlmnoqwrstuvxyz|}~Root Entry F2_@HData #1Table+=WordDocumentESummaryInformation(JDocumentSummaryInformation8RMacros%}2}2VBA}2}2dir__SRP_0 a/__SRP_1__SRP_2   !"#$%&'()*+,-./012345689;<=>?@ABCDEFGHIJKLMOPQRSUVWXYZ[\]^_`abcdefgijklmnpqrstuvwyz|}~0* pHdProjectQ(@= l ' ^ J< rstdole>stdoleP h%^*\G{00020430-C 0046}#2.0#0#C:\WINDOWS\system32\e2.tlb#OLE Automation`ENormalENCrmaQF  *\C m! OfficgOficg!G{2DF8D04C-5BFA-101B-BHDE5gAAe4 2ggram Files\C ommonMicrosoft Shared\OFFICE11\MSO.DLL#M 9.0 Ob Libra,ry@%BxMSBFAs>MSFDBs3 @cD452EE1-E08F/A-8-02608C4D0BB4cFM20 'B p&/;"~1{B~ 00}#0# ў50 A7CA6D9-0119-4C2A-9F28-CA298FCB8BAD6Users\zsds\AppData\Local\Temp0\VBEa6.eG}է* 0K=.a* FDocumentInitWord ShowToolBar Document_Open @p Fb F FvKA?P D FFD<4FMLjJxCj6~ {J0| {lFWJO PrintTitleCB!-6S` Qȏ[qJ eUserFormZQ!'B- F3Dynamic Y  app ShowMarkCB NonMarkCB PrinNoTitleCBPrinNoTitleCB_ClickPrintTitleCB_ClickNonMarkCB_ClickShowMarkCb_Click SplitCB_ClickUserForm_ClickUserForm_QueryClose PRegister_Event_HandlerAddVarExistVarShowMarkHideMark PrintTitle PrintNoTitle doWithTitle +=h8+3qi]OXEMeQA*=h8+3qo;Ļ\lE1k`d F!=h8+3qClassPgv3+3o VBInternal ! IXApp_DocumentBeforeClose H44 (Scripting.DictionaryKeys Count F FName CurUserNamee Ff F SaveMark AcceptRevisions true TrackMark 0 BookNames WriteBookmark  TitleStrNewTitleVBE6.DLL       S fĤIx8<  (Bookmarks NewInfo ; &;&g F rangeText   StartEndCutInsertAfterAdd  H ` h h  j  wenjiantou h Fu FM FQ F^ F< F; F FK FO FJ FS FR F eck\h[ Select e4YQ: k  i  w rU~~~~~~~q     a1oObj A   (Cancel CloseModestrNamenewValue a8 iHapp a X ahDocCrU 0# ) Q !)q!@ Ii1   i  41aY`[WKHD  D\N \\AD l%(0\AD ( 5Dh0 @lD`1@5D"@@\D@ -5D 0~^  $ 4Q      cpXpV$ Q[rDAD: ]35DT: NDD$  0 ,l!  /)5DAD: ]35D7: NDD$  0Qo5DAD: ]35D_I: NDD$  0 ,l0/)5D]  $ 4 |AD: ]35DpXI: NDD$  0 ,l0/)5DpZpZ( %$AD: ]35D AD: ]35D7pV s kVkXS: NDD$  0Qo p(]t6D  $ 4Q\ kZ\  \  kZ\ c\4!  8  )!   0'`'p''D ! "6 Dp`0T< \0\@l4 Dp`0   X4ptx! x 8t p )xtp(`%$ ,X$ xtp4HrU @(__SRP_37__SRP_4 :__SRP_5NW__SRP_6 T`;$A`$`nrU I  y  4A i `I8 9 `0`I <A  ` @A ) ` DA I ` aWW0   <   $ 0   0   0   0 @  0   D4@<88(rU P$`$A`$`$`$`$A`,` &&nrU~| @ q! Yd,&x$  Qx[t$ $ t,$ xt l Q?TPdl Mh@x$ x 0d 0/P)xd{(dl x$ x 4)xd ,$ Pxd ddHdK?LPl MT@d$ d 0P ,>LFF) 5E: N $  0 , >F) 53: N l/53: N \/5l5Ii\5Ii8F()`<5@E8<:PN@@`$ ` 0< ,>8F)`<5@#(@  @:P]35@&(@(P"( (3:PN@@(8 l/85@l5Ipj9 <` $ 4` 8< Hk)`<c ChpCd?MP@<` $ 4` 8< @ L)`<[<` $ <` T< 0  hQ[)` 08B#Lef t$J - 1) + RighLen) -xHLLoopvB(ո'`" ") {'&tr )b _&CS&A%%7!ShowMƃ7`rTrim(ibo<> !)q "? gStart End !GCall$pCuϤ܆  If I@rtAfter(2"Y B B.Adh),c NH5s:Vt SubT(7c_xME0"h> **LLLLLL"<4<8<<<0 %% 6`` tk 4`Pki0 i2 +4X` 8o   i0 `6 h ` |k ``8|k! |` pk ' xX`pJ 4 J` ?`.@X X`,X X`X X`X X`X X`X X`X X`X X`X X`X X`4 @x @h @d @T @P @Xp`4z  8 @@@d @T  @P @L @< @8 .t @x  %%@t `P 8x @x  t`  p`x h 0  X' ^$*\Rffff*0C5ef60927$*\Rffff*0B5ef60927*\R1*#17e*\R1*#166*\R1*#c1*\R1*#17b*\R0*#19*\R0*#13*\R1*#cc*\R1*#cd*\R1*#c6$*\Rffff*065ef60927N"& 8 " @ H `?p(B    ?$ (08@H P"h p  "   " <8 @HP X` h p"  :   "   "(Php " ]  !D ./jo@` Ӹֱ 0$4 2 0 %B(dp 0 2 !BB@kPoHжϱǷ]@ 8B@:% 0 %B!'6 8!<'4d'4ki ʾۼX (<ntou  (>oh ڲغۼ (<IJ (>ǩo ӡͷ5 Application.ActiveWindow.View.ShowHiddenText = True 9>q 89@qoӡͷ3Application.ActiveWindow.View.ShowHiddenText = True 9>q  89@qoȡͷX] wenjiantou 8!% wenjiantou'd|$IJļͷǩkh  8%B@H 8(: D2 HF B@B !9*qoAttribute VB_Name = "ToolModule" Dim X As New EventClass| ' Public Sub Register_b_Handler()  d Set X.appWor d.App9ation End C QAddVar(strSng, newValue"iantg'@ӸI0f ExC) The7HThi@sDocumo."bles6) 0=5Rlsefu.X VQnIfqFuncSku)Bea['жnǷ2ڃaaanterr.Clear On Errorsu6x@ =B @ QNumber@o0PWTruGEHFaByA$GoTo 0EB 'ۼʃShowMa rkŔJaPrin@tRevis@s$Nz 'ڄRHideg<F?`ͷ>7TitleC?' H.AveWindow.Vie w.9,denTextCWithh OpAOsY.B T#C%hPostScriptOverN HcW'7 Nof '8 œ)  A e?ȡa?2j@do/@ Abookn/1w+5.km hs.bts("wenjaou")$E|af `ŨC ~;A tam'IJļͷǩ@A().Selec TrackI|..MoveDown Unit:=wdLine, Coun 2,`tendy!Ex!"_Foa`.M(< 7Q<&1YyO>G4ȴ(I ܀}է* 0K=.a*x}է* 0K=.a*&1YyO>GMET@S"SS">"  LL*L "LLLLqh'$'& @ !B @! CurUserNameG CurUserName %B D(Fj @!SaveMarkSaveMark %B'Hk @!AcceptRevisionsAcceptRevisions %BtrueA@J 8B@Lk8k0 @! TrackMark'$ TrackMark %B0'"d'" NB@Pkk @! BookNamesGA@Rj @!TitleStr'&kX @ & $TitleStr %B$T A@Vkk úۼ 8 "9:9< "9>q D!X!Z(\DActiveDocument.ActiveWindow.View.ShowHiddenText = True 'ʾFActiveDocument.PrintPostScriptOverText = False 'ӡ D(^A@`|( A@b|o NB@Po0 D!X!Z(\ NB@PA@`oXPAttribute VB_Name = "ThisDocument" Bas1Normal.VGlobal!SpaclFalse CreatablPre declaIdTru BExposeTemplateDeriv$Custom izC1'Dim SaveMar@k As Sng ' 0 P.2 Sub InitWord(ByRef` oObject) *Ĵݺ ;aoDicTrackmDBoolean= HP 2 Tit^ On Error GoTo ehandl@USet Yee,("Scripting.$tionary"2 9$str "KaA.Keys Fi 0 Count - 1 = a(iAddVar 5,B((@Next iTRegister_Ev)_HB4r[úۼWith Act.[Revis:Ns*' .{ntShowCaEnd A&}Fq|= ACoNE ach aCIn .iXIf .CurPUser"en Applic:a9.E (" 2c&- c *hf  A%If- Accep1 d M) "t doa61#bH. All?  o-BRGL! u 0QbOE#C!afrmTs.ad 0I!" "kaYs Writea # "9-naow@ Az&HThe` Len(Trim(V1))) > % New O# AVNPMi a~Fs2Window.ViewbHiddHenTa\= '5QZ 'ʾְl"[PostlOverd 'ӡYRVa! qxitHu: MsgBoxl (RwMESubPubXÑ112Bar(P^3 vŇl_Op' Sn:  ay *\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*\G{00020905-0000-0000-C000-000000000046}#8.3#0#C:\Program Files\Microsoft Office\OFFICE11\MSWORD.OLB#Microsoft Word 11.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\stdole2.tlb#OLE Automation*\CNormal*\CNormal' ^&*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.3#0#C:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLL#Microsoft Office 9.0 Object Library*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\system32\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{7CA452D9-0119-4C2A-9F28-CA298FCB8BAD}#2.0#0#C:\Users\zsds\AppData\Local\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Library.E .`M   ' ^7ThisDocument065ef60927ThisDocumentQ0`xH EventClassModule0C5ef60927i EventClassModule.`9 frmTools0A5ef60927OfrmTools?`0- NewTitleModule0E5ef60927NewTitleModule}H&ToolModule0B5ef60927,ToolModulec_`WriteMark0D5ef60927JWriteMarkr`xH`x0ts2BN)X5uG{̱@W}SIt)ejgC'W=*W |*J/Pi&@%p6ڧhD Wordk` VBA`Win16~`Win32`Mac`VBA6#` Project-`stdole`` Normal` Officeu` MSFormsC` ThisDocument<` _Evaluate`InitWordb`oObj`aX`oDic` Trackmark`Havemark` HaveTitle` errorhandle_` CreateObject`str`Keysq`i``Count0v`(AddVar`(Register_Event_Handler`ActiveDocument\`TrackRevisions`PrintRevisions` ShowRevisionsu`aVarW` Variablesn` Application*`UserName\`SaveMarki` (doWithTitle`AcceptAllRevisionse` frmTools`Show` (WriteBookmark`Trim@`(NewTitle` ActiveWindow+`ViewI`ShowHiddenTextk`Visible`(HideMark:`MsgBoxR` ShowToolBarV4` Document_Open` EventClassModule`appt`App_DocumentBeforeCloseS`Doc`Documentj`Cancel`Save`PrinNoTitleCB_Clickx` (PrintNoTitle`PrintTitleCB_Click'` (PrintTitle`NonMarkCB_Click>`ShowMarkCb_Click?`(ShowMark` SplitCB_Click`SplitDoca]`UserForm_Click`UserForm_QueryClose` CloseMode؟`vbOKOnly` NewTitleModuleg`arraysH*`rowsU`OldStr'`TitleStr`ValueK`Right `Split)`books`booknamea`flag`rang1 `range ` cellcontent` Bookmarks?n`Exists]`ocellK` SelectionZ`Tables`Cells`ChrK~`MaxL.`MinLX`lc`columnsp9`Deletex`Unit` wdCharacter`Addr`NumRows` NumColumns}`DefaultTableBehavior`wdWord9TableBehavior`BordersC"` wdBorderLeft ` LineStylew`wdLineStyleSingle` LineWidth/U`wdLineWidth050pt `Color2F` wdColorWhite` wdBorderRight` wdBorderTopm`wdBorderBottom`wdBorderHorizontal`wdBorderVertical:`wdBorderDiagonalDown^`wdLineStyleNone`wdBorderDiagonalUpj`Shadow`Options`DefaultBorderLineStyle`DefaultBorderLineWidtho`DefaultBorderColor` SelectColumnR`PreferredWidthType`wdPreferredWidthPercent/`PreferredWidth'`MoveLeftv` MoveRight`wdCell `Mergeq_`VerticalAlignmentʡ`wdCellAlignVerticalCenterf`ParagraphFormat` AlignmentI`wdAlignParagraphDistribute@m`DefaultSortingz` wdSortByName\` ShowHiddenqs`FontSize`FontU`Size`Bold` wdColorRedo(`iCountl` InsertAfterq5`Hidden]` ToolModule@?`Xo`strNameZ`newValue`(ExistVar.`aa{\`erro`Clear`Number-`PrintHiddenText`PrintPostScriptOverText`MoveDown̝`wdLine`Extend?`wdExtendd` WriteMarkd` bookarrayf` ansewerarray6.` booksCount'` selecttext` Bookmarknamesk` Ansewerslist/`p1^`p2^`ja` selectttext'$`Start`Cut.`Class`DocumentBeforeClose/`UserFormN` ShowMarkCB J` NonMarkCB:` PrinNoTitleCB~` PrintTitleCB6`Click` QueryCloseT`_B_var_i ` _B_var_aVar`Itemz`_B_var_SaveMark` _B_var_TrimmT` _B_var_Error)`_B_var_Bookmarknames `_B_var_Ansewerslist` _B_var_p1>` _B_var_p2?`_B_var_j ` _B_var_Chr\;` _B_str_LeftV` _B_str_Right#(`_B_var_TitleStr7`_B_var_TrackmarkF` _B_var_Right9` _B_var_LeftQ` _B_var_ocell8w` _B_str_MidX` _B_var_iCount` KO- il NewTitleModuleE0EventClassModule" PROJECTxfrmTools$!}2}2 &7}xME(L6 *LLLLL*L*LL*LLLL*LLLLL"<<<<<<<<<<<<<<<<<<<<<<<<<<<<P V`k`l `j`dx` `h` %```p```8x%Ph8 @8  (8T@` @`P @P@ @@< (@8 @( @ @"X @x @ X@ @ @ @8 @8 P#@X_ 8#H@ @ @ @p @ ` @@P @L @8< @P, @h @ @ @ 8>@ P@ PxRP@ @ p`\%X^`H%_`H% d00`H%Pi`H`H%0nx`H%`t`H%y`8%(0$bP `l%h(@& @x P@_ %xx` ' ^$*\Rffff*0E5ef60927*\R1*#d4*\R0*#14<*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#..\..\..\..\..\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*#10*\R1*#17e*\R1*#e3*\R1*#6c*\R1*#e2*\R1*#2b*\R1*#31*\R1*#eb*\R1*#e6*\R1*#ea*\R1*#1a5*\R1*#166*\R1*#19f*\R1*#4a*\R1*#49*\R1*#fa*\R1*#f9*\R1*#15*\R1*#1a3*\R1*#1e*\R1*#e4*\R1*#e8*\R1*#129*\R1*#ca*\R1*#cb*\R1*#c1*\R1*#17b*\R0*#f:*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#..\..\..\..\..\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*#f*\R1*#cc*\R1*#cd*\R1*#c6$*\Rffff*065ef60927"  (0 E8 EX#x&3   : 8 HPX`h "9p  ?  [)( @8P Hh  @R  (8@ ^X  8 H0  8  H X ` h           ( )0 H (B`       ?22l 88 &P`hp x &  &  &   & 08@ H &P`hp x  1 1      /.A(2R@7x  7  * /< /  $(  :8  X   ` h p  x / - - /   [  4    -0  @  P ` h         ;    ļͷ]@]X]p(HTitleStr %B!' TrackMark %B!'" $;   $'kH ;$' ' If rows < 1 Then3 Exit Sub 'ļͷֺ End If]]]]] wenjiantou 8!% wenjiantou'dH|$IJļͷǩk ''  8%B@H  %!! !!d$T' ȥз  $ b   $ $     $ $  'Hȥո  b    $     $  ' ȥո"." $ b  $ $   $  $ $  '@ȥTAB  $ b   $ $     $ $  '   'd ;  'kxkp   'k@ ȡ̵]] ]8]P ''$ '   $  G $'jpdh''  ' 'k8  8%B@H 2 B@ !    8!B@ % 7 9 9 9q 7 9 9 9qP 7 9 9 9q  7 9 9 9q   7 9 9 9q 7 9 9 9qkx  7(  7(5(q0  9 9 9q B@  !(d !(  %(d    X  %( 2 B@  2 B@ B@ !B@   !( k %B@H  !( 8! ! C@ 99q]h@ '  !(  !(" С !( $ !('&  %!! & $ !B@( !B@H !(* & '& k úۼ 8 "9:9< "9>qX|P(H ͷ༭: A@bo ϵAttribute VB_Name = "NewTitleModule" Sub P() 'ͷ Dim arrays As VariaDnt4row0I@nteger0O`ldStr3ingOn Error GoTo e handle<= ThisDocument.|bleHs(""")lu>TrackmarkM If Right(,, 1);"BenLLef Len1) - En0d If= Spli ";"= UBound( ' # < 1K KExit S'Ctଷֺ# I&'{bookS{A>nhuA fl ag{Nrang1ADj cellcontA!cActiveMFB@%vs.@:sBtwenjAou"jTruej+H ElsD#AKOORǩvCCBC= 0C@! A6(E,).SeXlecCFE ach oAN In ion.T"a1).Y.C=`+s I-jri m(TextO 'ȥ@зgDo While@5(H , Chr(13)) >%/+f$KIn Ah +samh m8 Loop!"ոnt, " Mt" ds".DN!2}87_8_8%B $Mid_"e+ 1, ; ;TAB; r(9  < "k(I,SS + l;Ig NHMb  fw TThuyV1 y 'ȡ̵pC! jM8axLi*min;lo1column? }<>=}0u= 2G  = 8)q =4(1,@58dl0 P!߸8l0!EQ"" @!4 )%L#xyOw¢sOwvDxUnit:=wdChaterop0( y.Add y :=g, NudmR:=C s":=, De faultBe@haviorWord9Z'0 `With "sK! R.B@ers(wdOG1.LineSty`= wdSEWid050pTſPPt8?! O N _ ~ _ 3 _ _ h_ ._ _ d_ _ Top? ? t? ? Q? i? ? $%Bottomo o o G eo o o pC%Q=%J>Y1Horiz@al?  .Color = wdHWh`ite End With X$ .Borde rs(wdVertical) Z.LineStyle Sin gl t/Width/ 050ptg^6pIf(lDiagonalDown)eNon d#Up".ShadowFals5gOptions rDefaultng.i l4Selec1.Cumn#4col@s.Preferrebd'TypPercenH_100(1)0@CInt( * MaxL / (+ MinL)) + 2'MoveLeft Unit:=`~haracter, Coun`1If rows > 1 Tlhe-s $ Righ ell1 /#8kC s.MergjCAlignm9$/"C ergLI Tables/cggP'graphForpmat.FDistribuɫ"sA@ZveDocuokmarkMuAdd ra`nge:=, Namboof:yS?zu"[SO,>f:yn?zu"[SO,WYSbu"[SO, NWYSb?zu"[SO Microsoft Forms 2.0 Embedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmTools Caption = "WORD" ClientHeight = 420 ClientLeft = 11040 ClientTop = 1440 ClientWidth = 4080 TypeInfoVer = 23 End ThisDocumentThisDocumentEventClassModuleEventClassModulefrmToolsfrmToolsNewTitleModuleNewTitleModuleToolModuleToolModuleWriteMarkWriteMark  FMicrosoft Office Word ĵ MPROJECTwmCompObjmSWordDocWord.Document.89q