ࡱ; ERoot Entry F@qF\Workbook3ȄSummaryInformation(DocumentSummaryInformation8  !"#$%&'()*+,-./0123456789:;<=>?@ABCDVGHIJKLMNOPQRSTUW{XYZ[\]^_`abcdef|hijklmnopqrstuvwxyz} ZO\pNg9N Ba= ThisWorkbook=`Kx-8X@"1Q[SO1Q[SO1Q[SO1Q[SO1Q[SO1Q[SO1Q[SO1QArial1Q[SO1Q[SO1h>Q[SO1,>Q[SO1>Q[SO1@Q[SO1Q[SO1Q[SO1Q[SO1Q[SO1QArial1QQ[SO10Q[SO1Q[SO1Q[SO1Q[SO1Q[SO1 Q[SO1 Q[SO1 Q[SO1Q[SO1@Q[SO1Q[SO1Q[SO1 Q[SO10Q[SO1 Q[SO1Q[SO1@Q[SO10Q[SO10Q[SO1Q[SO1Q[SO1 Q[SO1>Q[SO1Q[SO1Q[SO1 Q[SO1Q[SO1 Q[SO1Q[SO1Q[SO14Q[SO1 Q[SO1Q[SO1 Q[SO14Q[SO1<Q[SO1?Q[SO1>Q[SO1Q[SO1Q[SO1@[SO1[SO""#,##0;""\-#,##0""#,##0;[Red]""\-#,##0""#,##0.00;""\-#,##0.00#""#,##0.00;[Red]""\-#,##0.007*2_ ""* #,##0_ ;_ ""* \-#,##0_ ;_ ""* "-"_ ;_ @_ .))_ * #,##0_ ;_ * \-#,##0_ ;_ * "-"_ ;_ @_ ?,:_ ""* #,##0.00_ ;_ ""* \-#,##0.00_ ;_ ""* "-"??_ ;_ @_ 6+1_ * #,##0.00_ ;_ * \-#,##0.00_ ;_ * "-"??_ ;_ @_ \$#,##0_);\(\$#,##0\)\$#,##0_);[Red]\(\$#,##0\) \$#,##0.00_);\(\$#,##0.00\)% \$#,##0.00_);[Red]\(\$#,##0.00\)""#,##0;\-""#,##0""#,##0;[Red]\-""#,##0""#,##0.00;\-""#,##0.00#""#,##0.00;[Red]\-""#,##0.0050_-""* #,##0_-;\-""* #,##0_-;_-""* "-"_-;_-@_-,'_-* #,##0_-;\-* #,##0_-;_-* "-"_-;_-@_-=8_-""* #,##0.00_-;\-""* #,##0.00_-;_-""* "-"??_-;_-@_-4/_-* #,##0.00_-;\-* #,##0.00_-;_-* "-"??_-;_-@_-"Yes";"Yes";"No""True";"True";"False""On";"On";"Off"],[$ -2]\ #,##0.00_);[Red]\([$ -2]\ #,##0.00\)0_);[Red]\(0\)0.00_);[Red]\(0.00\)0_  0.0_                 - - - - - - - - - - - - . . . . . .      P +P      / -  - - - -     0 1 2a   3  4ff 5 6 7`   8 9 :  ; . . . . . .    @ @  @ @  ""@ @ @ @ @ @ @ @ !@ @ ""@ @   x@ @  1 1 1 1 1@ @ 1 1 1 x7 1@  1@  1@ @  1|7 1 @ @ -1 1 1@  1 1@ @  -1 -1 -1@  -1 1|7 1 @ @ 1@ @  1@ @ 1  1 1@ @ x )1 #1 $1|@  1 1 %1|@ @ 7 1<@ @ 1@ @ &1@  (1@  *1@  1 ,1@ @ <1 <1 =87 >8 ||'}(} 00_)}(} 00_)}(} 00_)}(} 00_)}(} 00_)}(} 00_)}<} 00_)ef\([$}<} 00_)ef \([$}(} 00_)}<} 00_)L\([$}(} 00_)}(} 00_)}<} 00_)L\([$}(} 00_)}(} 00_)}<} 00_)23\([$}(} 00_)}(} 00_)}<}  00_)23\([$}(}! 00_)}(}%?00_)}<}( 00_)\([$}(}) 00_)}(}+ 00_)}(}, 00_)}(}- 00_)}(}. 00_)}(}2  00_)}<}3 a00_)\([$}(}4 00_)}x}7 }00_)\([$#,##  }}8 00_)\([$???#,##??? ??? ???}(}9 00_)}(}: 00_)}<}; }00_)\([$}<}> e00_)\([$}x}? ???00_)???\([$???#,## ??? ???}}@ ??v00_)̙\([$#,##  }(}A  00_)}(}B 00_)}<}C 00_)\([$}<}D 00_)\([$}(}E 00_)}<}F 00_)\([$}<}G 00_) \([$}x}H00_)\([$#,##  }(}J 00_)}(}L 00_)}(}S 00_)}(}T 00_)}(}U 00_)}(}V 00_)}(}W 00_)}(}\ 00_)}(}] 00_)}(}_ 00_)}(}a 00_)}(}c 00_)}(}e 00_)}(}f 00_)}(}h 00_)}(}i 00_)}(}j 00_)}(}k 00_)}(}l 00_)}(}m 00_)}(}o 00_)}(}r 00_)}(}| 00_)}(}} 00_)}(} 00_) 20% - @wr 16 20% - @wr 1  20% - @wr 26" 20% - @wr 2  20% - @wr 36& 20% - @wr 3  20% - @wr 46* 20% - @wr 4  20% - @wr 5B. 20% - @wr 5 ef  20% - @wr 6B2 20% - @wr 6  ef  40% - @wr 16 40% - @wr 1  40% - @wr 2B# 40% - @wr 2 L渷  40% - @wr 36' 40% - @wr 3  40% - @wr 46+ 40% - @wr 4  40% - @wr 5B/ 40% - @wr 5 L  40% - @wr 663 40% - @wr 6  60% - @wr 16 60% - @wr 1  60% - @wr 2B$ 60% - @wr 2 23ږ  60% - @wr 36( 60% - @wr 3  60% - @wr 46, 60% - @wr 4  60% - @wr 5B0 60% - @wr 5 23 ! 60% - @wr 664 60% - @wr 6 "~vRk #hh $h 1h 1 %h 2,h 2? &h 3h 3 'h 4h 4(]0]  &8^ĉ )8^ĉ 12,8^ĉ 12  *8^ĉ 2+8^ĉ 2 2.8^ĉ 2 2 ,8^ĉ 2 3.8^ĉ 2 3 -8^ĉ 2 4.8^ĉ 2 4  .8^ĉ 3*8^ĉ 3  /8^ĉ 408^ĉ 4 21 8^ĉ_hQVL?e:SRNx2(c  3}Y0}Y  a 4Gl;`&Gl;` 5'^6 '^[0] 7{^{ } 8hgUSCQ-N2-N  e ?Q^Q ???????????? ??? @eQjeQ ̙ ??v A 0 ]vc   B@wr 1*@wr 1  C@wr 26!@wr 2 PM  D@wr 36%@wr 3 Y  E@wr 4*)@wr 4  F@wr 56-@wr 5 K  G@wr 661@wr 6  F  Hlʑ^ lʑ  XTableStyleMedium9PivotStyleLight1683ffff̙̙3f3fff3f3f33333f33333\` M ؚ!h,gNyV[Rf[ё TUSnNxhOo`VV!  =- KmՋ@b g!hĉRv^SbpSOo`fvf`@GF@NF|MOS AA@A@  z1 7sfzjh 7 checkDiffNameV[V~+R TycheckIDCardTypeNN{|W7usYE\lNel T^S/f Ty{|W checkYesNo/f&T checkGender'`+RsY'`+R7uN,V NVQ[XuQeLr^yO /nyr:Sbgq/Nf oyr:Sbgq/Nf S~nE\leg_'YFLXY8lENE\OOAbgqB7bSvQN1 7Y T 7C 7applyListEntry checkSfzjh 71 71yr+RV 7f[gDRhQ 7zzbz 7 checkTerm%fc[f[gyc[f[g^Sё 7yfje 7[Sё 7sfje 7S>eeg createDate 7 sqlym 7 checkSQLY 7xm 7 checkNum1,6,0 73ut1u 7A 7B 7D 7E 7F 7G 7H 7sqly 7Ylf 7 bzsm 7P kXQDRDёvS>eeg eKNMRveS+TS_e lV[Rf[ё cgS>e S>eekXQ:N,gf[gёS>e[e0_kXyM! 7checkDateNecessary 7[^mS6q~p[ [^mSzSaYNN[^bXTVku t^ȏ RRR1_`Q [^1\f[P[sYY[^bXT1YN[^ k:P kXQ^Sё Y 3000 _kXy 7 kXQ[Sё Y 3000 _kXy 7 checkZjlx 7NN{|W 7 checkZjlx 7E\lN 7 checkZjlxQ[ 7XuQ 7eLr^ 7yO 7 /nyr:Sbgq/Nf 7 oyr:Sbgq/Nf 7 S~nE\leg_'YFL 7XY8lENE\OO 7A 7bgq 7B 77bS 7Z 7vQN 7zjlx 7NNS 7I 7^chzaS[^ 7J 7NOO 73ut1u 75 kXQ3ut1u,wQSOSgqNxh-NvNy OY A SkXQW[k('Y\QGWS),SY , NS͑ YeQ _kXy2 7*  ؚ!h,gNyV[Rf[ё TUS "' 7laRte!jgv 7 checkName 7FAILURE 7 4111010001 4144010564= i>>>#?@7@pARByCDEFG I LccBQ(^a}f ZO  bi  dMbP?_*+%z&ffffff?'ffffff?(?)?M.Microsoft Print to PDFP/ 4dXXA4GIS4DINU"$,?]{~SMTJ{084F01FA-E634-4D77-83EE-074817C03581}RESDLLUniresDLLPaperSizeA4OrientationPORTRAITResolutionResOption1ColorModeColor,V4DM p"O4wMH5L*@VDocumentUserPasswordDocumentOwnerPasswordDocumentCryptSecurity" d333333?333333?&<3cAU} U} } } 8} 8} 8} }  } } } 3 } 4k } ll} mp } qqq} ru } v }   vmYV JV_ V Vr8W YmD[z@ v yQ a' ir s f: wG N8 No ulUz eej ff m {` l gl| eej ff W# | W V( f) f) k) V f f ]9} ] c- h2 h4 m6 tC vE t ihdlX qo7 ^$ ~R be ^, b1 b3 n5 ^; ^D x Zt q Zu Zn ZO ZP sF Zk Zpl\(:(ryZ(   Lq N0wX?  ]4L9@ 狦FC ClEcs5 <kXQf[uvY T<~~  <@wCC@],@x9 $< _Yhg<~~  <wCC@],@9 $<_ Y h g< ~~ i <xwCC@E],5@09 $<_ Y h g<L9admin>@dinjn   7 Sheet1ggDh8hb:SW2_1 ZO 5 z  dMbP?_*+%8&ffffff?'ffffff?(?)?MFoxit Reader PDF Printer_ 4dXXA4" dXX333333?333333?&<3U} 8K} I} I} !I}  J}  J} J}  J5@  88,888, 8 8 8 8 ,888888888888,88888 R M M R S J&LLLL Tw NP?O? N Jy NP@P NLPPL NP@ O N NP? O NPLPPQ N P? O* Q N P@ P Q N P@ P Q N P@ P Q LPPQ NP? O Q NP@ P Q NP@ P Q NP@ P Q NP@ P Q NP@ P Q NP@ P Q NP @ P Q NP"@ P Q N P P Q N P P! Q N P% P" QLPPQ N.N? d/ N+ N.N@ d0 N+NPNN p8 j N< pH p8 j N= pIDlP N@<< <<<<<<<<<<<<<888<<8 8!8"8#8$8%8&8T'8(8T)8*8+8,8-8.8/80818283848 p8 j N% pJ !p8 !j !N> !pK!r "p8 "j "N? "pL #p8 #j #N@ #pM $p8 $j $NA $pN %p8 %j %NB %p" &p8 &j &Nf &Ng 'p8 'j 'Nh 'Ni(pqNN )NS)N? )OT )Q *NU*N@ *OV *Q +NU+N@ +PW +Q ,NU,N@ ,PX ,Q -NU-N@ -PY -Q .NU.N@ .PZ .Q /NU/N@ /P[ /Q 0NU0N @ 0P\ 0Q 1NS1N"@ 1P] 1Q 2NU 2N^ 2P_ 2Q 3NU 3N` 3Pa 3Q 4NU 4Nb 4Pc 4Q.D8B888888<<<<<<<<<88PH  0(   >@$$$  7 Sheet5ggD ZO   dMbP?_*+% &ffffff?'ffffff?(?)?" 333333?333333?&<3U          LLLLLLLLL PH00(  >@ 7 Sheet6ggD   !"#$%&'()*+-/0123456789:;<=>?@ABCDEGHIJKLMNOPQRSTUVWXY[\]^`bcdegikmnopqrstuvwxyz{|}~ Oh+'0@HTd | boboaMicrosoft Excel@&@ik@ ՜.+,0HP X`hp x  Уרƹѧ Ϣ  Microsoft Forms 2.0 FormEmbedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} ShowForm Caption = "UserForm1" ClientHeight = 3180 ClientLeft = 45 ClientTop = 375 ClientWidth = 4710 StartUpPosition = 1 ' End  }t  Microsoft Forms 2.0 FormEmbedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} PrintForm Caption = "UserForm1" ClientHeight = 3180 ClientLeft = 45 ClientTop = 375 ClientWidth = 4710 StartUpPosition = 1 ' End  }t ThisWorkbookThisWorkbookSheet1Sheet1ߺ]wQQpeXfУ麯!hQpe;N z^ShowFormShowFormӡԤSbpSȉPrintFormPrintFormSheet5Sheet5Sheet6Sheet6ID="{00000000-0000-0000-0000-000000000000}" Document=ThisWorkbook/&H00000000 Document=Sheet1/&H00000000 Module=ߺ Module= Module=У麯 Module= Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=ShowForm Module=ӡԤ BaseClass=PrintForm Document=Sheet5/&H00000000 Document=Sheet6/&H00000000 HelpFile="" Name="VBAProject" HelpContextID="0" VersionCompatible32="393222000" CMG="A0A20C4A104A104E144E14" DPB="5C5EF0B6106F2D6F2D90D3702DBFEC7143A4F311CF32B6B9A3864640536F15C585E961059CAC" GC="181AB4C7B5C7B538" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisWorkbook=0, 0, 0, 0, C Sheet1=0, 0, 0, 0, C ߺ=0, 0, 0, 0, C =0, 0, 0, 0, C У麯=0, 0, 0, 0, C =0, 0, 0, 0, C ShowForm=0, 0, 0, 0, C, 32, 32, 1628, 709, C ӡԤ=0, 0, 0, 0, C PrintForm=0, 0, 0, 0, C, 64, 64, 1660, 741, C Sheet5=0, 0, 0, 0, C Sheet6=0, 0, 0, 0, C rU @nrU~|  q  )y0  0   0   0 X  0   0   0 X  0 8  0   0   0 $  0   0   0   0   <:4%DX%h$ h dD)hDJ$%DX%h$ h dDC)hD5px(lhD0   0    0        rU ,`//(`0(`08`////0!` ///0I` ///<q`9Y/////<`y/////,`//( `/0 ` 09 ` )A///,a `Y//8 `////,`Y//8`////8`////0)` ///(Q`/nrU x!Q4 a1`rU @nrU IqQ4 a1`rU @nrU~| krU $`nL+nxME(SPSSS0{BF83B7DA-5430-4F8F-A8CA-27871B9A6EDD}{315E361F-8805-4B39-BFC5-E42753F03C97} 2@ 6% %@@)[ " 0 8"HP Xh xȡ' B@4 oHȷH@ 8' B@4JoRAttribute VB_Name = "ShowForm"  Bas|0{BF83B7DA-5430-4F8F-A8CA-27871B9A6EDD}{315E361F-8805-4B39-BFC5-E42753F03C97} dGlobaBlSpacoFalse Cre atablPr@edeclaI"dTru BEx0pose0TemplateDerivCustomizD'ȡ` P Sub CancelButton_Click() notContinueBoolT Me.HidZEnd! 'ȷĶ ,onfՏ,9-Fl;/rU   y !1!P974aq ` x"l "   " "\ ''' :\lL:<, :::|l\L:<,^z6$lL, l\L, u  $ TlL, l\L, 4XrU @,`h#nrU~|       HrU 0` ///(`/,`//(`/(!`/,I`(q`/(`/(`/( `/, `//(9 `/(a `/( `/(`/(`/,`)9//,)`)9//,Q`)9//,y`//,`//,`//, `//(1`/(Y`/(`/(`/(`/0` Q///,!`//(I`/,q`i//, `//nHLOʘxME(SPSSS0{9B6C4397-73C9-4AB3-9958-6478A0BF3A2B}{F074A9FB-9064-427E-B202-C40F5275F58C}p0(%X0 %0`)[xAttribute VB_Name = "PrintForm" " Bas0{9B6C4397-73C9-4AB3-9958-6478A0BF3A2B}{F074A9FB-9064-427E-B202-C40F5275F58C} dGlobalSpaco False Cr@eatablPredeclaDIdTru BE`xpose0TemplateDerivCus tomizDt6D zL#<;4ShdC,F@?}KL!x@?}KL!;4ShdC,ME(SLSS6"  <,<0<4<8<<<N0{00020819-0000-0000-C000-000000000046}` $`k@h i& `cri( l% %  %`@.0,*24@l @\ @0L @x< @H, @` @ @ @ @ @ @8 @ @  @P @| @hl @\ @L @< @, @ @ @( @@ @ @ @lh)[$*\Rffff*0R5f1b1313*\R0*#f*\R0*#1*\R0*#17$*\Rffff*0L5f1b12f9*\R0*#2$*\Rffff*0<5f1b12be4 "      f)ǷȷϽҪexcel籣棬"$.ȷ"$., $.&ϵͳҪмУ飬粻棬"$.ȡ"$.? 0$,'* * 2A@4dP'(k@o80ܱAttribute VB_Name = "ThisWorkbook" Bas0{00020P819-0C$0046} |GlobalSpacFalse dCreatablPredeclaIdTru BExposeTemplateDerivBustomi6zD2P Sub _BeforeSave(@ByVal AsUI As Boolean, _ Can(cel) isButtonkMsgBox("ǷȷϽҪ@ex " & Chr(34)"ȷ ,10ϵͳмУA?", 0vbOKC63If L4 ThenBDAӡΠϢ E‰gPP= fE nd If Ai rU yQ4 a1a *\G{000204EF-0000-0000-C000-000000000046}#4.2#9#C:\Program Files\WindowsApps\Microsoft.Office.Desktop_16051.11727.20244.0_x86__8wekyb3d8bbwe\VFS\ProgramFilesCommonX86\Microsoft Shared\VBA\VBA7.1\VBE7.DLL#Visual Basic For Applications*\G{00020813-0000-0000-C000-000000000046}#1.9#0#C:\Program Files\WindowsApps\Microsoft.Office.Desktop.Excel_16051.11727.20244.0_x86__8wekyb3d8bbwe\Office16\EXCEL.EXE#Microsoft Excel 16.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\SysWOW64\stdole2.tlb#OLE Automation*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.8#0#C:\Program Files\WindowsApps\Microsoft.Office.Desktop_16051.11727.20244.0_x86__8wekyb3d8bbwe\VFS\ProgramFilesCommonX86\Microsoft Shared\OFFICE16\MSO.DLL#Microsoft Office 16.0 Object Library*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\Program Files\WindowsApps\Microsoft.Office.Desktop_16051.11727.20244.0_x86__8wekyb3d8bbwe\VFS\SystemX86\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{761A035C-7B2B-4AA4-8F03-99BCCA4AB261}#2.0#0#C:\Users\boboa\AppData\Local\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Library.E .`M  )[   ThisWorkbook0R5f1b1313!ThisWorkbookzLx& Sheet10M5f1b12f97 Sheet1H Sheet60P5f1b12f99 Sheet60SbpSȉ0Q5f1b1313:SbpSȉH]wQQpe0N5f1b12f9D]wQQpe`Xf0L5f1b12f9fXf&xF!hQpe0S5f1b1316!hQpe~hj;N z^0<5f1b12be;N z^Ux`;9ShowForm095f1b12be1ShowFormn1 Sheet50O5f1b12f9; Sheet5hPrintForm0;5f1b12be=PrintFormʘH`x0,#AVGEAcHgc/MIo BBIMwk ˚HJ:DezX-± D],.hܚ$bF&\wOEQ:ذ.#O8 @rdYE,d~YwZL mo##B-Z20S!8compare Excel+` VBA`Win16~`Win32`Win64x`Mac`VBA6#`VBA7#` VBAProject`stdole``Officeu`MSFormsC` ThisWorkbook|` _Evaluate`Workbook_BeforeSave l`SaveAsUI`Cancel` (isSaveButtoná`MsgBoxR`ChrK~` vbOKCancelx?`vbOK%`(У򲢴ӡϢ` Sheet1` Sheet6` ӡԤX` (Browse_Prints` Worksheets`Visible` PrintPreview` ߺ`(checkedRequiredStartR`rowIndex6d` columnIndexP` cellValue@` ActiveSheet%N`Cells`(writeLog{u`contentl`Sheets ` (msgSheetName'` (curMsgRow/` (writeLogRedm`nLene,` Charactersrg`FontU` ColorIndex`(addCommentXQStartS` sheetIndex ` errorInfo` AddComment`Interior;`Color2F`CommentHs`(clearCommentsXQStart7` ClearCommentsf`sheet2RecordNum`ffTotalNumColumn`xlNone`(getCellValueCountXQc`colIndex`valueK`(beginCheck_comment;D` checkMethodHd`(errorMsg'|`(removeSpaceFlag` (cellContent`(callFunctionXQStart `typeVal#`isValidateCount8`(isFord`titleMsgh` (startTitlel` (headIndex` (functionArgs8M` (checkMethodXQ` (checkRequiredb`(hasErrorf` (removeSpaceXQ` (checkStuNamec`(checkLeng`functionArgsArr`Split)`(checkNumh` (checkNLen`(checkValK`(checkInt`resZjlx0` (IsIDNumber-*` (checkSFZJLX*`(checkDMB` (setDMBCoded` (checkBankUw` (checkYear6`(checkXn` (checkMonth` (checkBirthday`(checkNowNecessary` (checkPhoneNum` (checkOption,` (hasErrorIdNum` (checkSqly`aX`resultur`sj`md`i``ne`LCase:`a1k\`A2l\`(atLeaOneNNullCount` (checkMoneyi` (totalMoney%`baojiaoMoneyColumns`baojiaoMoneySumk`huoshiMoneyColumn_`huoshiMoneySumr`zhusuMoneyColumn_` zhusuMoneySum>-`othersMoneyColumnߥ`othersMoneySumH`(atLeaOneNullCount` (atLeaError~` (regCheckFuncE`reg`regEX*` CreateObject`Patterni` IgnoreCase0`Test4`(checkTheSameXQNew` sheetIndex2n`(rnaO`Range `xlUp`Row` ClearContents{`cardID1[?` (cardIDColumn-h`ja`cardID2\?` (hasTheSame`(GetRowOrColIndexf`keyWordF`kbn1`cZ`Findn`WhatC`LookInP`xlValueso`LookAtO`xlWhole`Columni`value1`flag`Trim@`rowData1`Count0v`rowNummR`(AreasheetIndexH` (deleteRow` Unprotect?`Password`RowsU`Deletex` (setCellNumXQ`(deleteRowNoPro`(setCellValueXQ` codeValue` (columnPlus`length1S`length2T`Replacef`(removeSpecialCharacter` i`(!ValueColumType` columnNamew`(sheetIndexValue1` (AreaSheetName`(readmeSheetName` (totalCount-`(rgold`(TargetF`(hasErrorInValidateU` (dataRowStart` (babyIDColumn` isNullRowNum8`(cna`(notContinueBoolt` (genderColumn~`(birthdayColumn0` У麯&` heckStuName~"` (checkNameO`(checkBirthdayNecessary`IDNumber4 `Wm`Tk` IsNumeric$*`Right ` (checkSchCode` (checkFamType` (checkRXDate*`regcheckNowNecessary2`(checkXJHF`years`value2` (compareDecN` maxIntLen1` maxDoubleLen` intLength`intValue`douValue` (checkIsIntR` (checkIsNumberG` (checkMoneyTJC`(checkPersonNum `(checkIdNumLinkUz`IdNum>` isGenderRight ` isBirthRight` genderValue` genderValue11` birthValue` birthValue1~`year6n`year1w`month`month1`day`day1;`arr u`st(_`timeNowy` timePrint`Now%` (checkBZSM` ` rowDataNumn` typeValue`bsTypet` valEntity܏`val`typeRow` isNullRowArr/` sheetCountB`Protectf` Application*`ScreenUpdating! `sysDifficultyGradeNameFlag`indentifyDateFlag `xlToLeftWY`Size`HorizontalAlignmentS@`xlLeft9`NumberFormatLocal)`rowType` removeSpecialj`Locked ` totalMoneySumZ`pg`qh` (checkTheSameg`myDico`myKey`varData`idNumDick` idNumDicData`cardNum\`Exists]`Addr`Keysq`Resize@4`WorksheetFunction&` Transpose` ShowForm`CancelButton_Click`Hide9z`ConformButton_Clickwf`Flasep` Sheet5` PrintForm`Workbookk` Worksheet`_Defaultj`!_B_var_sysDifficultyGradeNameFlag_`_B_var_indentifyDateFlagE`_B_var_isNullRowNum;r` _B_var_Chr\;`_B_var_i `_B_var_isValidateCount"`_B_var_j `_B_var_rowType`_B_var_m `_B_var_n` _B_var_value`_B_var_removeSpecial&>`_B_var_titleMsg`_B_var_totalMoneySumY`_B_var_p`_B_var_q` BeforeSave`! ; = 79 ; E 1g"@ `0(P7q YX J       !"#$%&()*+,-./012345678:;<=>?@ABCDEFGHIJLMNOPQRSTUVWXYZ[\^_`abcdefghijklmnoq`rU % nrU~| prU $`$`nrU~~{        A rowIndex columnIndexcontent sheetIndex errorInfocolIndex checkMethoderrorMsgtypeVarU~| Tq   1 )IT1 QqP Ii!9Y )a0`\yQ 9)Iqa9qaX )$  0li(]@+'t'':N 6t;:%p(%$  dp)p;:%p(%$  dp )p;:%p(%$  dp )wp;:%p(%$  dp )p;p: %$  dpW )p5 { z" $   (` (P;p: %$  dpW )p5]%:%p(%$  dp>AUz)p6U%'%:%$ ppa"z)p61:Ntt(((0 6 t0 ( uL:%p(%$  dpAq )p5: %l C!( %l C" q C:%p(%$  dpq)p%lC#:$%lC% qW  &''0:'Ntt:(:)^6 t0T;:%p(%$  dp)p=(%p(%$  dpW*C+)p5 uP+'t'':,N 6tz;:%p(%$  dp)pzRp(%$  dpW!:-` ./)p6 u<( uDh< (/ (0 (1 23 :24 (uz5z6(uDhtM(% @p(%$  dp A7h)p5z8h:2]@p3:9Nh :X/53:;Nh :d/5X5I ,X5ILiTX5Iih4 IT @X:;N :H/6(%H( (3 H(%H:<N :8/6&85ILi$85Iih <$ @8q(l =-6E @ @p(%$  dp )p >  D(% @p(%$  dp )pK:?:@:At0:B`36 t0z[% @ @p(%$  dp =CCD)p63 .5 $~ T~4< u8 H(%X:<N :8/6&85ILi$85Iih <$ @8q(l =-6E @ @p(%$  dp )p >  D(% @p(%$  dp )pK:?:@:At0:B`36 t0z[% @ @p(%$  dp =CCD)p63 .5 $~H nd5IQ(%d( (3LH(%d:<N :8/6&85ILi$85IihL<$ @8q(l =-6E @ @p(%$  dp )p > ?D(% @p(%$  dp )pK:?:@:At0:B`36 t0z[% @ @p(%$  dp =CCD)p63 .5 $~ nH(%X:<N :8/6&85ILi$85Iihpn<$ @8q(l =-6E @ @p(%$  dp )p > aD(% @p(%$  dp )pK:?:@:At0:B`36 t0z[% @ @p(%$  dp =CCD)p63 .5 $~pMf% @ @p(%$  dp CE)p5 ~t1"0(]<0//'O7:?:F4:Gt`36tz3 .5(a`1`(]t/U " ( &v iPv ih0Mv i%p: %$  dpHI)p5 P~0v i"{ u5z ~(  (h "pz (]3zM@( J 6,kzD (t J 6t  ~Z (]t7'0't':K :L 6 t0u+'t'':MN 6t=(%p(%$  dpW*C+)p51p: %$  dpN)p"zO( P6 uO+'t'':QN 6t=(%p(%$  dpW*C+)p51:RNtt(((0 6 t0 +'t'':SN 6t=(%p(%$  dpW*C+)p51p: %$  dpN)p;:%p(%$  dp)p;:%p(%$  dp)p;:%p(%$  dp)p|*tD4p@0PTX$Pd `h`H8( 4 pt00   flisValidateCountregvalue sheetIndex2keyWordkbnvalue1flagrowNum AaSaveAsUICancel functionArgsIDNumberfunctionArgsArrvalue2IdNuma<jx#<ywuKQϲ F I@i؅Mx K*   rU~~~~~~~~"~~~~~~~~~~~~ F4%Mjflck  a Qa Qa Q) I Aa I !Aq 9a)Qyaa   I !I!q!!!!"9"Y""""" #)#Q#q##### $)$I$q$$$$ %)%Y%y%a I  ! a Q A!   VBAProject ThisWorkbookSheet1Sheet6ӡԤߺУ麯ShowFormSheet5 PrintFormF'C:\Program Files\WindowsApps\Microsoft.Office.Desktop_16051.11727.20244.0_x86__8wekyb3d8bbwe\VFS\ProgramFilesCommonX86\Microsoft Shared\VBA\VBA7.1\VBE7.DLLVBA ) Q0FuC:\Program Files\WindowsApps\Microsoft.Office.Desktop.Excel_16051.11727.20244.0_x86__8wekyb3d8bbwe\Office16\EXCEL.EXEExcel  1)@0FC:\Windows\SysWOW64\stdole2.tlbstdole  PL-[DR'C:\Program Files\WindowsApps\Microsoft.Office.Desktop_16051.11727.20244.0_x86__8wekyb3d8bbwe\VFS\ProgramFilesCommonX86\Microsoft Shared\OFFICE16\MSO.DLLOffice y`.E .`M sC:\Program Files\WindowsApps\Microsoft.Office.Desktop_16051.11727.20244.0_x86__8wekyb3d8bbwe\VFS\SystemX86\FM20.DLLMSForms aay p\v+{JJa 1C:\Users\boboa\AppData\Local\Temp\VBE\MSForms.exd a y У򲢴ӡϢ checkTheSame FFi F 0]\Ohpev Ncknx N}ge!jgT QۏLdk!h 1qazPasswordProtectUnprotect Oo` Nxh f , 00 $4DHLPd CellsClearContentsF A65530 RangeEndRow IV5FE=F!N Fl|W@ҍs LDF Worksheet @FF FAILUREcheckedRequiredStartwriteLog writeLogRedaddCommentXQStartclearCommentsXQStartgetCellValueCountXQbeginCheck_commentcallFunctionXQStart regCheckFunccheckTheSameXQNewGetRowOrColIndexcheckDMB deleteRow setCellNumXQdeleteRowNoProsetCellValueXQ setDMBCode removeSpaceXQremoveSpecialCharacter A9:IV65536Font [SONameSize &HorizontalAlignment @ "NumberFormatLocal 4`nx[_YhgT hgǏ z-N RsQexcel &TRS[penc"N1Ybhg1Y% )nc:yTabColorIndex "l gg~b0Rf[uOo` elۏL!h -NOo`Y N  value - : ; ,{ Rvpency VX[(WyrkW[&{Y^ , ; ' <> " ? zz=PGU"K6?9ywuKQϲ I@i؅M Browse_PrintF;4ShdC,F@?}KL!DFWorkbookWorkbook_BeforeSavecheckInt .`/f&Tnx\OX[excel YOX[ pQ nx[ , &|~\ۏLhg!h Y NOX[ pQ Sm ? checkRequired checkStuName checkName checkBirthdaycheckBirthdayNecessary IsIDNumber checkSFZJLX checkSchCode checkFamType checkRXDate checkYear checkMonthcheckXJH checkPhoneNum checkBankcheckXn checkOptioncompare compareDeccheckLencheckNum checkIsInt checkIsNumber checkMoney checkMoneyTJcheckPersonNumcheckIdNumLink checkNLencheckNowNecessary checkSqly checkBZSMMI@i؅MywuKQϲME(SLSS6"N0{00020820-0000-0000-C000-000000000046}(%H` %8 %`h8@tt0)[$*\Rffff*0P5f1b12f94xAttribute VB_Name = "She@et6" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2<jxh#<[Gz>=P FGU"K6?9xGU"K6?9[Gz>=PME(SLSS6"N0{00020820-0000-0000-C000-000000000046}(%H` %: %`h8@tt0)[$*\Rffff*0O5f1b12f94xAttribute VB_Name = "She@et5" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2<jxH#<E=F!N Fl|W@ҍsxl|W@ҍsE=F!NME(SLSS6"N0{00020820-0000-0000-C000-000000000046}(%H` %6 %`h8@tt0)[$*\Rffff*0M5f1b12f94xAttribute VB_Name = "She@et1" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2xME bj~xME(6 << < `@ Ih `CoIH IJ `L 0` I @ `p I I @ @` I @ `  I @ +` ii`H`,H``` (`  I @ `h  I @ `  I @  `X I @ ( ` I I @  `h I @  ` I @  `X I @ `  I @  `H I @ @  ` I< I  D `X  I< x I   `  I<  I   `X I x I   ` I  I   `X I x I   ` //I  I   `X  I @  `  I  h `0  I @  `  I @ X`   I @ H` ##I IH I ` ` ``````@ ` @ ` @ ` @ ` --I I  ` I ```@  ` I I @  `` I I 0  Xh  H (  (  @%` !! h2)[$*\Rffff*0S5f1b1316G  B       (  B     H(p  0 PB hp &H 08@HP XB     Dx B 0@HPX` nh  B  , $H p  H       " H h   "   4 ( 0   B   4 0 @ H P X ` h  0 B H P X x      0 PB hp6x | h B 0 x  B    (08Xhpx x  (B @HPp | ( HB `h$p | P pB f (0 |8  B (08@H P  B  (:0p     B       ( 0 .B    08@HP X .B (0@ P`hpx B 0 8&HpxD4  (Hhpx B  8 @&Px  ( "  D(4p      ( B         ! ! "(!P! X! <`!!! !! !B p"  x"" "&"""""  "D#X# p#x# # #"# ## $# "$ 0$ @$ H$ P$p$$$$$ $>$ %40% h% p%x% %% % & 8&B P&X&`&x&&&&&& & @' `'B x'' ' ''' ' @( `(B x(( ((((((( ( x) )B )))))))** * * *B ***+ +(+0+8+@+ H+ + ,B 0, &8, $`, , ,&,*,"-$8-`-(----.. . 8. 2P.."...  ./(/8@/x// /B 80@0X0 `0&p00$000000 0 1" 1 H1P1 $X1 "1 1 1 1 1112$(2P2X2`2h2 p2>2 242 3$03 X3 `3 h3p3 x33 3B  4(40484@4H44 55 5(505@5H5P5X5`5 h5 5 6B (606 H6 P6X6`6h666 66666 7(70787@7 H7 X7h7p7x77 7 8 08B H8P8&h8 8 8888-----------------------------------------1 ,дϢʾ Ϣsheet--------------------------------------- ʱ0 Ϊʱ1 Ԫ] H J h$>%P'L L'd'ki-----------------------------------------2 Уѧ ҪΪ-------------------------------------------------------------ʽȷfalseʽȷtrue $@'zk]%^([\u2E80-\uFE4Fo]|[a-zA-Z]){1,20}$'3޸ģУƧ  $'d'kix-----------------------------------------2 Уѧ ҪΪ-------------------------------------------------------------ʽȷfalseʽȷtrue0 ,$''$/ΪDZ'zXkP]%^([\u2E80-\uFE4Fo]|[a-zA-Z]){1,20}$'3޸ģУƧ  $'d'ki|-----------------------------------------3 УڸʽΪ2012-05-09(Ϊ)--------------------------------------- $@'z0k(](reg = "^((19)|(20))\d{2}-((((0?[13578])|(1[02]))-((0?[1-9])|([12][0-9])|(3[01])))|(((0?[469])|(11))-((0?[1-9])|([12][0-9])|(30)))|((0?2)-((0?[1-9])|([12][0-9]))))$"reg = "^((19)|(20))\d{2}-((((0[13578])|(1[02]))-((0[1-9])|([12][0-9])|(3[01])))|(((0[469])|(11))-((0[1-9])|([12][0-9])|(30)))|((02)-((0[1-9])|([12][0-9]))))$";^(19|20)\d{2}-(1[0-2]|0?[1-9])-(0?[1-9]|[1-2][0-9]|3[0-1])$'  $'d`'kPiH|-----------------------------------------3 УڸʽΪ2012-05-09(Ϊ)---------------------------------------@]^((19)|(20))\d{2}-((((0[13578])|(1[02]))-((0[1-9])|([12][0-9])|(3[01])))|(((0[469])|(11))-((0[1-9])|([12][0-9])|(30)))|((02)-((0[1-9])|([12][0-9]))))$'  $'d0'k ih-----------------------------------------4 У֤---------------------------------------Ϲ򷵻trueϹ򷵻false]7905842163790584280Ȩ] 10X98765432P0У $@' ȥո]h  | 6)׶֤Ϊ,ΪͨУ'zkx Gzj $$Gzj *[0-9X]Gzj   $' G 'j   $  '  ' $ ,  $G'jiPz-----------------------------------------У֤ -------------------------------------------------------------ʽȷfalseʽȷtrue],^[\u4e00-\ue863a-z|A-Z|0-9|()|]{1,18}$'  $'d0'k i----------------------------------------5 -УѧУѧУʶ 42λһλΪֻx-------------------------------------------------------------ʽȷfalseʽȷtrue(]^[1-9]\d{40}[\dx]$'  $'d'kiz----------------------------------------6 -У黧 -------------------------------------------------------------ʽȷfalseʽȷtrue].^(\u519c\u6751)|(\u53bf\u9547)|(\u57ce\u5e02)$'  $'d'kiu-----------------------------------------7 Уѧʱ-------------------------------------------------------------ʽȷfalseʽȷtrue]x'^(((19)|(20))\d{2})((0[0-9])|(1[0-2]))$'  $'d'kpihq-----------------------------------------7 У-------------------------------------------------------------ʽȷfalseʽȷtrue  ,ΪDZ'd'kzk]^((19\d{2})|(2\d{3}))$'  $'d'kxipq-----------------------------------------7 У·-------------------------------------------------------------ʽȷfalseʽȷtrue(]^((0[0-9])|(1[0-2]))$'  $'dp'k`iXv-----------------------------------------9 Уѧ-------------------------------------------------------------ʽȷfalseʽȷtrue]^\d{4}[0-7]\d{3}[0-3]\d{7}$'  $'dH 'k8 i0 v-----------------------------------------10 У绰-------------------------------------------------------------ʽȷfalseʽȷtrue]x^\b((1(([38]\d)|(4[57])|(5[0-35-9]))\d{8})|(0((10)|(2[\d]))-[2-9]\d*)|(0[3-9]\d{2}-[2-9]\d*))\b'  $'d 'k i v-----------------------------------------11 Уп-------------------------------------------------------------ʽȷfalseʽȷtrue]^[1-9]\d{14,20}$'  $'d 'k i -----------------------------------------checkXn Уѧ磨2012-2013-------------------------------------------------------------ʽȷfalseʽȷtrue]h]1^(20\d{2}-20\d{2})|(19\d{2}-19\d{2})|(1999-2000)$'  $ -$'$$ 'd8 'k( d 'k i -----------------------------------------checkOption У鱸ע磨Сvalue2-------------------------------------------------------------ȲС200false 򷵻true <'zk <  'd'ki------------------------------------------------------ȽϴС(Сڵڷtrue)----------------------------------------------------------------'value1value2false 򷵻true <X'< X' <  'Dd'Dki------------------------------------------------------ȽϴС(Сڵڷtrue)-dec---------------------------------------------------------------'value1value2false 򷵻true <$4'< $4' <  'd'kix}------------------------------------------------------У鳤--------------------------------------------------------------- ,$'' $/ΪDZ'kzxkp ,-±0ʼֵΪָάõ± $$4 $$4'zkd ˵У̶ $$4'zkkxip}------------------------------------------------------У--------------------------------------------------------------- ,$'' $/ΪDZ'kxzpkh $& Ϊz@ .e+Сz $4e% С0zk ,-±0ʼֵΪָάõ± $$4 $$4'zHk@d ˵У̶ $$4'zkki------------------------------------------------------УֵΧ--------------------------------------------------------------- ,$'' 'zk $) Ϊz $4e) С0z k $4$$4 $4$$4'zP kH i@ ------------------------------------------------------Уֳ(Number,ΪҲΪСС0)--------------------------------------------------------------- ,$'' $/ΪDZ'k zkֲɼӷ<^(([1-9][0-9]*)|(([0]\.\d{1,2}|[1-9][0-9]*\.\d{1,2}))|0{1})$'  $zk $% ΪzX $4 e$ С0z(k $'+󳤶$'.Сλ .''' "˵ûС $4' $$4'zPkHd С  . $'DԪֵλ  . $' $$4 $$4'zkkxip-----------------------------------------checkIsInt У鲻С0-------------------------------------------------------------ʽȷfalseʽȷtrue ]x ^0|[1-9]\d*$'  $'dh'kXiP-----------------------------------------checkIsNumber УΪNumber-------------------------------------------------------------ʽȷfalseʽȷtrue ' $'kXiP-----------------------------------------checkMoney У0-9999-------------------------------------------------------------ʽȷfalseʽȷtrue ]P ^(([1-9](\d{0,3})|0)|0)$'  $'d8'k(i -----------------------------------------checkMoneyTJ У0-9999Сһλ-------------------------------------------------------------ʽȷfalseʽȷtrueh ] ^([1-9]\d{0,7})$'  $'d'ki-----------------------------------------checkPersonNum У׶԰һ------------------------------------------------------------ʽȷfalseʽȷtrue ]@^(([1-9]\d{0,3}))$'  $'d'ki-----------------------------------------checkIdNumLink У֤ԱͳûдǷһ------------------------------------------------------------ʽȷfalseʽȷtrueX If colIndex = jhrIDColumn Then checkIdNumLink = True Exit Function End If]%Ա֤ǷӦ]$ں֤ǷӦ](ڵһγֵ±]@"Ա,Ԫ֮ڵ]X$ݺŽȡ]p!,Ԫ֮ڵ]"ݺŽȡ]#]%·]]0 $' $'  (ڶλΪΪ H  l$V,PdڶλΪżΪŮŮ H  l$V,Pk $' $' $' -  -  H  l$V,P'ix------------------------------------------------------Уֳ(Number,ΪҲΪСС0)---------------------------------------------------------------H ,$'' $/ΪDZ checkLen0,1,33A@T'k kzk $% Ϊz $4 e$ С0zk$'+󳤶$'.Сλ .''' "˵ûС $4' $$4 checkLen1,1,33A@T'kzkd С  . $'DԪֵλ  . $' $$4 $$4 checkLen1,1,33A@T'kzkkix-----------------------------------------3 УڸʽΪ2012-05-09δʱ(Ϊ)---------------------------------------](]@]X]p^((19)|(20))\d{2}((((0[13578])|(1[02]))((0[1-9])|([12][0-9])|(3[01])))|(((0[469])|(11))((0[1-9])|([12][0-9])|(30)))|((02)((0[1-9])|([12][0-9]))))$' yyyymmdd$'   'z k  $'d 'k i -----------------------------------------2 У ҪΪĸ-------------------------------------------------------------ʽȷfalseʽȷtrue $@'z k ]^[a-jA-J]{1,10}$'  $' '   $ $'    $ $'  ''z k  d 'k ix -----------------------------------------2 Уѧ ҪΪ-------------------------------------------------------------ʽȷfalseʽȷtrue  ,$'$'ΪDZ'z` kX iP H -Attribute VB_Name = "У麯" '-%1 ,дϢ ʾ sh`eet$ʱ0! Ϊ1 Function checkRequired(bIndex, row coluDmn ) 'ԪDim cellValu@e As Sng= Work5s8).C s(;If2" Then0K gFalseE{Trund If E-2"ѧ ҪΪ8& !ʽȷuf7'At1wStu(vg@p@QTrim?"Q0DR7 Exit H}D MO_reà ^([\u2E80-\uFE4Fo]|[a-zA-Z]){1,20}$" 'ģԁAUƧփ[@2C*A"(, 9L{3{R=5G=|%9Bq>-B@BgB, fArgsd|8Arr6Split(, ","h"-a F6%C8l (0)07 'Ϊǣa :!e_U TTTT&oSO+_SH3$ak!Ϊ2012-05-09(:); -BirthdayfA?CoJ ;;' "^((19)|(20))\d{2}-(0?[13578] 1[02])&)-9a[12][03[0&1((46y11/'0 ?2s)))$?@ p[1 [| |(3e S /H 19|-2]|- ||` >-!\uer)\ckX!/3 #~]//o3n3o3o3c3Necessar3?K /-#-""+"*,O "'x"gzr2]w0;y (hRos4P֤<ϹCy8'ID% IsIDNumber(By W, pB)Boolea Const W'qP79058428163P'Ȩswc10X98765432CA31{& = _)ȥո!-sInteger, iT0%v= babyIDC A>aSC׶:,ͨA 1_hɰ! Len(<>8 18Îp N ot eric(Mid, 1 7)Q f5Like "*YAfX]_ For= 1 To 17CqTqWě]111sps( + ; i! * TNexts Mod 1Rightc, T3pcC@:> ~ -9 'ʽfalse*&tru$Function checkSFZJLX(val@ue) Dim reg  = "^[\u4e00-\ue863a-z|A-Z|0-9|()|]{1,18}$"9IfECdr(I, g Then%p5TR EaFo End If n|%5!-Уѧʶ 42λһλΪֻx9-˰chCodek1-9]\d{40}[\dx~]5e^e eV6dFamTyp`](\u519c\u6751)|3bf\u95477cee02)tdd=2G?2_Y$7 dȀѧʱ8_`RXDatr1NowNecessary#A%(((19020)) c2})((0[]12])2e)?22+$d2<811YeDar, fDArgsArr¾#""'| 0 'ΪDZƅ?a'))iH3diaExit EA "^QP|(23}'ysbz_Qsk'_sO"'''؏@ckMonthpO>O>ck%S @_91WppO(XJH,4}T7337O/A-@/#?10cn఺OPho`neNum?<\bD(([38l4[57m5`L35Pn8}050p2 n-[J2B*[3{2}g)\b22 x_11п2OBank 3[t14,20_2_2_2ck4oo:nIAѧ瀣2012-@3_pXn_Uxys20K/st019t99 00c_\2ASplit ,0 "-"],If years (1) -0) = 1 Then checkXntTruelEls`RFa 8End I>ft l2.Fu nctio'-3%TOp6У鱸עСvalue2&) ''(200f|'Ztb L(тA1, E)Ѓ""9u= ЅExit HgLen() >D)"A # όA2ӅaqȽ С(ol)G $CoŚ ՆompareׅpCIntf22HGsc x~7̃Jxſ--X5dec:35C 'y$Dec6 C(26?6(06 d6#6$_,1AA:.&, faArgsH+Arr"Split(, ","h@ (Eg v` ("0B 'ΪDZ22 2`UBound 2 ±0ʼֵΪάõ ! 7p&c=/1)X) A@B<s (2x8 oq^]1l '˵.̶A./" n [ϗ: @o@ &@@o Z@0.@@b++R@@ Not IsNum(erik)8JΪ>, InStrcp0.") <> OСoO 6`Wsm= 0 -p?P!8?P?P?PRkr@pM>o?f??P$?P|O$]?P?PI?P3P_2  ?P?PI1Pֵ>}PVale7"ntLqPt(functionArgs, ",") checkVal = FalsedIf valued"" Then6zTrux@Exit F?End If OoNot IsNu@meric(})y 'Ϊ 7jf-CDe!(<= 0+Сx0))^ 1> =  Arr(0)) AG1kN bbGh'-2f(pber,ΪҲСhB\)sF : E- B@, I]v fSpli` p  ΪDZG*Br: Ta4A-q'#;@ӷGreg"^(([@1-9][0*)|0]\.\d{1,2}|h))|0{1}x)$" # C끒;(,Ðf ?,U&0/bmaxIn0tLen@+E1) 'j8mK"Double2pλ"i"gthInStrEj".@ìdou4 1) _˵#+b" /s (E) _ ~n4=JPtEJ Mid31, 5 - EԪ֒Y#λ_ h+ppspmpq2p^ ]R!5qhet&k Is> stqC? 'ȷpfR5t? 3tC%4Diu`E˵ûГ r@`(%) <= B}).3p?2s?22 2123?/%->o*uE n'LB% - '%$!8.λߟ!%+J  S!Then AcheckNecessaryAuFalseExit FunctioEnd If-C#J(,6) 4 5Tru4E9K@M '-%2> У ҪΪ8ĸ& !ʽȷfCS'At=E.C;Sqly(i, anVPTrim)A" T0Um8oOmCsA^[a-jA-J]{1,10}Ez%xsLen4C i1 T(o snMid(LCaseD , i, 1 Bj i +  T mRjG W  m)(a 1 )) Next jbic[6E ZZQZѧZ֑U$Z ]ZBZSM#8, fArgsG9PArr-S`plit(,Oa Q(0ad0: 'DZ#0aB= gS(@ѧϢӡģ$>B@BѧϢӡģ$>(@oAttribute VB_Name = "Ԥ" Sub Browse_Print () Worksheets("ѧϢlģ").VisiblaTrue"d^P@review2cEnd 0* pHd VBAProject4@j = r )[ J< rstdole>stdole h%^*\G{00020430-C 0046}#2.0#0#C:\Windows\SysW OW64\e2.qݔxME(6 LL F` @ IH `rmIJ 7`L R` iT \X` 8  iT f`  Ih IH IJ Ij  t` X  #Ih xIH IJ  ~X`  -Ih IH 8I  8`  2Ih I IH IJ I  ` x GI Ih IH IJ I  ` X ,I xI `  `  :I +& ` P QIh pI( i*`,  `  bI (I< HI> @B J `  Ih IF  T ` @ Ih `IH I I  V@ ` Ih  IF  X ` k Ih  IH  I  I    ` @ I ` Ih  IH  I @B @Z @L  ` H Ih h IH  I `<`^`` d` 0  I @  8 X@ XD %  @Xl  >@Hh @0X @`H @D @x4 @$ @ @ 8 h )[$*\Rffff*0N5f1b12f9*\R1*#400*\R1*#13e*\R1*#132 B       B   B  h p2 p `B  x 8 $ 8 "@ pHB   8  $0 X$`  B  ( 0P xXB  4(0*X$ 8BP0h!  ( 0 8 @  B     4 $P  "x   "   .  8 0H x  0   * 0 H .X   .   0 8H6` 6 .  P`8x 6  (8 `p.   f X x>&  X( h *0 `j& 0@PXx `   H((xp H(0 H(p H( h &p  n HXp x 8( 8( x &  n Xp  8( 8(  &  b h &X  ,    f X! x!!! ! 8!(! 8"(" x# &# #### f# P$(h$ $ T$ &$ %0%8% $P% &x%$|%$& &$ H&$X& h&p& x& &$t&$&'$ 0' @' $H'P' X'x' ^' '"' (@((&h( (( (((( b( `)p)) t) &* 8* H*P*p* bx* * ++(+0+&+ + ++, , ^(, , ,,,X,&8- `-p-x-- ^- .  .0.@.XH.&. . .../ ^/ p/ ///T/&0 @0 P0X0`00 n0 0 101"@1h1&1 2 0282@2`2 jh2 2 23"(3P3&3 4(404P4 nX4 4 45"5@5&5 5 66(6 P066666&@7 h7 x7777 R78 888X@8&8 8 8889 b9 p9$99@9&9 :0:$8:`:h:: ^: :";0;@8;&x; ;;";;;< ^< p<&< <@<&< =0=&8=`=h== |= >$(>P>(X>@>&> > >"?(?0?P? |X? ? ?@@@&X@ @@ @@@@  j@ XApAA AFAA@A0B&8B `BpB0xBBBB pBHC(`C CCCCC CC C DD(D@DHDXDpDDDTD&D E 0E8EXE t`E E$EF@ F&`F FF$FFFF NFHG.`GGGGG GG&pH H HHHH dH HI `I@I&I II2J8J x@J J6J.K@KPK( XK2hK( xK1K( K2K( K1KKKJKHL`LhLpLxL fLB  L L<L8M XMpM$M$MMM M \N B  N,O 0HO@xO"O ^O 6@PxPPPP0PH QhQQQQQQ Q "PR xR .RB  R R$RBS PS `S pS S S SSS S HT `T xT TB  T"T TTU UUU U8@UxU2UU U UV VV V(V FHVVV V V *VV V W WB  WW*W 4XPX pXXB       !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvxz{|}~ XX XY Y Y YB  Y*Y Z (ZB Z<Z JZ[ [B  [ [ "[ \8 \2X\\ \\ \\ \ \]" ]0H] x](]]]&]] ^^ ^B  ^^V^(_ 8H_ _ _:_4_$(`P`"h```` `B  8a@a6Haaaaaaaa-----------------------------------------УУдϢʾ ע----------------------------------------------------------- Ԫ] H J N%P'L L'Fd('Fki--------------------------------------------д־ ¼ϢʾһϢ-------------------------------------------- T Z X$V,P Z 'ZiX--------------------------------------------д־ ¼ϢúɫʾϢ-------------------------------------------- T'^ T Z X$V,P ^ Z X$V%P%`!b(d Z 'Zipi--------------------------------------------עʼУ飩-------------------------------------errorInfoעX 1Worksheets(sheetIndex).Unprotect Password:="1qaz" j H J h$>%PB@l H J h$>%P!n(pW ӻɫ H J h$>%P!r(@ii--------------------------------------------ɾעʼУ飩-------------------------------------1Worksheets(sheetIndex).Unprotect Password:="1qaz" H J h$>%PB@v H x J z H J h$>%P!n(dd` | H J h$>%P!n(dk0i(------------------------------------------------------ ȡָcellֵ------------------------------------------------------------- H  h$>%P!'~ihr---------------------------------------------ʼУ Ƿӻɾעõķ----------------------------X  Уʧ H J h$>%P!rd жעΪ h H J A@fV עd"Ϊգȥǰע h H JA@tN ע h H J A@fk1 MsgBox "" & rowIndex & "" & errorMsgd :УɹжǷעУʧʱעȥ h H JA@t ,#ȥո,ʾ HУ JУַ"$. "$."а˿ոϵͳԶΪA@Rd`kXkPiH----------------------------------------------------------------------------------------------------------------------------------y--------------------------------------------ݱʶöӦķ(ʼУ)-----------------------------------------------------------------------------------------------------------------------------------------------------------------------ѴϢдб8 H J h$>%P''  J h$>%P'Iȡбͷ Ϊϲеıͷ  J h$>%P' H e  J h$>%P'k0'  checkLen*)ΪУ  $'checkLen'  checkNum*e-ΪNumberУ  $'checkNum'  checkNLen*e.ΪNumberУ  $' checkNLen'  checkVal*e-ΪֵУ  $'checkVal'  checkInt*e-ΪֵУ  $'checkInt'  checkTerm1e-"ǡ"Ϊ1' checkTerm'  checkYesNo1e/"ǡ"Ϊ1' checkYesNo' checkDiffName1e2ѼΪ1' checkDiffName' checkDiffCode1e2ѼΪ1' checkDiffCode'  checkSQLYe-Ϊ1' checkSQLY' checkIDCardType1e4֤Ϊ1'checkIDCardType' checkSqyyName1e2ԭΪ1' checkSqyyName'  checkYear1e. У1' checkYear'  checkXXSHZT1e0ѧУ״̬У1' checkXXSHZT'k _=================================1 ִеķǿУ==========================================ѴϢдб checkNullKT h H J$'  H е Ϊգ'')УʱдϢ A@RRMsgBox "" & rgold.Row & "е" & Chr(10) & titleMsg & "Ϊգ"kx h  H J A@'a=================================2 ִѧУ========================================== checkNameKT h H JA@@ȥոķ H J h$>%P!' $'  H е ;дȷΪ֣ȴ1ܳ20ַ''%УʱдϢ A@R  'k h  H J A@'Z================================= ִеijУ==========================================checkLenKT  $'  ,$'$ ` ΪDZΪ̶ȶ H е .дȷΪաд򳤶ȱΪ$ λ'$ ed ΪDZΪȷΧ H е 4дȷΪաд򳤶ȱڵ$ λҲ$ λ'$ ed ΪDZΪ̶ȶ H е &дȷΪգҳȱΪ$ λ'$ ed ΪDZΪȷΧ H е ,дȷΪգҳȱڵ$ λҲ$ λ'k '0УʱдϢ A@RkP h  H J A@'h================================= ִеijУ飨Numberͣ==========================================checkNumKT  $'  ,$'$@ ΪDZΪ̶ȶ H е KдȷΪգдΪ֣ڵ0λȲ$λСλ$ λ'$eD ΪDZΪ̶ȶ H е CдȷΪգұΪ֣ڵ0λȲ$λСλ$ λ'k'0УʱдϢ A@Rk@ h  H J A@'h================================= ִеijУ飨Numberͣ========================================== checkNLenKT  $'  ,$'$@ ΪDZΪ̶ȶ H е KдȷΪգдΪ֣ڵ0λȲ$λСλ$ λ'$eD ΪDZΪ̶ȶ H е CдȷΪգұΪ֣ڵ0λȲ$λСλ$ λ'kh'0УʱдϢ A@Rk( h  H J A@'[=================================ִֵΧУ==========================================ѴϢдбcheckValKT  $'  ,$' H е $дȷΪ֣ڵ$ Ҳ$''-УʱдϢ A@R& isValidateCount = isValidateCount + 1k8 h  H J A@'_=================================ִеΪֵУ==========================================ѴϢдбcheckIntKT  $'  ,$'$@ ΪDZΪ̶ȶ H е 8дȷΪգдΪڵ$ҳȲ$ λ'$eD ΪDZΪ̶ȶ H е 0дȷΪգұΪڵ$ҳȲ$ λ'k"'0УʱдϢ A@Rk@" h  H J A@'`================================= ִе֤У========================================== checkSfzjhKT h H$~'S ȡд  H е &дȷ֤Ϊգ''0УʱдϢ A@Rd  ֤  J$'O ֤У :֤У H е MдȷΪѧ֤ţһλΪĸXıд''4УʱдϢ A@R  'kd $'  H е EдȷΪգҳȱڵ1λҲ18λ''4УʱдϢ A@Rkkk h  H J A@'X================================= ִ֤У================================== checkZjlxKT checkZjlx 1$'  H е дȷ''(УʱдϢ A@RdX checkZjlx h H JA@k0 h  H J A@'\================================= ִѧŵУ==========================================checkXJHKT 1, 1, 50$'  H е EдȷΪգҳȱڵ1λҲ50λ''0УʱдϢ A@Rk h  H J A@'[=================================ִпУ==========================================ѴϢдб checkBankKT $'  H е $дȷΪ֣ڵ$ Ҳ$''-УʱдϢ A@Rk h  H J A@'W=================================ִУ==========================================ѴϢдб checkYearKT  $'  H е *дȷʽ20122002ȣ''-УʱдϢ A@Rk h  H J A@'W=================================ִѧУ==========================================ѴϢдбcheckXnKT $'  H е )дȷʽ2012-2013ȣ''-УʱдϢ A@Rk h  H J A@'W=================================ִ·У==========================================ѴϢдб checkMonthKT $'  H е &дȷʽ0112ȣ''-УʱдϢ A@Rk h  H J A@'g=================================3 ִеУ(DZ)==========================================ѴϢдб checkDateKT $' 2Уʧ H е дȷдʽΪ"$. xxxx-xx-xx"$. 2013-02-21''-УʱдϢ A@Rk h  H J A@'c=================================ִеУ飨==========================================ѴϢдбcheckDateNecessaryKT& $' 2Уʧ H е дȷдʽΪ"$.xxxxxxxx"$.- 20131221ֻϵͳʱ֮ǰ''-УʱдϢ A@Rk h  H J A@'g=================================ִеijУ飨==========================================ѴϢдб checkBirthdayKT! $' 2Уʧ H е дȷдʽΪ"$.xxxxxxxx"$. 20131221''-УʱдϢ A@Rk h  H J A@'J=================================10 У绰====================== checkPhoneKT $'  H е дȷдʽΪ"$.-̶绰 ֻ"$. ''%УʱдϢ A@Rkx h  H J A@'L=================================checkOption У鱸ע ====================== checkOptionKT B$'  H е )дȷȲܳ200ַ''%УʱдϢ A@Rk h  H J A@'\================================= ִ϶ѼУ================================== checkDiffNameKT checkDiffName  $'  H е дȷ''(УʱдϢ A@Rd checkDiffName h H JA@k h  H J A@'X================================= ִѧУ״̬У================================== checkXXSHZTKT checkXXSHZT  $'  H е дȷ''(УʱдϢ A@RdH checkXXSHZT h H JA@k h  H J A@'X================================= ִ֤У==================================checkIDCardTypeKTcheckIDCardType  $'  H е дȷ''(УʱдϢ A@RdcheckIDCardType h H JA@k h  H J A@'v=================================14 checkGender ִǷΪСŮУ--================================== checkGenderKT checkGender 1$' '-ԱдУ֤Ŷ H е дȷ''(УʱдϢ A@Rd checkGender h H JA@k h  H J A@'u=================================14 checkYesNo ִǷΪǡУ--================================== checkYesNoKT checkYesNo  $'  H е дȷ''(УʱдϢ A@Rdh checkYesNo h H JA@k@ h  H J A@'d=================================14 checkSQLY ɵУ--================================== checkSQLYKT  $'   H е дظ¼룡'd H е дȷ'k'(УʱдϢ A@Rd checkSQLY h H JA@R У'kP h  H J A@'i=================================15 checkSqyyName ִбע˵У--================================== checkBZSMKT h H$~'L ȡд ''   $ $' h'k  1,1,100'  $'d0,1,100'  $' H h$V,Pkh  H е &дȷ,ַΪ100λ''(УʱдϢ A@Rk h  H J A@'n=================================14 checkSqyyName ִУ--================================== checkSqyyNameKT checkSqyyName  $'  H е дȷ''(УʱдϢ A@Rd`E checkSqyyName h H JA@k0E h  H J A@'G=================================У====================== checkSqyyDescKT H J h$>%P! 1, 1, 60$'dHD 0, 1, 60$'k D  H е VдȷΪʱдȲܳ60ַ''%УʱдϢ A@RkHC h  H J A@']=================================checkTerm ִѧУ--================================== checkTermKT checkTerm  $ H е дȷ''(УʱдϢ A@RkB h checkTerm  $ H J A@'r=================================checkAtLeastOneNNull ִһΪǿ--==================================checkAtLeastOneNNullKT  'A"ִ һǿУ ĵԪĿ $ =Ϲ   ' J KTF   ' KTF   ' KTF   ' KTF   'n @dϹ  'F6ִ һǿУ ĵԪΪϹĿ    'k?'n?i?_--------------------------------------------ʽ-------------------------------------]VBSCRIPT.REGEXP$.7RegExΪʽ (4 ȫֿvba\ת  (.ʽ ( 5ǷִСд  % '3 ִ.i>-----------------------------------------------------------° Уظ˵Ѿûиʽ------------------------------------------------------------V-----------------------------------------------------------1ѧ׶ڱڲ(sheetѧ׶ A65535 $V%%!'*cna = getTotalColumnCount(sheetIndexValue) X$V!PB@1&ÿУظʱʱѴϢsheet,'ZϢ¼ʼX==============================ѧ׶ڱڲ==================================0ðÿԪغ֮ǰнбȽ      $V%P'      $V%P'"  ".ѧͬ˵ظݶ  еݺ͵ ֤ظ!!!!' A@R*ѴϢ'$kh:`:X:iP:-----------------------------------------------------------һ ֵȡֵ------------------------------------------------------------ֵҵֵڵлkeyWord ҵĹؼ'kbn л ֵΪ rowrow'&]the find result object (0 42 86 A1:A65535 h$>%%.., , *row ,!'&dx8 ,!:'&k`8kX8iP8------------------------------------------------------ ִڹУ(Ϊ)-------------------------------------------------------------value value1 cellУ鲻ȷfalseУȷtrue >0˵ΪDZ <$@'z6k6k6]h'Dijһļ¼ A65535 H$V%%!'FB' H row$&'B=ȡ  B F  H$V%P  D 'Dd5y5k5   B B D   H$V%PX <X LжϹǷcell'y`5kX5 #ʱcountĿΪùеĿi5------------------------------------------------------ ִɾijһвexcelܱģ-------------------------------------------------------------sheetIndex rowNum к1qazN h$>B@L F h$>%PB@R/ Ѹɾ- Worksheets(sheetIndex).Protect Password:=123i3j--------------------------------------------------------------------------Уʽ˵--------------------1qazN h$>B@L  H  h$>%P(i2------------------------------------------------------ ִɾijһвexcelûб-------------------------------------------------------------sheetIndex rowNum к F h$>%PB@R/ Ѹɾi1------------------------------------------------------ ָcellֵ-------------------------------------------------------------@ 1qazN h$>B@L  H  h$>%P(i0------------------------------------------------------ ݴеֵǰʱѾͨУ飩------------------------------------------------------------- ]   H  h$V%P!X 'L'Dijһļ¼ A65535 H$V%%!'FF H row$&'BAȡ  B F  H$V%P  D 'Dd /y/k/   B B D   H$V%P!X '< < LX 1жϹǷcell  H$V%P!'Z ZX H  \ h$V%P(y8.d0. H  \ h$V%P(k. i------------------------------------------------------- ȥcellеĿո------------------------------------------------------------- ] Ԫ]  3Blength1ʾcellԭijȣlength2ʾִȥոַ'ĬΪûȥո2 Worksheets(sheetIndex).Unprotect Password:="1qaz" H  h$>%P!'< <'^ ^Gzj*"ԪΪգȥո < '`%length2Ϊոһγֵλ `ַո < $b'< <X H  h$>%P('k`+iX+------------------------------------------------------ ȥַ------------------------------------------------------------- ]P -[\uFF00-\uFF06][\uFF09-\uFFFF]|[\s,;'<> "?^]+'  $'dd`*'dkP*iH*@*|Attribute VB_Name = "ߺ"  '-%УдϢʾ &( Function checkedRequiredStart(rowIndex, c olumn )  { 'Ԫ@Dim cellValue As rSng= A;veShePet.Cs6If-" Then*F_Fal4seETrund If < E)[д־ ooһkqmwriteLog(content]iX`s(msgB)[curMsgRow, 1)JCK + 1?D DúɫCE ERedVFnLen7@LZ.Characters(1, ).F7.Colorl=31*SS  ʼG` errafoaddCHommQXQ#s|", ,  0t'Work s().Unprotect Password:="1qazOey.A N( ..Itrior#=<65535 '1૱>%  d/.VisiblĠ_?ɾElearsCk΅"BB ?+0+ 5`&[!*2Recp)Nu8m A:HtffTotal`?um u\4&UE15l lqXOO .ExlNondu(u?%- ȡָȨAֵ?*getBBCountXQXHLKQs.v}w^ Y^ Ƿ2Gu=õpob eginCQ_c^zMetho~d_r _ `NotÜR1 'iʧ ,%+H Is hing!$жOΪܿ/Tn 'j| _AOA9ȥqס$ cWt_ Z '_ aw/ !uA<' "Box "" &V& "B{'tt$ɹf!0гQѕ&ʱߑ rԇq+remo0рpaceFla(!/Q,ʾ:%)j@УַChr(34)KVCt& w"а ϵͳԶΪa%< A ]!q?Lb- '`%0ݱʶöӦķ(ʼУ)",%+'BѴϢдб Functio@n callXQStart(typeVal, sheetIndex, row@columnisidateCount) value = Work$s(').Cells.(*"' isFor,True titlPeMsgs;T  , 5) ' ȡKͷ@GIf "" Then 'Ϊϲıͷ Da/% - 1 &GE8lse"P@:headBe#!eEnd IfBfArgs!"0"J Like "chec kLen*MȁG MidG9& dX%'c(Num, bernm {&N&k310?'ckL'ֵ:aF&& IntAM?9eM- '7M Term1`"ǡ"Ϊ`"1 _ YesNo  2 ? DiffNameѼA?%I ?} xBCod / !O ff kSQLY%/ / \- R %^IDCar dTP`֤ a o(Sqyy&ԭ&"G_ _ ] e? ? kYearZ~/Vf _ _ _ R:ar  kXXSHZT6 ѧУɀ״̬  :6= ̈Select CaseU4'=(1 ִAǿQ ??3 N8ull URMethodXQ`Required2} No r~~~O  d| |$||?+}?z }Numberͣ =}}f } }}F B_FX|U3}}]j}{{@> oQϵϵaw!zĵ{`{{A>0λSg?С_@5 VsQR___ ooooϦyT}rUAOL OVOVOVOV  dOVOVOVOVOVQOVOVA# Case "checkNLepn" 0MethodXQ = f(value, functionArgs)If Not|NThen2 aArrSplit( , ","~K '(0)(0 E 'ΪDZΪW5errorMsg."" & rowIndex"е@ title& "дȷEΪգ Ϊڵ0λTL- x1) ΀С  2 X=Else}Y1YYYȻ܃YҿWWM:End IfahasEATrue '̀УʱH\дϢ writeLog -W@beginC!_comment sheet"c, ,FfolumnäisFoAa '=ִֵΧġ$ E)дaбk$HValh D o*lwF C 1p@a=B?g?gc#f' is >idateCou c=.x+ 1o nckEy?7?763!6Ϊjֵ66`L66Int65 7@7x777`5X>&>"?r(Ì?Oe@(/,s򢏌> 6ϣsT WW dSS[_T P cT֤oRSfzjhRe rresZjlx?getCell`ku3kXQ(5,, 8'ȡ*ݟ)LG""r?4?4?4=4E"._,_,_,_,_,KO # If resZjlx = "֤" Then checkMethodXQIsIDNumber(value, columnIndex) 'У Not  d 'RP0Ter@rorMsgz" & rowQ"еʀ title& "дȷΪmһλSΪX첄"VhasEXVTrue 'xʱ0дϢ#(writ`eLog A isValidateCount#M+ 1End Else_M@SFZJLX)֘IΪգ ҳڀ1λ18@?H!$e>{/?  @beginCa_ comme]sheetB`,f,k isFoBrz '= ִ㌼X́=Case "BetDMB((, d"1"4mk߇>$ ۙset +Cod2, INjLXY_[|-/_c?bO-*B-ѧŵ---XJH-F #-@Len%"1, 50_-6O.߇߇C݇?c?c50?c 1O2o--.j4..O.*[|paBдб//Bank/O/@/<?\ߠ.\om"???;֣-qfunctionArgsArpr(0)12?r(13 000 b/.j'/0//}//?t///+!//]..HYear...E^#ϋ///^/^/^/^ʽ20122002>ύ++óд Ϣ writeLog errorMsg@End If>beginCheck_comment sheetIndex, cMethodXQ , rowolumn ~isFor = Tru e '=ִѧУ,хдбwCase "iXn"uY(value)If Not Then4"" &"е@t0itle@xдȷʽ2012-3ȣ8-phasEA h '^ʱ =F'FdZMonthUWaUU6UUU0112UeUߦc ߦeUδߪckߪߪ3 ځV(DZ)+߬%ȬDate" 'VBirthday?Y5Y 'ʧk Chr(34)x-xx@M  a-01q0[oL0o)[?0o0o_ 0,00v_0\0NecessarVyO1& =N|ow1/XQ"11 1g111o1B3122@1ֻͳʱǰ2 222 22t00000/0O,0R111 1e^0b Cbb00p0>б.00& xcas0a~ ....?[Ov0000000,10 !绰xH-Phone?]Num\  If Not checkMethodXQ T`hen $errorMsg = "" & rowIndex"еʀ6 titleZ& "д ȷʽΪ%Chr(34)@-̶ @ ' "hasETrue 'УʱϢ writeLo,g y' End If beginC_comment sheet, , `olumnFisForw '=|Option Fע  2Case "o_Bƒ=6(value, 66)GȲܳ200#KaL ִ϶3MS==CNDiffName4O0DMB(V, !dQfunc`ArgsR?Sjtr {ߜQ? ElsevBset,Cod(-ɜet AٟrX]ѧУ״̬]k]XXSHZT\\d\3O.O.Xπq~ɀO.lO.||LO.O O.yN.v/.ex/./.'/.ev/.I1,ϋ/.+-".֤/.\6IDCardTyp\s \?pg..\3 F00t0000000* 00!00*_0_0_0G_0_0_07_0_0O,14P)GeP6rqǷΪСŮ2--o`t3o`P KðR 11"1"///GU)IdNumsԱC744444 444*4go 6q6F555 G beginCheck_comment sheetIndex, cdMethodXQ, rowA`olumnerrorMsg  isFor = TrueBd'=14>zYesNo ִǷΪǡР--R= @Case "1" 8aDMB( , value, functionArgs)(If Not ThenB?"" &"е titleŁ дȷ shasEqj 'WʱдϢ*wri@teLog [ElsBsetрXCodKh, R&End If; <%SQLYɵľ! _XQB_Sqly(^a\kg\ca@ 1a'-b bظ¼b [Uss Xww wcwBwBLwx '!Z'u?yv15 #Sqy`yName'ٱע˵wڇ!BZSMֹ@resultdgetCellVaCountXQ(gT8) 'xȡAcv sPLen(#@SPm" Ai0 ?o snpMid(L, i, 1_ "h"Ea (Next iO QNE? ja1p"1,00YmAuZ_MVA20IgA2o&S%sh)).1+s()9)q3h !]ȷ,ַΪ100λfYO\OOlO\o )qQ3ϒU(I{A˒/V}d 0Z ' Ϲ a atotal @|+CgSelect tݛ%"baojiaoC:?cSum- huoshi H   zhusu G  others H  ?Oc*?% '23 =pG>6>>>ΪA@OKE%+ F+ " Jb`XoFt-Fo-  reg(}DimaEX As ObjISet= Create("VBSCRIPT.REGEXP")a'RegExઽG EX.GlobalpFn'ȫֿ''vba\תPatte\rn RʽIgnoreB8= Fa`ǷִСx3T8estgGB.hing #$O ° 4ظ˵ѾPûptA 1ѧ׶ڱ -B}pSameXQNew2) 'Sw(naS2).Range("A65535").P(xlUpIow'cgxetT1wM(Vah6msgNP 4.Clea rConts 'ÿ ѕB ,cuRowP 1 'ʼ/ocJ'ðÿԪغ֮ǰнбȽ  For i = startTitle + 2 To rnaL\cardID1`Sheets(s Index2).Cells(i, &ColuXmn)Etjtip - 10~S2zj=$IfPc+Then 'ѧͬظ`L)errorMsgN"" & jA"е  i ֤Ł+@!"0writeLog 4'ѴϢDhas7Same@'True End IfpNextGC Function  '-7һ ֵȡֵ-% ҵ@лЀkeyWord Ĺؼցbn Ϊ row @ GetR0owOrB(B yVal , CD@As String) Integer[ @o-Dim c Object 'the fi8result FoG7Set= kbw).Range("A1:A65535").F (What:=FLook@In:=xl`uPes, !A@xlWhole}mDNoIs h] lgqk !=t "*"!c..K Els[r'I`Eb]?U- ִڹ(Ϊ)8V@value 1 c `'Aȷpfa%et[checkDHMB( , 1, flag<@<`S"0c7 'ΪDZ K,Trim# 1)U>`Exit 798GHfLDatCount 0 '@ijһa(ļ¼c 1Num`DArJ# U}|owP A `|X|2O9 s+Y{_8oMI1e i _p C@T( 3)&,)r 'жaq2Ƿ́q3a 5)^j'ʱc(ĿΪ1;Q ._w/BcHɾ.вexܱģoG1 14кňsdeleteP\h, Ej2@UnprotaoPassw`|:="1qaz$obs(.D p!'r).P123__-ZʽT- 0 set XQ"pol/A)//sp).Nr?ou--û1--o--n -No"Oo-dow)>)/@  ָlֵ>?,etl((U?S2̴1ր̣`ʱ0Ѿͨ~>)?Oon setDMBCode(value, sheetIndex, row$col!$) DimBData, cVcellV& = CStr(Ss(mH).C7s(s.zCountI0 'ijһļ`¼uJN um'lArea pRange("A65535").End(xlUp).Row 'p 'u'GDetOrC(,, X, "@") 'ȡQRFor i).To[cIf bi0, 1)#< Txhen!+ 1Else `Exit ) nd IfNext iA5jN58t+ -(/1 mC'E$ex""GlGj F@unctioW'-0 ȥ#9Ŀո 8  removeSpace=6 B1=pecialCharacter!9regp"[\uFF00R-b6]9FF]|[\s,;'""?^]+s/`CheckAE(#i8 IZ[ ",XVZ@ @ @ @0 @H @` @x @ @ @ t @p @` @P @@ 6X*2@0 @~ @ P"@ `x"@P '@`h'.0R@ @ @ @x P>@ x>xdJ@ @  @ (G@ht G@ d @pT @D hO@4 O@$ @ U@ U@ @P @  @P ce@ i@ iw@( @~@` P(~x(@ `@ p  @` @8P @( @ @ @ 0 P ( ` ( x@h @  @ $ )[$*\Rffff*0<5f1b12be*\R1*#400*\R1*#13e*\R1*#132*\R0*#17$*\Rffff*0L5f1b12f9*\R1*#12d*\R1*#43$*\Rffff*0M5f1b12f9*\R1*#13a*\R1*#29d$*\Rffff*0N5f1b12f9*\R0*#2*\R1*#12*\R0*#f*\R0*#1 h"hp:x.6" "H.p )  :+ ;8@;H;h;>;" : "P, `$ >;,] ( ~@$UP1 8Xx >L    "C   "@ h   Wp ;  (.=0  `,+x; **R @X%0 p%D % % %0 % ( %,H %&x   #6M $J $"@ (,3h (P3 (` (,L,H 4JI <( <?  D6H D0&X HB< HE " G H ( M4D0 NKh N& N8[N P ,`I D @,  ,0 48H40&8 <08EP "pGH M4DNKN&pN8[N  ,I 4 0 )"(<(P <<0 xH6HH0&PB<PEX "xGH M4DNKN&xN8[N  ,I H <(("0,8HX,0&0 <0E "G(H 8M4D@NKxN&N8[(N ` ,pI , ($$M  < "0(L7H(&( ( )$  >,X,h (x,&40M, ,,  0(8` p*+$,  `7X `4+h=1 4  $ +H=`P1x4+=1 0 8 ;@ ;` ; x" (82H$@6 *0 :`   ,(08 Ha--------------------------------------------ʼУ-----------------------------------------]@]X+ijһ͵ıʶкź͸ʽ3:1;2]p ʶ(ĬϱʶԶʶ)](ijһ͵ıʶ飨кź͸ʽ] ijһͱʶľֵ]Զʶ]%Ѽ¼ΪյкŷŽ] >!D'"ȡĿ 0ĿȷģٽдУA@,1qazN$>B@|k1qazN$>B@L1qazN$>B@L1qazN$>B@L X$V!PB@-$ÿοʼʱѴϢsheet,'ZϢ¼ʼ'.ôУУ¼Ƿд֣׶ϢУ ('#Ĭ϶ѼδͨУ'Ĭ϶δͨУ X$V!PB@-$ÿοʼʱѴϢsheet, A65530$>%%!' ȡxcna = Worksheets(1).Range("1:1").Find(What:="*", After:=[a1], SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Column IV5 6%%!:'FAILUREA@X&+ȡǷУɹ־Ԫ񣬲ֵʼΪ0'~ռ¼ʼΪ0 * 2" ʱִd ʼУ鰴ť¼ʱִ A9:IV65536$>%!b5ͺ9 9q A9:IV65536$>% 9,@9'ıʽq.ȷʼ Уرexcel $.ܵݶʧʧ 0ܰʾ$, 2d1qazN$>B@|kk.$>!b(d)ҳǩΪɫ   "ûвҵѧϢ޷У飡A@,'*1qazN$>B@|(k 'ôУУ¼Ƿд$>!дϢ£A@R     '<"ִ һǿУ ĵԪĿ';6ִ һǿУ ĵԪΪϹĿ'''5"һǿУʱ¼Ԫ'9ǷΪЧ¼ 'xC¼УǰǷд';¼ԱǷд   $>%P!'Oһбʶֵ'2=жforѭǷcallFunctionXQStart ûִĬϷ <ʶΪ -$'Gʽ14-3:25 :$' H6ʽ3:25ȡıʶвֳ֣кź͹ DJҪּϵҪУ飨ĬУ͵ԶУ   Y&+1ΪеһԪΪĬУ $:$'V*ȡıʶвֳ֣кź͹$'SԶʶ  $;$'cԶʶ͵ľֵ   gԱʶб $   A@}ݱʶֵöӦķ  $>%P'Hȥַķ $d'    $>%P'{ȡбͷ   е Fַ^ , ; ' <> " ? ո س뷨Ϊȫͣ飡''^УʱдϢ  $>%P!n(p ӻɫ A@RN%isValidateCount = isValidateCount + 1kh`kX  $;$'Pȡıʶв   WԱʶб $   A@  $>%P'Hȥַķ $d'    $>%P'{ȡбͷ   е Fַ^ , ; ' <> " ? ո س뷨Ϊȫͣ飡''^УʱдϢ  $>%P!n(p ӻɫ A@RN%isValidateCount = isValidateCount + 1kk eJ ʽ3:25$ 'QԶʶ  Pʶеڵǰ$ ;$'eԶʶ͵ľֵ   kԱʶб $   A@ݱʶֵöӦķ  $>%P'Hȥַķ $d'    $>%P'{ȡбͷ   е Fַ^ , ; ' <> " ? ո س뷨Ϊȫͣ飡''^УʱдϢ  $>%P!n(p ӻɫ A@RN%isValidateCount = isValidateCount + 1k k d-ֻĬУʽ14$;$'Hȡıʶв   OԱʶб $   A@  $>%P'Hȥַķ $d'    $>%P'{ȡбͷ   е Fַ^ , ; ' <> " ? ո س뷨Ϊȫͣ飡''^УʱдϢ  $>%P!n(p ӻɫ A@RN%isValidateCount = isValidateCount + 1kX P kH k@  $>%P(  6ִ һǿУ ĵԪΪϹĿ     е һдȷ''8УʱдϢ A@R  'd   'Tÿһкϼеֵk  <,һؼֶȫ򽫸ɾ  ~+ ~ '~,"ϢеĸдϢɾ  Z  Z Z  X$V%PB@Rr Ѹɾ  Z  'Z x'k k  ~ 6 ɾЧ $'  A@JB ѸɾdX   A@JH Ѹɾk(  ~ ˴Уɾ ~:Чݣ֤У鶼ʧܼΪЧݣA@,k *дϢ鿴ϢA@,$>!b(d X$VB@Hd0'$A@ $'%ִУظݷ,ûظǷҪɾЧ Уͨ!A@,.$>!b(dSUCCESSA@X:+ȡǷУɹ־Ԫ񣬲ֵʼΪ0d0*ظݣ鿴ϢA@,$>!b(d X$VB@Hkk1qazN$>B@1qazN$>B@1qazN$>B@oXq-------------------------------------------------ظijһ------------------------------------------------ ]`x] A65535 N%%!'2Scripting.Dictionary$.O8O  N%!' >ȡѧ " %"ѧ໤֤ݽб " " %$-֤Ų " B@&&#addһΪkeyڶΪvaluekXkPH !('Sheet2$>G:G7B@  !,%. !DG17,*q.oAttribute VB_Name = "" '-( У&l Sub :򲢴ӡϢ() Dim rowDataNum%typeValue 'ijһıʶкʽ3:1;2?bsT '(Ĭ0CvalEntity8?: 7,@ֵhR0ow '>_isNullArr(500) As Integer 'Ѽ¼ յā0ÁP sheetCountWorks. 'ʈĿ If H <> 3 Thenm MsgBox "GȷԀٽдˁ@"(1).Protect Password:="1qaz DExit #End IfKUnpH 2).h 3_ Sas(m sgB).Cell]learCotnts 'ؼʱɂ` ,C7cur]= 1 'G A hasError=Fals`hôB/У Ƿ!֣׶r hApplication.ScreenUdpdng sysDifficultyGradeFla0b o϶Ѽδͨ!!cindeofy eOM?,?,-, rnaHRange("A65530").N(xlUp)..@1h/DcW 1:1F(What ]*", After:=[a1], S`DchOrBdAxlBy` s1Dir e2:=xlPreviousKolumtb$1.$IV5ToLeftks T®XQ 2,A8, "FAILURE"aG!7ɹԪֵʼΪ0 ƙ +AP `x isSaveButtonvbOK ฀ʱִEEZ^`Ӱťp¼)ith s:9:IV:61@r ׀ͺ' .["B嬓.Siz161gW  .Horiz@alAlignmgxl:k berForma@tLocal! @"ıu 3Y1ca("ȷQAM ̑Hرexcel" & Chr(1@o& "@ʧ3!Can0*ܰʾ") # 1# r!_h_h[h=3 hKTaBbwlorI`OxA -4142}ǩ'Ϊɫ PIstartTitle >+``|yt`3 "ûв@ѧA^`޷1ya> 6 i2 Toqg :eaOnefNa#= `UQ һǿձ YO`_΀?totalMoneyw&e!P. "? "miijspsieHr@Ч15/InE ' ǰQC0??9dsydԱQ}-j 1,g=9(1, j).һ֞յ_is = $жforѭ! olFuncXQSV S5Zw <> p&QZ ' 1/#= S0t(+o-o'S14-3:25 $rowType = Split(t0Value, ":") 'ʽ3ȡıʶв кź͹'If UBound(bs) <> 0 Then 'ҪּϵУ飨Ĭ x͵Զr 'HFPor mLa+ 1 Tol'+1ΪеԪa@valE`ntityrT(|m)roRow"%(0e3;{@i)E,'@>kGA1b;BľֵRnR)Q'gx? callFunctionXQStart `(n`1, Pi, jsidateCt#ֵöӦķ #uWorksheets(1).Cells()_ _ #'!ȥַ? (removeSpecial@>Character(_$f+g ,`leMsg5sKTitl@jAбͷ9A)error"" & i`("AjA F& "څ@^ , ; '"" ? ո س뷨Ϊa뀼飡"_ hasE `Tr1'!sʱxϢoT8.InP+ior.Colv= 65535 'ɫwriteLog uO'iLO= p_End If /Next5 _ m ss= False2ooV4T0_S~~~ }}} RkBzzz;s= zzozʕzȡzzzzzzzzz zzд Ϣ JWorksheets(1).Cells(i, j).Interior.Color = 65535 'ӻɫMwriteLog er@rorMsgM`'isValidateCountk+ 1:End If 3)Next&Els@eIf UBDd(rowType) <> 0 Then '3:252#tRow^(0) 'ԶԸ{@Ci(C+A(еڵǎ;jval`Splitcs, ";"N%ľֵ) yjF}nLA) ToC' б+callFunctionXQStart `(n), 1, Ay'$4öӦķx+u>e %v__#' !ȥ? (removeSpeciBPCharac`()#m+m (title5sLTaa 'ȡбͷ)%"" &D i`"AjAA& & "E ^ , ; '!["" ? س뷀ΪȫU"_ _ 0hasE{P Tr1'УʱS_8_ ߍ 'ֻĬBq)Í140pPp.9szbs1ez!1Dħr//xxxvv% ?bc::// rrKk= rr rrrOrrrsgtrrrr_ ?rr2@Ϣ JWorksheets(1).Cells(i, j).Interior.Color = 65535 'ӻ MwriteLog errorMsgM`'isValidateCount#k+ 1:En@d If +)Next! ׆@LockedOF0alse_*3 j 'ִ һǿУ ĵԪΪϹĿIf atLeaOneNull~<> 0 Ah = ThenEa@I"" & i"Ё,MEA?Ё?дȷ`"has = True ')ʱд_?% sKn+ 5EMtotalMoneySLum1+  'ÿһкϼ@4ֵicO> 1 II '!2ؼֶȫɾ&_isAWRo wArr(Num) !i r E ) `'yeO-%Vi FpcFua  - -.To  fSCmsg"Name$).s(x). Deletpܸ_9/p" =OhEInu3 )?; rq 0 i/@!1 '%Ч  rowData,/4q)@?T_cd"A,1,)'#oROs- q qURtK!zw ; Box "˴AnRRwJ& xݣ֤ʧܼҴ:Ϊwvnp 2 y鿴"EQ`+TabӻIndex016MMS(c%0SP0/#checkdXQNew Not 3(0n ظ,asûD0,Ƿrf`ͨ! -4142csetTu@eXQ 2,!8, "SUCCESS" '! ɹ־ֵʼ໯Ϊ0 g(o(o(o(o(o(^7Protect Password:="1qaz2).3 Sub 8 '-!/cijһ-, Sub checkTheSame() Dim myDic As Ob ject, Key VariantPH, va rData 'rna = ActiveSheet.Range("A65535").End(xlUp).Row ' b Set idNum= Create("Scripting.tionary"=b I@O8", "O" & R).value 'ȡӀF݃GFor Each carK In#O4'ԁ ֤ @б$  If"<> "4" nNo~.Exists (<) 'ԆGA.AddE, Null 'addһΐkey?Ch,INexƒ Cmyj=.sWith WorksAsp2GmG:G@ClearContent41@Resize(B.Count)Appl(ica.FFunon.Transpos 'D4'*= a2h@ @ tlb#OLE Automation`EOffDicEOficEE2DF8D04C-5BFA-101B-BDE5EAAC42Egram FilesLApps\Microsoft.<.Desktop_16051.11727.20244.0_x86__8wekyb3d8bbwe\VFS\..CommonX86, Shared\OFFICE1 SO.DLL#=  16 .0 Obw Library;@MSFo@rms>SFirm`s3BiD452EE1-E08FAFA-8-02608C4D0BB4FdF~temACFM20 =3 ec ec eo (k G;Xf6"a2fo F o &У!heeo hjo ~k !LGbQ;N z^b2o ;9o BU2ShowaxG`6\owf3e2ro1]n'(P^65]/5Y/5]/5_/B_6h[/ APrint#rinɅgj2oi0ʘ < @&xRRME (@h06 <hhhJ0genehjGLn `Hr@ʘHBʀp @ʀ4 @ꀈD @vL @%Ϣ˵%ꀢV  @Z  @x8\  @z`BXB~@ꀊ` @Zt@x@ꀔ| @HHB ꀂ(~ !@ꘄPB#f%lBXHpHppHʀ @$ @t8Hh @ꀜP @*T @$X  @ꀞ^ @|0B‒@ʀd @ꀀz@ʘ B\phB"ꘆB$X (p`p PH8pH0H8%P:x)[*\R1*#29d$*\Rffff*0L5f1b12f9(*\Rffff*0L5f1b12f9\066    08  @ ` Dp 8 0 P0pD084P. ..(8(`>"$$(@h>R^ F `*X$    0to^gene^0p@һṹҳu]$Ha=Public Const sheetNameValueTJ As String = "2ʵͳ"]$Ϣ2Public Const IntroSheetName As String = "˵"]$H]$˵ ] p ¼ܵУ]$¼ͷ] H"ִ һǿУ ĵԪĿ] 6ִ һǿУ ĵԪΪϹĿ] pÿһкϼеֵ] "һǿУʱ¼Ԫ] Ϣ] %---ģУ¼ĸԪ] 8---ģУ¼ĵԪ]  Уʱ洢ַ] ¼ʱرհť]  ¼ܵУǷвϹ]  ¼ܵУǷظ] #¼ܵУǷظ] %/¼ЧǰǷдϢ ״̬] 8#У鷽ķֵ]$)¼ʼк]$`)ѧѧſʼλ]$0)ѧ֤ſʼλ]DX¼ΪյĿ]"/ǷΪЧ ͳ 5ֶΪյĸ] "C¼ȥոִнȥ˿ո򷵻true򷵻false] PcellԭʼĵݣϵͳûнԶûĴ֮ǰcell] 7ϴдϢʱڵ,ӦĿʼʱʼֵһ] ] ] RڸݱʶòͬķʱжǷforѭ Cell_SelectionChangeҪõñ]$¼ʡصȼ¼ڵ]$ +sheet±Ƿ] H]$h()е]$p) Ա]$P+յAttribute VB_Name = "" Public TypalueCo8lum8p 'c@nIndex As I@ntegerTø P'SngEndn _ 'һṹ0ҳ"Const sheet{V1 p1 '/ATJD2`ͳƀ m8sgS8 bϢ8 ro ˵ 3Area3Kdme0totalCountJu¼ܵУ  $startTitl7 ' ͷ atLeaOneNNulD 'ִ tǿA ĵԪĿ\Ϲ`J;Money;Varia>'ÿһкϼֵK Err or@ -ʱ/A>A{C/ e Ms>gAD rgoldRang@e '---AԀģЄ ĸFTargen Vqfuncti@onArgsh'0">@ַfisSaveButton}CAʱرťhas(}Boolean{'L0Щ7 TheSa@_ĮIdN\um]n idaै_Чǰ>\״̬checkMethodXQAA1A0ķRaRowSq0= `r+пʼx!xbabyID"J8= 2 'ѧɀѧ0λæccard3 ֤)Dim isA1(Ϊev%.AFΠЧ! a 5ֶc fremoveSpaceFlatEBȥո@πa$ˡ2tr@uefalse ceࡌ2!2a@|ûнԶûwG֮AKsc ur`@*)Long 'ϴxдO!a@,ӦĿʼʱsֵһ&rna%'`g`cQbisF0SI2ڸݱʶòͬP-CE жϱ?forѭ C_Sele bJChQҪõwb)headdI= 0(/ʀصȱ& Susv9r0v±0 nottinu~eQ$Aq0NӑP luBW:104 @'gHwge rC:Ա w birthd$ay= @ڵ  FMicrosoft Excel 2003 Biff8Excel.Sheet.89q_VBA_PROJECT_CUR"ShowForm CompObj aVBFrame o f&PrintForm CompObj aVBFrameof&PROJECTwmPROJECTVBA__SRP_7#,B__SRP_8.__SRP_9F__SRP_aZ__SRP_b_B__SRP_ca__SRP_dfB__SRP_ehT__SRP_fjgShowForml__SRP_10l__SRP_11y__SRP_12__SRP_13 PrintForm!ThisWorkbook" _VBA_PROJECTg&__SRP_6$__SRP_5%__SRP_4&J__SRP_3'__SRP_2(~6__SRP_1) f__SRP_0*Sheet6+~Sheet5,'~Sheet1-9~!hQpe .SbpSȉ /Kv]wQQpe 0;N z^1NQdir2]XfyCompObjpi