ࡱ> _b^q` R@%bjbjqPqPFJ::w(RRRRRRRD###8($Dl$ a9v%%"6%6%6%&&&#3888888$;h?>8!R'&"&''8RR6%6%9+++'>R6%R6%M0+'#3++RR+6%% Y`!#*j+-\%9<a9+>*v>+">R+ & '+' $'&&&88*&&&a9''''  dh L  hLf4"RRRRRR  q\^"?e@\eNq\^^%`{t@\ "L02019020S  q\^"?e@\ q\^^%`{t@\sQN N2019t^,{Nyb[hQuNS^%`{t NyDёvw TS:S "?e@\0^%`{t@\ ^~T gsQUSMO :NR:_b^[hQuNT^%`{t]\O 9hnc 0q\^Nl?e^RlQ[sQNۏNekR:_^~"?eNyDё{t]\Ovw 0?eRS020140156S 0 0Ym_lw"?eS Ym_lw^%`{tS Ym_lwl?eSsQNcMR N2019t^Ym_lw[hQuNS^%`{tNyDёvw 0Ym"^020180155S T 0q\^[hQuNNyDё{tRl 0"L02016039S I{eN|^y ~Tb^t^^[hQuNT^%`{t]\O͑p ~xvz s\2019t^,{Nyb[hQuNNyDё N~`ON qQDё135NCQ vQ-N^~[hQuNNyDё70NCQ w~NylyDё65NCQ0 Te v^XR`OUSMO2019t^ 2240107[hQuNW@x {ch0 ,g!k NvDё-N mSS:S 0R:SvDёǑ(uV }lRM RMV }Sb[hQuNNEechc6R`Q0[hQuNvh#N8h`Q0[hQuN]\O;`SObSϑ0cgtel[hQuNNEe`ϑ0[hQuN]\ORe`Q0zfga_(u5u[hQΘi2cT`lt|~c^^(u`Q0w~^%`QecNNr^ O^`QI{0TS:S "?e0R:S{YO6e0RDёT^~y{0We"R O T^%`{t蕓b'}yv[cv^Se NDё v^\DёRMO(ueHhN,gw NN*NgQ Nb^"?e@\0^^%`{t@\YHh0 Tyv[eUSMO%NkN(u EQRS%cDёO(u~He0 DN2019t^,{Nyb[hQuNS^%`{tNyDёRMh q\^"?e@\ q\^^%`{t@\ "$8:LPRTlnprtӰyiM=/h{BhCDCJ OJaJ o(h{BhCDCJ OJQJaJ o(6jhmhu<CJ OJPJUaJ mHnHo(uhs[hmCJ OJPJaJ o(h%v#CJ OJPJaJ o(hgnkCJ OJPJo(hCDCJ OJPJo('hE?h>x.5B*CJPOJPJo(ph*hE?h>x.5<B*CJPOJPJo(phhqCJ OJPJaJ o(h(hCDCJ OJPJaJ o(hCDCJOJPJaJo(hG*hCD5CJ OJPJo($28:LNDkd$$Ifl40" t0644 lap$ 4$Ifa$gdE?7VD ]^7gdA]$  ^`a$gdA]$>%NPRTnrtzn_RCC$ da$gd{B $ la$gdlU$ 4a$gdA] 4gdgnkkd$$Ifl40"  t0644 lapt  < > B J L N R V Z ` b ŸuauauauauM9&hch>x.@CJ OJPJ\aJ o(&hh>x.@CJ OJPJ\aJ o('hI)_h>x.CJ KHOJPJ^JaJ o(!h>x.CJ KHOJPJ^JaJ o(#h;^h>x.@CJ OJPJaJ o(h;^h>x.CJ OJPJaJ o(hJe;hCDCJ OJPJaJ o(h>x.CJ OJPJaJ o(hCDOJPJo(hhCDCJ,OJPJaJ,o(&HhjvhWCJ,OJPJaJ,o(hWCJ,OJPJaJ,o(t Z " l ssbPdG$H$WD`Pgd>x.PdhG$H$WD`Pgd>x.pdhG$WD`pgd>x. $dha$gd>x.Q$ dDC$Eƀjva$gd A$ dDa$gd Ab n x      , . 0 N X Z j n r t v " j l 컪ϚϚϚϚϚϪzϊf쪻&hh>x.@CJ OJPJ\aJ o(h lh>x.CJ OJPJaJ o(hZh>x.CJ OJPJaJ o(hBh>x.CJ OJPJaJ o( h>x.@CJ OJPJ\aJ o(&hch>x.@CJ OJPJ\aJ o(h>x.CJ OJPJaJ o(h]sh>x.CJ OJPJaJ o(&hI)_h>x.@CJ OJPJ\aJ o(!l x z 촠}]]I]&hh>x.@CJ OJPJ\aJ o(?h>x.hW@CJ OJPJ\aJ cHdhdhdhjvo(Eh{h>x.hW@CJ OJPJ\aJ cHdhdhdhjvo(&h#bhW@CJ OJPJ\aJ o(-Hhjvh>x.@CJ OJPJ\aJ o(h#bh>x.CJ OJPJaJ o( h>x.@CJ OJPJ\aJ o(&h#bh>x.@CJ OJPJ\aJ o( V"X"`""zjaaS $$1$Ifa$gdE? dhG$gd>x. <dG$H$gd>x.$dG$H$a$gdWojvd&N-XD2]NdG$H$gdWojvd&P]PSPdC$EƀjvG$H$WD`Pgd>x. "8"@"B"H"J"L"N"P"R"T"V"X"\"^"`"ȷȷȷȷȷȷrUrU8hWh>x.CJ OJPJaJ o(jv*OJPJQJWhWh>x.hWCJ OJPJaJ cHdhdhdhjvo(jv*OJPJQJ-HhjvhW@CJ OJPJ\aJ o(U h>x.@CJ OJPJ\aJ o(&hh>x.@CJ OJPJ\aJ o(Ehh>x.hW@CJ OJPJ\aJ cHdhdhdhjvo( 2019t^6g6e DN 2019t^,{Nyb[hQuNS^%`{tNyDёRMhUSMOyv TyёNCQ T^ewe;`1357065^,g~T40400q\^^%`{t@\Oo`S^~940400S:S0R:ST953065[wm:S64.491450.49nf@:S10.3555.35\q\S13.4112.4J]lS1.1401.14Ym_lq\\e:SeW{tYXTO4.7404.74Ym_lq\\e:Snf@q\ 1g[\{tYXTO0.8800.88 bYm_lw"?eS Ym_lw^%`{tS0 q\^"?e@\RlQ[ 2019t^6g13epSS     PAGE    PAGE 1 `""""""""""##8#:#^#`#########($*$l$n$p$r$رyyyyyyyiW"HhjvhA]CJOJPJo(hh>x.CJ OJPJaJ o('hOh>x.CJKHOJPJQJ^Jo(-hOh>x.5CJKHOJPJQJ\^Jo(hOh>x.CJKHaJMhWh>x.5CJ KHOJQJ\^JaJ jv*5CJ$OJPJaJ$o(MhWh>x.5CJ KHOJQJ\^JaJ o(jv*5CJ$OJPJaJ$""""" $$1$Ifa$gdE?Wkd^$$IflM!\!\!644 la]gjvp h6T aT"""""""tffXXX $$1$Ifa$gdE? $$1$Ifa$gdE?kd$$Ifl4YF) IM!8  \!6    44 la]gjvph6T  aT""""""B4444 $$1$Ifa$gdE?kd$$Ifl4r) IM!8  <\!644 la]gjvp2h6T aT""""##\NNNN $$1$Ifa$gdE?kd/$$IflX\IM!X<\!644 la]gjvp(h6T  aT###(#.#4#8#\NNNNN $$1$Ifa$gdE?kd2$$IflX\IM!X<\!644 la]gjvp(h6T  aT8#:#L#R#X#^#C5555 $$1$Ifa$gdE?kd5$$IflXr) IM!8  <\!644 la]gjvp2h6T aT^#`#h#t#z##\NNNN $$1$Ifa$gdE?kdf$$IflX\IM!X<\!644 la]gjvp(h6T  aT######\NNNN $$1$Ifa$gdE?kdi$$IflX\IM!X<\!644 la]gjvp(h6T  aT######\NNNN $$1$Ifa$gdE?kdl $$IflX\IM!X<\!644 la]gjvp(h6T  aT######\NNNN $$1$Ifa$gdE?kdo $$IflX\IM!X<\!644 la]gjvp(h6T  aT##$$$($\NNNN $$1$Ifa$gdE?kdr $$IflX\IM!X<\!644 la]gjvp(h6T  aT($*$T$^$b$l$\NNNN $$1$Ifa$gdE?kdu $$IflX\IM!X<\!644 la]gjvp(h6T  aTl$n$p$\S dhG$gd>x.kdx $$IflX\IM!X<\!644 la]gjvp(h6T  aTp$r$t$$$$$$$$$][[[[[- ^gdWojvd&$ ^$d &d (d N P R $$d &d (d N P R gdUcgdWojvd&-XD2DC$Eƀjv r$t$v$~$$$$$$$$$$$$$$$$$$$%%%ξ۳rRJFJFJFJFh>jh>U>hThA]hWCJOJPJaJcHdhdhdhjvo(&HhjvhWCJOJPJaJo(hThrCJOJPJaJo(hWCJOJPJaJo(hThA]CJOJPJaJo(hA]CJ OJPJo(h]xhJkCJOJPJaJo(h>x.CJOJPJaJo(h]xhA]CJOJPJaJo(hA]OJPJo(hWCJOJPJo($%%%%%%8%:%<%>%@%- ^gdWojvd&$ ^$d &d (d N P R  hh]h`h&`#$ %%%%%% %"%.%0%2%4%8%<%>%@%뽲hA]CJ OJPJo(h>h85 0JCJmHnHuhT0JCJjhT0JCJUhT0JCJo(hT hT0JjhT0JUD&P 0pu1Z2P/R :p{W. A!4"#2$%S $$If!vh55#v#v:V l4 t06+,55p$$If!vh55#v#v:V l4 t06+55p$$If]!vh5\!#v\!:V l\!6,5\!/  / a]gjvp h6aT$$If]!vh58 5 5#v8 #v #v:V l4Y\!6++,58 5 5/ / /  / a]gjvph6aT<$$If]!vh58 5 555<#v8 #v #v#v#v<:V l4\!6++,58 5 555</ / / /  a]gjvp2h6aT$$If]!vh5X555<#vX#v#v#v<:V lX\!6,5X555</ / /  a]gjvp(h6aT$$If]!vh5X555<#vX#v#v#v<:V lX\!6,5X555</ / /  a]gjvp(h6aT/$$If]!vh58 5 555<#v8 #v #v#v#v<:V lX\!6,58 5 555</ / / /  a]gjvp2h6aT$$If]!vh5X555<#vX#v#v#v<:V lX\!6,5X555</ / /  a]gjvp(h6aT$$If]!vh5X555<#vX#v#v#v<:V lX\!6,5X555</ / /  a]gjvp(h6aT$$If]!vh5X555<#vX#v#v#v<:V lX\!6,5X555</ / /  a]gjvp(h6aT$$If]!vh5X555<#vX#v#v#v<:V lX\!6,5X555</ / /  a]gjvp(h6aT$$If]!vh5X555<#vX#v#v#v<:V lX\!6,5X555</ / /  a]gjvp(h6aT$$If]!vh5X555<#vX#v#v#v<:V lX\!6,5X555</ / /  a]gjvp(h6aT$$If]!vh5X555<#vX#v#v#v<:V lX\!6,5X555</ / /  a]gjvp(h6aTJ@J cke $1$a$ CJKH_HaJmH nHsH tH$A@$ ؞k=W[SOFi@F nfhx.Qx. Char Char Char1 Char$d1$a$J "& "& "&+()*79:_gh0IJMRY\_befimpstz} */16789:"<"<"<"<"<"t;"t;"T"T"T"ٿ"P<"@0"/ "H"H"H <?`<H<,<<<<<d<<<<<<d<<<<<<d<<`<H<<<<d<<<<<<d<<<<<<d<<<<<<d<<<<<<d<<<<<<d<<<<<<d<<x <<<d<x ""<"ܿ"ނI"jIJYZefst67K0K0K0K0LK0 K0  I00K0  I0K0I0I00K0,I00K0dI00 K0I00K04I00K0 I0K0 &'()*79:_gh+,0IJMRYZ[\_befimpstz} */16789:Pvwyz|}00!0!0 0! 0 0 00000000000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 00000000000000000000&'()*79:gh+,0IJYZefst*/16789:PvI00I00I00!I00!00 I00!I00 0I0 I00I00I00I00I00I00I00I00I00I00I0000I00I00I00I00I0I0|JI0 I0|JI08I0|JI0 !pI0|JI0"#I0|JI0$%I0|JI0&'I0|JI0()I0|JI0*+TI0|JI0,-I0|JI0./ĹI0|JI0|JI0|JI0  I0 I0I0I0I0I0I00I0I0I00 '''*tb l `"r$%@% "$Nt """"#8#^#####($l$p$$@%  !#>%  "*!!@  @ (  bB  c $Do"?B S  ?H0(  7-"<t@egT99!*;*urn:schemas-microsoft-com:office:smarttagschsdate <20196DayFalse IsLunarDate IsROCDateMonthYear%h~  &')+OWhjy|@B'()*,.JLMQRX\^_abdfhty)<>w*-!w::::::_h!.J*89:w*6:f +,./89R[fsuvw @@ @}|`p 85 Oe * )#x+E?grM(T59%v#P){,[.>x.!u1;2n334$6|9; ;Je;1=bS?n? A{B`CT4D J#J1IL"NO2R UW/_Z[s[\%7]A]=bUcjeLbf KgHj"cjJkgnk"l{ojp-tu]xwx23z|[L0#2CD"9`!AqD\ /tlUP 8);te 9'k6; ~"oQT<T>7Wr1KmpMElq*_9(>!=r{WRXfMi(&'(!0IJMRYZ[\_befimpstz} */167P AcceptRevisionsX BookNames CurUserNamehaha<NewInfoTitleStr, TrackMark falseZzhutici;zsbm;csmb;filename;fwzh;jinjicd;miji;yinfadanwei;yfdate;dayinfs;SignDate;qianfarenXoss100&;&TS:S "?e@\0^%`{t@\ ^~T gsQUSMO&;&Ym_lw"?eS Ym_lw^%`{tS&;&q\^"?e@\ q\^^%`{t@\sQN N2019t^,{Nyb[hQuNS^%`{tNyDёvw&;&"L02019020S&;&&;&&;&q\^"?e@\RlQ[&;&2019t^6g13e&;&25&;&&;&fVq\^"?e@\;eN;q\^^%`{t@\1 VFJFJVFJFJVFJFJVFJFJVFJFJVFJFJVFJFJVFJFJVFJFJ Project.NewTitleModule.NewTitle Project.ThisDocument.ShowToolBarProject.ToolModule.HideMarkProject.ToolModule.PrintNoTitleProject.ToolModule.PrintTitle)Project.ToolModule.Register_Event_HandlerProject.ToolModule.ShowMarkProject.WriteMark.WriteBookmarkProject.ToolModule.doWithTitle PROJECT.TOOLMODULE.HIDEMARKPROJECT.TOOLMODULE.SHOWMARKPROJECT.TOOLMODULE.PRINTTITLEPROJECT.TOOLMODULE.DOWITHTITLEPROJECT.NEWTITLEMODULE.NEWTITLEPROJECT.TOOLMODULE.PRINTNOTITLEPROJECT.WRITEMARK.WRITEBOOKMARK PROJECT.THISDOCUMENT.SHOWTOOLBAR)PROJECT.TOOLMODULE.REGISTER_EVENT_HANDLER@<@@"UnknownXoss G:Ax Times New Roman5Symbol3& :Cx Arial;5 |8ўSOSimHei9eck\h[[SO;5 N[_GB2312Y eck\h[{SOArial Unicode MS;E eck\h[_GBK;([SOSimSun;" Helvetica 1h LGkvkv!-!),.:;?]}    & 6"0000 0 0 00000 =@\]^([{  0 0 00000;[42uuO3qHP ?^bS?20 ĞefXossOh+'0$ 4@ ` l x 4  Normal.dot29Microsoft Office Word@ա@"!@|k4@LI!՜.+,0 X`t|  񺼰u   !"#$%'()*+,-/0123456789:;<=>?@ABCDEFGHIJKLMOPQRSTUWXYZ[\]`a~defghjulmnopqrstcvwxyz{|}Root Entry F `!iEData &1Table.>WordDocumentFJSummaryInformation(NDocumentSummaryInformation8VMacros%P$_!Y`!VBA$ P$_!u`!ThisDocumentk__SRP_2__SRP_3 EventClassModule"#Q  !"$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPRSTUVWXY[\^_`abcdefghijklmnopqrstuvwxyz{|}~  Dim SaveMark As StringE-SaveMark = "0"B4***********Ĵݺste]`]x]]D](`Scripting.Dictionary$*.  . ]D !.' 0 !2 0$', , ,$ A@4 0A@6úۼ 89:9<9>qh'$'& @ !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:  P1^$*\Rffff*065ee631e8<*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#..\..\..\..\..\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLL#rU 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  7Q<g1%L?vs<,ŠOǥr+:sFG<@ ].xsFG<@ ].g1%L?vMET@S"SS">"  LL*L "LLLL|@ 7?Lf aB: tKz6I |TO$$B&!J#HPx&!J#HPf aB:MEPSPSSS6"<<<0{B39D0C16-E474-4B1D-B815-7A3692AFB149}{54D37C20-B708-4F96-B0B6-242487DD42FF} v@`|J z`  ~`   `  @`  `  ` iri0(%X0 %@@%N%@@@@@@P0P `1^$*\Rffff*0A5ee631e848<@D" "  "  ( " 08@ " HPX " `hp " x  "  8 A@xoh@A@|oPA@`o8A@o A@o@ox'rԲ𣬴˹ܹر ϢA@bo( Attribute VB_Name = "frmTools"  Bas|0{B39D0C16-E474-4B1D-B815-7A3692AFB149}{54D37C20-B708-4F96-B0B6-242487DD42FF} dGlobaBlSpacoFalse Cre atablPr@edeclaI"dTru BEx0pose0TemplateDerivCustomizD P! Sub nNoTitleCB_Click()  t End vt   +NonMa rk ;HideC Showb+plitESDocV UserForm QueryClq(Cancel As Inte ger, ModeH\D = MsgBox "Բ˹ܹر", vbOKO@nly, "ϢlrU   y  4A i `I8 9 `0`I <A  ` @A ) ` DA I ` aWW0   0 @  0   0   0   0 @  0   D4@<88(rU P$`$A`$`$`$`$A`,` &&n__SRP_5WNewTitleModule 0__SRP_ch__SRP_dgVisual Basic For Applications*#f*\R1*#cc*\R1*#cd*\R1*#c6$*\Rffff*065ee631e8"  (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 ; d u&7}xME(L6 *LLLLL*L*LL*LLLL*LLLLL"<<<<<<<<<<<<<<<<<<<<<<<<<<<<  V`k`l `j`dx` `8` %```p```8x%Ph @h8T@` @0P @ @ @@< (@8 @( @P @"X @H @ X@ @ @ @ @  #@(_ #H@` @x @ @p @` @@P @L @< @ , @8 @ @h x@ >@ P@ PHRP@ @ X@`\%x(^p`H%X_`H%d0P`H% i0`H%Pn`H`H%0tx`H%`y`8%0$b `l%8(@& @H ` @_ pHH`%1^$*\Rffff*0E5ee631e8*\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#  '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:=, Namboo8F()`<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[)`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(<Xp@4 $ x 4)xd ,$ Pxd ddHdK?LPl MT@d$ d 0P ,>LFF) 5E: N $  0 , >F) 53: N l/53: N \/5l5Ii\5Ii <0<LLLLL"<4<8<<<( %p% 6``@tk 4`Pki0 i2 +4X`8o   i0 `6 h `@|k ``|k! |`  ' xX`pJ 4 J` ?`.@X X`,X X`X X`X X`Xp@4 @x @h @d @T @P p@(p`4z  8 @d @T @P @L @< @8 . 8@x (@t ((p ` X1^$*\Rffff*0C5ee631e8$*\Rffff*0B5ee631e8*\R1*#c1*\R1*#17b*\R0*#19*\R0*#13*\R1*#cc*\R1*#cd*\R1*#c6$*\Rffff*065ee631e8N"& 8 " @ H `?p(B    ?$ (08@H P"h p  "   "  <8@HPX` 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.ActA`1$58l$F  (]t6l$F  (T"l$ #l$Jil$F4 D D$"l$ #*1$26D$l$RRl$l$ #l$Jl$l$ #*1$2 C @\ -$M@T T@6T+ ,A,A@6 ,5 @\ -,6+ @l @, @<5 ~hx LX@ xh$\l,<L8  TD$ks\Microsoft ShrU $ `n*#f$*\Rffff*0* pHdProjectQ(@= l 1^ J< rstdole>stdoleP h%^*\G{00(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` QueryCloseD( 7rxME,6  LLLL"L<0<4<8<<<X R`@k77`Ll `N@\ `jL x`< !B`, H`P*`R$B@:J%ppX(h(08`@@ @ @ @ (@ @T @ X@Vp @@XX @Z @\ @ @@x X@h @@@f @T @D @4 @$ @ (@ @ T@-H- @@ P81^$*\Rffff*0D5ee631e8:*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#..\..\..\..\..\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*#f$*\Rffff*0B5ee631e8*\R1*#cb*\R0*#f*\R1*#cc*\R1*#cd*\R1*#c6$*\Rffff*065ee631e8*\R1*#c1*\R1*#17b8 " (08@ HX EhE33    P0P1X x  8H  @R(h pCx  ! 5+  (0 8 H]@]X]p]]]]( 8.j j!. BookNames %B!'TNewInfo %B!'V T;$'L V&;&$'N L'X N'Z !2'P X Z!< \ X \$L 8!%A@` \$L$!. ( !d'R( ȥз R $ b R R $ $  R R R $ $  'Rȥո R b R R  $  R R R $  'RA@ \$N$T R$T !` !$ Bb$ k8 \$N$T B(^ \$L  Bkkk(A@|o Attribute VB_Name = "WriteMark" Sub D BookmT() Dim b&array As Variant:ansewder@pp8VsArange3CountIntegersel@ecttexS ngOn Error GoTo ehandleSet aR= ActiveDocumerU=.snsThi s .bles("s") lu=AslistNewIn 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`_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 x0ts2BN)X5uG{̱@W}SIt)eay *\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*\CNormal1^&*\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   1^7ThisDocument065ee631e8ThisDocumentQ0`xH EventClassModule0C5ee631e8i EventClassModule.`q frmTools0A5ee631e8OfrmTools?0F NewTitleModule0E5ee631e8NewTitleModule}H{&ToolModule0B5ee631e8,ToolModulec_`WriteMark0D5ee631e8JWriteMarkr`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` 020430-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.ef:yS?zu"[SO,>f:yn?zu"[SO,WYSbu"[SO, NWYSb?zu"[SOFDocument Microsoft Forms 2.0 Embedded Object9qF Fo!CompObj"aVBFramePROJECTwmVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmTools Caption = "WORD" ClientHeight = 420 ClientLeft = 11040 ClientTop = 1440 ClientWidth = 4080 TypeInfoVer = 23 End ThisDocumentThisDocumentEventClassModuleEventClassModulefrmToolsfrmToolsNewTitleModuleNewTitleModuleToolModuleToolModuleWriteMarkWriteMarkK*y *\CNormalrU~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ sZEDG. a ya a  q ) Q y a i1a @ 9YyYa ihAyQai h=fOڤRi ThisDocumentEventClassModulefrmToolsNewTitleModule ToolModule WriteMarkProjectF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA  A` F5C:\Program Files\Microsoft Office\OFFICE11\MSWORD.OLBWord Ip0Fs<,ŠOǥr+:C:\WINDOWS\system32\stdole2.tlbstdole  QL-[DR?C:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLLOffice q.E .`M C:\WINDOWS\system32\FM20.DLLMSForms  QR|*L()ˋ 0C:\Users\zsds\AppData\Local\Temp\VBE\MSForms.exd Qk Fg1%L?vsFG<@ ]. FDocumentInitWord ShowToolBar Document_Open @p Fb F FehF)G Of aB: tKz6I |TO$$B&!J#HP{lFWJO PrintTitleCB!-6S` Qȏ[qJ eUserForm,18H:C^ F3Dynamic Y  app ShowMarkCB NonMarkCB PrinNoTitleCBPrinNoTitleCB_ClickPrintTitleCB_ClickNonMarkCB_ClickShowMarkCb_Click SplitCB_ClickUserForm_ClickUserForm_QueryClose PRegister_Event_HandlerAddVarExistVarShowMarkHideMark PrintTitle PrintNoTitle doWithTitle +=h8+3qS ]WH~Z$bc*=h8+3qNOG-f_ 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 PROJECTxCompObjmID="{F2A1266F-3CFF-4564-A4C1-358C3924672C}" Document=ThisDocument/&H00000000 Class=EventClassModule BaseClass=frmTools Module=NewTitleModule Module=ToolModule Module=WriteMark Name="Project" HelpContextID="0" VersionCompatible32="393222000" CMG="E6E42955E9DDCBE1CBE1CBE1CBE1" DPB="CCCE037B0F6010601060" GC="B2B07D99629A629A9D" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisDocument=0, 0, 0, 0, C EventClassModule=0, 0, 0, 0, C frmTools=0, 0, 0, 0, C, 25, 25, 1195, 593, C NewTitleModule=0, 0, 0, 0, C ToolModule=0, 0, 0, 0, C WriteMark=0, 0, 0, 0, C   FMicrosoft Office Word ĵ MSWordDocWord.Document.89q