ࡱ; GRoot Entry3 FPQvqH@hWorkbook5WSummaryInformation(DocumentSummaryInformation8,B  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFXIJKLMNOPQRSTUVWYZ[q]^_`abcdefghijklmnoprsuvwxyz{|}~ ZO\pNg9N Ba= ThisWorkbook=$ L8X@"1[SO1[SO1[SO1[SO1[SO1[SO1[SO1Arial1[SO1h>[SO1,>[SO1>[SO1@[SO1[SO1[SO1[SO1[SO1Arial1Q[SO1[SO1[SO1[SO1[SO1@[SO1 [SO1[SO1 [SO1[SO1[SO1[SO1 [SO10[SO1[SO1[SO1 [SO1[SO1@[SO1 [SO1 [SO1@[SO1[SO1 [SO1[SO1[SO1[SO1@[SO1 [SO1[SO1[SO1 [SO1[SO1 [SO1>[SO1[SO1 [SO1[SO1[SO14[SO1 [SO1[SO1 [SO14[SO1<[SO1?[SO1>[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_                 3 3 3 3 3 3 3 3 3 3 3 3 4 4 4 4 4 4      P 5P      6 3    7 8 9a   :  ;ff < = >`   ? @ A  B 4 4 4 4 4 4    @ @  @ @  ""@ @ @ @ @ @ @ @ !@ @ ""@ @   1 1  1 1@ @ 1 1 1|7  1|7 1 1 1 1 @ @ @ @ 0@   1 1 1 1@ @ 1@ @  $1@ @ 1 1|@  1 1 %1|@ @ 7 1<@ @ &1@  1 1 1 (1|7 )1@ @ 1 1  @  1 1 -1 .1|7 C1<@ @  1 1   01<@ @ 1 11@ @ 1 ||Ackk}-} 00_)}-} 00_)}-} 00_)}-} 00_)}-} 00_)}-} 00_)}A} 00_)ef[$ -}A} 00_)ef [$ -}-} 00_)}A} 00_)L[$ -}-} 00_)}-} 00_)}A} 00_)L[$ -}-} 00_)}-} 00_)}A} 00_)23[$ -}-} 00_)}-} 00_)}A}  00_)23[$ -}-}! 00_)}-}%?_)}A}( ?_)[$ -}-}) ?_)}(}-  ?_)}A}. a?_)[$ -}-}/ ?_)}}}2 }?_)[$ -##0.  }}3 ?_)[$ -???##0.??? ??? ???}-}4 ?_)}-}5 ?_)}A}6 }?_)[$ -}A}9 e?_)[$ -}}}: ????_)???[$ -???##0. ??? ???}}; ??v?_)̙[$ -##0.  }(}<  ?_)}-}= ?_)}A}> ?_)[$ -}A}? ?_)[$ -}-}@ ?_)}A}A ?_)[$ -}A}B ?_) [$ -}x}C?_) [$##  }-}E ?_)}-}G ?_)}-}N ?_)}-}O ?_)}-}P ?_)}-}Q ?_)}-}U ?_)}-}X ?_)}-}Y ?_)}-}Z ?_)}-}^ ?_)}-}_ ?_)}-}a ?_)}-}b ?_)}-}d ?_)}-}h ?_)}-}i ?_)}-}m ?_)}-}n ?_)}-}r ?_)}-}s ?_)}-}t ?_)}-}u ?_)}(}y ?_)}-}z ?_)}-}{ ?_)}-}| ?_)}-}~ ?_) 20% - @wr 1; 20% - @wr 1 % 20% - @wr 2;" 20% - @wr 2 % 20% - @wr 3;& 20% - @wr 3 % 20% - @wr 4;* 20% - @wr 4 % 20% - @wr 5G. 20% - @wr 5 ef % 20% - @wr 6G2 20% - @wr 6  ef % 40% - @wr 1; 40% - @wr 1 % 40% - @wr 2G# 40% - @wr 2 L渷 % 40% - @wr 3;' 40% - @wr 3 % 40% - @wr 4;+ 40% - @wr 4 % 40% - @wr 5G/ 40% - @wr 5 L % 40% - @wr 6;3 40% - @wr 6 % 60% - @wr 1; 60% - @wr 1 % 60% - @wr 2G$ 60% - @wr 2 23ږ % 60% - @wr 3;( 60% - @wr 3 % 60% - @wr 4;, 60% - @wr 4 % 60% - @wr 5G0 60% - @wr 5 23 %! 60% - @wr 6;4 60% - @wr 6 %"~vRk #hh $h 1h 1 %h 21h 2%? &h 3h 3 'h 4h 4(]5]  %+8^ĉ %)8^ĉ 1218^ĉ 12 % *8^ĉ 2 +8^ĉ 4, 8^ĉ_hQVL?e:SRNx-(c  .}Y5}Y  a% /Gl;`+Gl;` %0'^1 '^[0] 2{c{ }% 3hgUSCQ@wr 2;!@wr 2 PM % ?@wr 3;%@wr 3 Y % @@wr 4/)@wr 4 % A@wr 5;-@wr 5 K % B@wr 6;1@wr 6  F % Clʑ^ lʑ  XTableStyleMedium9PivotStyleLight1683ffff̙̙3f3fff3f3f33333f33333\`&VWV[R_VYf[ёDRNR TUS3unNxh΁Oo`VV!  =dc:- KmՋ@b g!hĉRv^SbpSOo`ff`(KJ@VN| MOS AA@A@  %1 7 checkDiffNameV[V~+R Ty checkSqyyCode3ut1uxkuNOO checkSqyyName3ut1u Tyf[uY T 77usYel T^S/f Ty{|W checkYesNo checkGender'`+RsY'`+R7u^8^VN,V NVvQNeUSNd[?QpXP[sYQQgNOVuV~pmQNNsfzjh 7_OS >{V??3?q@pA[DEyFfGHW IP JX $L DMKN,PHQ SSGUhccBW Vl ZO  nj  dMbP?_*+%z&ffffff?'ffffff?(?)?MHP LaserJet Professional M11364 4XSDDMHP LaserJet Professional M1136  0Z(d34" d333333?333333?&<3cAU} U} h} U} U} U} U} U} U} u} U} u} U} u} U} e U} fu U} v U}  U 8P Pvt_ P Pt8QRTz| z@ e8 ox d7 r b6 r z z r r X Yv P P P P P P P P P ~} s s s P} s P} {`"@f sssss lQ g^^ ^R^^^^^^^^^^^^^^^^^ttt^t^t^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^uh sssss Q h9 P P Y Y Y Y Y  Y  Y  PT  PT  mT mT mT mT mT mT mT mT mT s s s mT s mT s [*i Q! Q Z2 at Z' Z&  Z)  Z( n  nU  nV nW nX nq Qr nY nZ Q[ n\ v s w n] v n^ v iZ<lP nZPo pQqZ sQ~ V j: WP p W1 WS W" W# Wp  W%  W$  W_  W`  Wa Wb Wc Wd We Wf Wg Wh Wi W x x Wj W Wk W S0 k; q q c3 S } } S  S4  S5  Sl  S  Sm Sn S Sm Sn S Sm Sn  k y y S k So kUUUUUUUUUUUUUUUUUUUUUUUUUUUUUuuuuuuuuu U U U U @.|(   vj NI‹X? r]4v6@ E@ķQ> <kXQf[uvY T<~~  <F…CC@],@ n9 $< _Yhg<~~ i <R…CC@F],5@kn9 $<_ Y h g<v6admin>@dinjn 7 Sheet1ggDh4hd:SW2 ZO 7Uzр  dMbP?_*+%8&ffffff?'ffffff?(?)?MFoxit Reader PDF Printer_ 4dXXA4" dXX333333?333333?&<3U} 8F} D} D} !D}  E} E}  E7 @  88,888, 8 8 8 8 ,,8888888888888888 8 M H H MN OsGGGG O \+K? ], \- E IK ]/ \.GKKG IK@ J I IK? J IKGKKL I K? J L I K@ K L I K@ K L I K@ K L GKKLGKKL I II I I II? I I II@ I I II@ I I II@ I I II@ I I II@ I I II@ I I II @ I I II"@ I I I I$@ I II I I II? I I II@ I I II@ I I II@ I I I I@ I I D, lP J<<< <<<<<<<<<<<<<<<<<<<<!8"8#8$8%8'8(8)8*8+8,8-8.8/8081828485868 !I!I@ !I !I "I"I@ "I "I #I#I @ #I #I $I$I"@ $I $I %I%I$@ %I %I 'I>'I? 'J? 'L@ (IA(I@ (JB (L@ )IA)I@ )KC )L@ *IA*I@ *KD *L@ +IA+I@ +KE +L@ ,IA,I@ ,KF ,L@ -IA-I@ -KG -L@ .IA.I @ .KH .L@ /I=/I"@ /KI /L@ 0IA 0IJ 0KK 0L@ 1IA 1IL 1KM 1L@ 2Iu 2IN 2KO 2L@ 4Iy4I? 4Kz 4Lw 5Iy5I@ 5K{ 5Lw 6Iy6I@ 6K| 6Lw,4|<<<<<<<<<<<<<<888<<PH  0(   >@? 7 Sheet5ggD ZO ,p  dMbP?_*+% &ffffff?'ffffff?(?)?" 333333?333333?&<3U,                                     GGGGGGGGG G G G G GGGGGGGGGGGGGGGGGGGDl   ! " # $ % & ' ( ) * +  G!G"G#G$G%G&G'G(G)G*G+Gh PH00(  >@   7 Sheet6ggD  !"#$%&'()*+,-./0123456789:;=?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdeghijklmnopqrstuvwxyz{|}~ Oh+'0@HTd | ١Microsoft Excel@&@  ՜.+,0HP X`hp x  ־ѧҵ Ϣdc  Χ 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ȉPrintFormPrintFormSheet5Sheet5Sheet6Sheet6rU@@@xP`8!CbrU@@@ P `OO@ `AP@1 `AP` `aOOOOXq ` aOOOh! `aOOOOOh `!aAOOOOOP `qOO@A `OX ` a` `a1OOOOXq ` aOOOPQ `aOOP `aOOXA ` a1OOO` `a1OOOO`q! `a1OOOOXA# ` a1OOObrU@@@xbrU@@@X` aOOO@`OP1`OO@`O@1 `OP `OOPA `11@`O@1`O@ `O@1 `OP `OO@A `O@ `O@1`O@`O@1!`OP"`aaOOPA%`aaOOP&`aaOOPA)`OOP*`OOPA-`OOP.`OO@A1`O@2`O@15`O@6`O@19`OX:` 1OOO@Q=`OP>`OOPAA `OOXB!` a1OOOblzJ zL#pEsK,\NFNdTH̝`xNdTH̝`EsK,\NMEPSLSS6"  T I^12m5:Abl:<.N5Il;^Zd b!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`Worksheet_Activate+`Worksheet_SelectionChange4`(TargetF`Range ` 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`(beginCheck_comment;D` checkMethodHd`(errorMsg'|`(removeSpaceFlag` (cellContent`(callFunctionXQStart `typeVal#`isValidateCount8`valueK`titleMsgh` (startTitlel` (headIndex` (functionArgs8M` (checkMethodXQ` (checkRequiredb`(hasErrorf`(isFord` (removeSpaceXQ` (checkStuNamec` (removeEnter`(checkLeng`functionArgsArr`Split)`(checkNumh` (checkNum1%`resultur`(getCellValueCountXQc`val`result1`a1k\` (checkStuName1`a2l\` (setDMBCoded`(checkValK`(checkInt`resZjlx0` (IsIDNumber-*` (checkSFZJLX*`(checkDMB` (checkBankUw` (checkYear6`(checkXn` (checkMonth` (checkBirthday`(checkNowNecessary`(checkBirthdayNecessary2`re^`su)_`(checkBirthdayNecessary3` (checkPhoneNum` (checkOption,` (hasErrorIdNum`mc9^`rs_`(atLeaOneNNullCount` (checkMoneyi` (totalMoney%`baojiaoMoneyColumns`baojiaoMoneySumk`huoshiMoneyColumn_`huoshiMoneySumr`zhusuMoneyColumn_` zhusuMoneySum>-`othersMoneyColumnߥ`othersMoneySumH`(atLeaOneNullCount` (atLeaError~` (regCheckFuncE`reg`regEX*` CreateObject`Patterni` IgnoreCase0`Test4`(checkTheSameXQNew` sheetIndex2n`(rnaO`xlUp`row` ClearContents{`i``babyID1` (babyIDColumn`ja`babyID2` (hasTheSame`(GetRowOrColIndexf`keyWordF`kbn1`cZ`Findn`WhatC`LookInP`xlValueso`LookAtO`xlWhole`Columni`(setCellValueCountXQ]`colIndex` Unprotect?`Password`value1`flag`Trim@`rowData1`Count0v`rowNummR`(AreasheetIndexH` (deleteRow`RowsU`Deletex`(deleteRowNoPro`(setCellValueXQ` codeValue` (columnPlus`length1S`length2T`Replacef` i`(!ValueColumType` columnNamew`(sheetIndexValue1` (AreaSheetName`(readmeSheetName` (totalCount-`(rgold`(hasErrorInValidateU` (dataRowStart` isNullRowNum8`(cna`(notContinueBoolt` (genderColumn~`(birthdayColumn0` У麯&`(checkBirthdayNecessary`aX`DateDiff`IDNumber4 `Wm`UCase5 `sj`Tk` IsNumeric$*`Right ` (checkSchCode` (checkFamType` (checkRXDate*`(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%`addr`vbBinaryCompare̝` Application*`WorksheetFunction&`Clean` ` rowDataNumn` typeValue`bsTypet` valEntity܏`typeRow` isNullRowArr/` sheetCountB`Protectf`ScreenUpdating! `sysDifficultyGradeNameFlag`indentifyDateFlag `xlToLeftWY`rowType`md`ne`Locked ` totalMoneySumZ`pg`qh` (checkTheSameg`myDico`myKey`varData`idNumDick` idNumDicData`cardNum\`Exists]`Addr`Keysq`Resize@4` Transpose` ShowForm`CancelButton_Click`Hide9z`ConformButton_Clickwf`Flasep` Sheet5` PrintForm`Workbookk` Worksheet` BeforeSave` _B_var_Chr\;`_Defaultj`!_B_var_sysDifficultyGradeNameFlag_`_B_var_indentifyDateFlagE`Activate|`SelectionChangen`_B_var_isNullRowNum;r`_B_var_i `_B_var_isValidateCount"`_B_var_j `_B_var_rowType`_B_var_m `_B_var_n`_B_var_totalMoneySumY`_B_var_p`_B_var_q` _B_var_value`_B_var_titleMsg` _B_var_Midp`_B_var_functionArgsArrOj` _B_var_result`_B_var_result1` _B_var_a1` _B_var_a2`_B_var_resZjlx` _B_var_re` _B_var_su` _B_var_mc` _B_var_rs`_B_var_baojiaoMoneyColumn<`_B_var_baojiaoMoneySum`_B_var_huoshiMoneyColumn`_B_var_huoshiMoneySum`_B_var_zhusuMoneyColumn`_B_var_zhusuMoneySum`_B_var_othersMoneyColumnk`_B_var_othersMoneySum{` _B_var_TrimmT`_B_var_sheet2RecordNum`_B_var_ffTotalNumColumn}#` _B_var_Count:` _B_var_rowNum` _B_var_value1J` _B_var_UCasea` _B_var_Right9`_B_var_maxIntLen`_B_var_maxDoubleLen`_B_var_intLength `_B_var_intValue\`_B_var_douValue` _B_var_addr%]`_B_var_a`_B_var_b`_B_var_babyID1n`_B_var_babyID2o` "$G 'yI =GIS="@ p0(P7q YX!HH  xME(SPSSS0{84ACDD4C-4777-4B60-A6E1-B6EDA5A4A42B}{22124A1F-0E6A-4F03-8B00-5DD584B722B9}x8 0%h8%8picexAttribute VB_Name = "PrintForm" " Bas0{84ACDD4C-4777-4B60-A6E1-B6EDA5A4A42B}{22124A1F-0E6A-4F03-8B00-5DD584B722B9} dGlobalSpaco False Cr@eatablPredeclaDIdTru BE`xpose0TemplateDerivCus tomizDLqnxME(rU@@@~x""^ (!aQg0!ijjfg1m(nQG!qqqa.!tvvvHi Hgg6KXgg ggg2lgggggxD  vgg"Kg"Kbgzgggg ggg2lggggg xD Higgg2ldg|gggg`D ggg pX(  hP(Xg pX(  h8(Xg2lg2lgL8P0zggggggggggg P,P8P X(hggL@`g(sAD2gpgpggLPgpgN@  (gpg Jgpgq`fgT IH HHgp>gzgrk@ k0Hg`fg g@Hqp I KHggpD 2HHiHiHiHiHi0HiHipgg g2ldg|gggg`D Hi Hi Hi Hi` Hi 0ggZIa (hgg"Kg6hPKggg gg"hqn?gK0hEHb H0vKhEb eh7Pl0gg g~gg^K0hEHb H0K0xgg ggg D h\ H0hPHi( Hi hggZIa (hgg"Kg6hPKggg gg g ng6b mngg gg$h8g$h g0OgggKg$b gZKhEb mgg gggtOP gnOP gKhEb eKp8PhEXPb P8e 7lX8gg ggg d>8h \ PpX8 HiHiHiHiHiHi HiTggZIa (hgg"Kg6hPKggg gg g \g6b m\g gg$h8g$h g0OgggKg$b gZKhEb mgg gggtOP gnOP gKhEb eKp8PhEXPb P8e 7lX8~gg ggg d>8h 0\ PpX8 Hi hggD ZgT OVgtfq`Z8`@`qh`gD  @Zgg(hD 2`h a&o "a $h "a  "a  $h  "a  "a "a  "a  "a  $h  "a  "a "a  "a !"a $$h %$h ($h )$h ,$h -$h 0$h 1"a 4"a 5"a 8"a 9"a <&o ="a @$h  A$h !D&oVSPSSS0{C70EE5B8-1F15-4B8C-AC13-5360207C90EE}{F0527B29-37D8-44E6-8FC4-4D920A140577}8 >X B %%XX ice " 0 8"HP Xh xȡ' B@@oHȷ2X D' B@@oQAttribute VB_Name = "ShowForm"  Bas|0{C70EE5B8-1F15-4B8C-AC13-5360207C9<}{F0527B29-37D8-44E6-8FC4-4D920A140577} dGlobalSpacoFalse CreatablPredeclaIdTru BExpo se0TemplateDerivCustomizD'ȡ P Sub CancelButton_Click() notContinueBoolT Me.HDidZEnd! 'ȷq ,onfՏ,-Fl;/rU@@@8@.Q!/`ADrU@@@8.Q.`ADrU@@@xbrU@@@ x8 `8H! `@brU@@@$brU@@8rU@@@~x  qa.!!1(0 ! A# BA)(.>A AEAAq! A-*A q 1!A1Q=1  1"15(Q/Pq/12A2223A333/4a445a556q6617778Q888t**!? da?@Q@1AaAA1BB!CCDDFaG?HAHH1IaII!JaJJ1KKLL1MqMMM1NN!OOPPPQQQQ!RRRSKTqTTQUUqVV!WQWXXlXS1YYZQZZ![`?[\\bacc_Q_ q _x_Wdqdd&^ eAeqeAfeefqfyyyQ!zazhHiggn @q` Zpg  g@ Hi(ggz(x Z00g ZH0H0g ZH0H0gy0@c,H0Vggn Zxxg@`C HCx70l<g Zxxgg Zxxgglo(L&H`:/2x08gglFg (Zx&xg00( (:gg*(  g00( (ggg*(  gtgJ O`Ox(HO0O"$OO"$OpOX` P8 Px0X8zgggg8@hPx0X8WUggf (Zxgj`(Zx0g0+Kdgj`(Zx0g" Kg~(x`Z0gg,-g&.xlg<x  `-xg/g&0xlg<x  `-xg1g&2xlg<x  `-xg3g&4xlg<x  `-xg5g&6xlVg7-g8g&9xlg7-g:g&:xlg7-g:g&;xl@g7-g<g&=xlg7-g>g&?xlg7-g@g&Axl*g7-gBg&Cxlxg7-gDg&ExlgF-gEg&GxlgF-gGggNgHKvg6( x xIxgI g`J Ox`KO0OHLO`MxgNgMx xggBM@( I @x0xgOUgPKx g*( x xgt (Zxxg*xxIxgI  g`J Ox`KO0OHQO`MxgNgMx xg$0x0ggBM@( I @x0xgOUg/Kxg*( x xg*( x xg6-@xxIxgI gHRIxx-(pxgdpx`Cpqn?[H7lxH| gJ Ox`KO0OHSOpXO@TO(`MxX@(gdpx`Cpqn?[H7lxH gJ Ox`KO0OHUOpXO@VO(pOTO`MxX@(gdpx`Cpqn?[H7lxHgJ Ox`KO0OHWOpXO@TO(`MxX@(gdpx`Cpqn?[H7lxHgJ Ox`KO0OHXOpXO@VO(pOTO`MxX@(ggNgMx xggBM@( I @x0xgOUg1Kg6-@xxIxgI hgHRIxx-(pxg6px`Kx2gJ Ox`KO0OHYOpXO@ZO(pOTO`MxX@(8g6px`Kx8gJ Ox`KO0OH[OpXO@ZO(pOTO`MxX@(ggNgMx xggBM@( I @x0xgOUgEKhg6-@xxIxg8x  xgI gHRIxx-(pxg6px`KxgJ Ox`KO0OH[OpXO@ZO(pO\O`MxX@(g6px`KxgJ Ox`KO0OH[OpXO@ZO(pO\O`MxX@(ggNgMx x gapXa`PaxX?ahP&xph` g0x? g`J Ox`KO0OH]O`Mxg0x?mgHRIxx-(pxg6px`Kx4g`J Ox`KO0OH^O`Mxg6px`Kxg`J Ox`KO0OH^O`Mxggg pIgNgMx xggBM@( I @x0xgOUg_Kg8x  xg8x  8xg?xapX333333?a`P8axXt8ahPc2xph`gF g0 xxIxgg`g0xxIxgIgj `+ZpgggI hg`J Ox`KO0OHaO`MxgNgMx xggD( :Ixx(xggBM@( I @x0xgOUg3K g6-@xxIxgI gHRIxx-(pxgJ Ox`KO0OHbOpXO@cO(pOdO`MxX@(gNgMx xggBM@( I @x0xgOUg5K^#g6-@xxIxgI #gHRIxx-(pxg6px`Kx!gJ Ox`KO0OHeOpXO@fO(pOTO`MxX@("g6px`Kx"gJ Ox`KO0OHgOpXO@fO(pOTO`MxX@(ggNgMx xggBM@( I @x0xgOUghK&g8x  xg+Kb$g`J Ox`KO0OHiO`MxgNgMx xb&ggjK%g8(apaxIxpgI ~%g`J Ox`KO0OHkO`MxgNgMx xg$0x0g\&gg*xxIxgI V&g`J Ox`KO0OHlO`MxgNgMx xggggBM@( I @x0xgOUgmK(g\7ImIxx IxgI 'g`J Ox`KO0OHnO`MxgNgMx x$(ggD( mIxx(xggBM@( I @x0xgOUgoK)gDpIxxIxgI ~)g`J Ox`KO0OHqO`MxgNgMx xggBM@( I @x0xgOUgrK+g*xxIxgI .+gJ Ox`KO0OHbOpXO@cO(pOdO`MxX@(gNgMx xggBM@( I @x0xgOUgDK,g6-@x xIxgI z,g`J Ox`KO0OHsO`MxgNgMx xggBM@( I @x0xgOUgtK.g*x!xIxgI -g`J Ox`KO0OHuO`MxgNgMx xggBM@( I @x0xgOUgvKV/g*x"xIxgI .g`J Ox`KO0OHwO`MxgNgMx xggBM@( I @x0xgOUgxK 1g0px#xIxgI 0gJ Ox`KO0OHyO"X$XO@zO("$O{O`MxX@(gNgMx xggBM@( I @x0xgOUg|K2g*x%xIxgI `2gJ Ox`KO0OHyO"X$XO@zO("$O}O`MxX@(gNgMx xggBM@( I @x0xgOUg~Kx4g6-@x#xIxgI 4gJ Ox`KO0OHyO"X$XO@O("$OO`MxX@(gNgMx xggBM@( I @x0xgOUgK(6g*x&xIxgI 5gJ Ox`KO0OHyO"X$XO@zO("$OO`MxX@(gNgMx xggBM@( I @x0xgOUgKN8g8x  xg8x  xg0x'xIxgI 7gJ Ox`KO0OHyO"X$XO@zO("$OO`MxX@(gNgMx xggBM@( I @x0xgOUgK9g*x(xIxgI 9gJ Ox`KO0OHyO"X$XO@O("$OO`MxX@(gNgMx xggBM@( I @x0xgOUgKL;g8xB)IxgI :g`J Ox`KO0OHO`MxgNgMx xggBM@( I @x0xgOUg<K=gP-@<Ixx IxgI \<g`J Ox`KO0OHnO`MxgNgMx x<ggD( <Ixx(xggBM@( I @x0xgOUg@K>gP-@@Ixx IxgI >g`J Ox`KO0OHnO`MxgNgMx x\>ggD( @Ixx(xggBM@( I @x0xgOUgK@g\,IIxx IxgI ?gg`J Ox`KO0OHnO`MxgNgMx x,@ggD( Ixx(xggBM@( I @x0xgOUg:K>BgP-@:Ixx IxgI Ag`J Ox`KO0OHnO`MxgNgMx xAggD( :Ixx(xggBM@( I @x0xgOUgBKCgP-@BIxx IxgI NCg`J Ox`KO0OHnO`MxgNgMx xCggD( BIxx(xggBM@( I @x0xgOUg8KEgX-@8Ixx lxDg`J Ox`KO0OHnO`MxgNgMx xggx-@8Ixx M`@( 0xgOUgKKg8x   xg8x   xg8x   xgKFgF g0 xxIxGgg`g0xxIxgIGgj ` +Zpgj ` +ZpgggI ~IgHRIxxF(pxg6px`KxNIgJ Ox`KO0OH[OpXO@ZO(pO\O`MxX@(ggNgMx xgg:CxI[7l@Kgb?xapXaxXxp:KgHRIxxF(pxg6px`KxJg`J Ox`KO0OHO`Mxgg pIgNgMx xgggBM@( I @x0xgOUgKMgDIxxIxgI Lg`J Ox`KO0OHO`MxgNgMx x|Mgg.axRxpMg`J Ox`KO0OHO`MxgNg pIgMx xvMggggBM@( I @x0xgOUgKOgxgHx*xT7lxOgxg(xgx`KNgHxH|Ogx0KOgx|OgxKDOgx|OgxK|OgxgOggxg.0xxggOUgKQg\7IIxx IxgI Qg`J Ox`KO0OHnO`MxgNgMx xXQggD( Ixx(xggBM@( I @x0xgOUgGKUg6-@xxIxg+K4RgIgg8x  xgI TgHRIxx-(pxg6px`KxSgJ Ox`KO0OH[OpXO@ZO(pOTO`MxX@(ggNgMx xpUgNapXaxXRxppUgHRIxx-(pxg6px`Kx4Ug`J Ox`KO0OHO`Mxgg pIgNgMx xggBM@( I @x0xgOgg8HUx`0H p80txph`xX@(gg.+gggg"gg D gg`Zp00g^ Zpg g( kgn @xZp0g2 0Xgn @xZp0@g@Kg\JO0OOO(`M0(gM0 0gggXg.gpJ pX@80(lg& 8gg @HZ g& ^gD0g"Xgg"gggp@HlP,2Jgg^Zgv(x ZHHg0@&H2gg" ,Kg6+Kzgg gggXgHPZpPHPHgg28kpg"p^g~ @0HPZpPHKPH0g XXBgg ^gggBpppX@tgp @0HPZpPHg8g0D80PHXgg tggp@g(tP X@Xpp>80PHHiHiX ggt Zxg(@e:,xJgg^Zgv(x ZHHg0@&H gg (`Zp`H0q`H0ggh`Zp`H0`H0g2h8kg"XNg~ @`Zp`HK`H g H2gg NggX|gB@H0Hg@ @`Zp`H0q`H0g*qHKHfgz@ @`Zp`H0`Hgq0 (hhH`Zp``H0g gg+ (hhH`Zp`0`H0gg@g08 b pX(@2`H0Dggg| Zx``x`gLgp>g g&NgpOg2+0gxqH Zxxgggfi(D ,x` a $h  "a  "a  *~  &o  .  .  $h  "a   0   *~   &o   $h   $h  &o  *~ ! *~ $ &oV !Q`A0``i I  ) \gg8pgg@`  Z  Z`  "a"arU@@@@~x bZ#pQmg@N}s Ff4xs 9G>#xf4xs 9G>#Qmg@N}sME(SLSS6"N0{00020820-0000-0000-C000-000000000046} 0%@pip%F%Hx@x8ice$*\Rffff*0W67339000`xAttribute VB_Name = "She@et6" Bast0{00020820- C$0046} |Glo      "#%&'()*+,-./012346789:;<=>?@ABCDEFGIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghjklmnopqrstuvwxyz{}~bal!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2rU@@@8`brU@@8p 1 !Qq`q A 7` 1  `ihggZ""p ""PxOOpOX@O(OOOOhPO8 O( $xpX(hP8g ?g gggg8pX(hP8x`$h $h XrU@@@8`8a`brU@@@@~x aS4rU@@@~~~r     SaveAsUICancel 0 PTargetrowIndex columnIndexcontent sheetIndex errorInfo checkMethoderrorMsgtypeValisValidateCountregvalue sheetIndex2keyWordkbncolIndexvalue1flagrowNumfunctionArgsArrresuIDNumbervalue2 functionArgsIdNumFxrU@@@@~xIq1   ( Q A  a.!Q!QdQ0 !`&%A&&&1'''`( pl1(a(Q*q****!+++,Q,,Q-h---LggD08Z8`0l@8g@\gLpI(pg\h8Z8h8hg{gg\h8Z8h8hg\h8Z8h8hg\h8Z8h8hg^h8Zp8h8hgg pg4p 8Z888gPg8g^h8Zp8h8hgh8Z8h8hg8 Z! 8V"hh#8hgV$Ipp( pgg%?gg &Ipp'O(O(? p gg\h8Z8h8hg{gggdh8Z8h)*8hgx>JgLp+I(pg p%g\h8Z8h8hg{gg pgh8Z8h,-O` 8hgxg( kg.g/g0g12g13gpg4g p5g(X#k(PgzX @h8Z8h68hg p7g1\gV8Ia (gV9Ia (g"qnP gFqmlqnl gv @9Ia (g$gKl gv:Ia (g>qmlqnll gj @ExppXp 0xg gg g7p> gv:Ia (g>qmlqnl@ gj @ExppXp 0xg@P gg"qnP|g$gKpgv:Ia (g>qmlqnlpgj @ExppXp 0xggggv:Ia (g>qmlqnlgj @ExppXp 0xg6gggx @X @h8Z8h;8hgX(g6/T/.C7l0gZ<O=O3O>Op`2pgg2g ppRgg0ggpg`Ag g>lplgxlph8Zp8h?@8hgg"lpg4gg gg2h8gh`!ghKxg4@ ggNkhp pggh8gdg^pAOBO( pgg~gLpCI(pgdh8Z8h)*8hgNh8Zp8hD8h(gg pEg& gE gLpFI(pgdh8Z8h)*8hgVGIpp( pgJ@p (p"ggLpHI(pgdh8Z8h)*8hgNh8Zp8hD8hggg\h8Z8h8hg\h8Z8h8hg\h8Z8h8hg{LX4%@(X@(P8X8@hpP`P x8hpHi@ aS SK*   rU@@~~~~~~~~~ ~~~2~~ ~~~ ~ ~~~~~~~~~~~~v"Q9V~Ct"J  a a a Qa  @ a p1"q"""#Q###$Q$$$$!%Q%%!aPQa"919a999:Q::::;A;q;;;+/<3A<q<<<=1=a====!>Q>>>>qa a 1  VBAProject ThisWorkbookSheet1Sheet6ӡԤߺУ麯ShowFormSheet5 PrintFormFBC:\Program Files\Common Files\Microsoft Shared\VBA\VBA7.1\VBE7.DLLVBA A qPF9C:\Program Files\Microsoft Office\root\Office16\EXCEL.EXEExcel  p0FC:\Windows\System32\stdole2.tlbstdole 1aL-[DR checkTheSame ?C:\Program Files\Common Files\Microsoft Shared\OFFICE16\MSO.DLLOffice a.E .`M C:\WINDOWS\system32\FM20.DLLMSForms Q Q  ']Q3@Kw2C:\Users\١\AppData\Local\Temp\VBE\MSForms.exd Q  У򲢴ӡϢ Browse_PrintFEsK,\NFNdTH̝`DFWorkbookWorkbook_BeforeSave x .`/f&Tnx\OX[excel YOX[ pQVBE7.DLLa`  Oo` Nxh f ,row a nx[ , &|~\ۏLhg!h Y NOX[ pQ Sm ?aS *~ JJ  8PhpxFF&mFUnprotect CellsClearContentsFGetRowOrColIndex&m 0]\Ohpev Ncknx N}ge!jgT QۏLdk!h 1qaz.PasswordProtectEnd&t  A65530 Range IV5FB5D:X0 FXowAh}P?_DF WorksheetWorksheet_ActivateWorksheet_SelectionChangeFFcheckTheSameXQNew: FAILUREcheckedRequiredStartwriteLog writeLogRedaddCommentXQStartclearCommentsXQStartbeginCheck_commentcallFunctionXQStart regCheckFuncsetCellValueCountXQcheckDMB deleteRowdeleteRowNoProgetCellValueCountXQsetCellValueXQ setDMBCode removeSpaceXQ 4`nx[_YhgT hgǏ z-N RsQexcel &TRS[penc"N1Ybhg1Y% )nc:yTabColorIndex "l gg~b0Rf[uOo` elۏL!hName -NOo`Y N  value -a )(~ : ; Locked ,{ Lvpency -N\ gN*NkXQcknxhgRows Delete checkBank dk!k!h-N RdN :LeHepencY T0NNSR!h1Y%sS9eL:NeHepenc * gOo` g w Oo` h ۏLOck Select !hǏ! SUCCESS * g͑ Ypenc g w Oo` h ۏLOckܝJN.GB9mOQmg@N}sf4xs 9G># 0 checkLen* checkTermcheckXnax 0$o checkLen checkNum* checkNum checkVal* checkVal checkInt* checkInt checkTerm1 1compare checkYesNo1 checkYesNo checkDiffName1 checkDiffName checkDiffCode1 checkDiffCode checkIDCardType1 checkIDCardType checkSqyyName1       !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefgijklmnopqrstuvwxyz{|}~checkSqyyName checkYear1 checkYear checkPmmc 1,8,0 checkBxk checkNull checkRequired checkStuName checkBirthdaycheckBirthdayNecessarycheckBirthdayNecessary2checkBirthdayNecessary3 IsIDNumber checkSFZJLX checkSchCode checkFamType checkRXDate checkYear checkMonthcheckXJH checkPhoneNum checkOption compareDeccheckLencheckIntcheckValcheckNum checkIsInt checkIsNumber checkMoney checkMoneyTJcheckPersonNumcheckIdNumLinkcheckNowNecessary checkNum1 checkStuName1 removeEnter  N:Nzzhg checkName checkName1   >kXQ Ncknx_{:NIlW[ ^'YN1 NǏ20*NW[&{ hg .kXQ Ncknx ySN:Nzz0kXQ R^_{:N MOhg 4kXQ Ncknx ySN:Nzz0kXQ R^_{'YNI{N MO N NǏ &kXQ Ncknx y N:Nzz N^_{:N ,kXQ Ncknx y N:Nzz N^_{'YNI{N HkXQ Ncknx ySN:Nzz kXQ R_{:NpeW[ 'YN0 tepeMO^ NǏ MO N\peMO NǏ @kXQ Ncknx y N:Nzz N_{:NpeW[ 'YN0 tepeMO^ NǏ 8MONb~c T!k_{(Wb~c T;`Npev50%KNQhgaE EZ <kXQ Ncknx b~c T!k_{(Wb~c T;`Npe50%KNQhg 6kXQ Ncknx b~c T!k_{(Wb~c T;`NpeKNQhg . 0,8,0 ,SeQIlW[,NW[&{^gY:N20MOhg $kXQ Ncknx y_{:NpeW[ 'YNI{N N NǏ hg 8kXQ Ncknx ySN:Nzz kXQ R_{:Ntepe 'YNI{N  N^ NǏ 0kXQ Ncknx y N:Nzz N_{:Ntepe 'YNI{N checkSfzjh &kXQ Ncknx VNN{|W:Nzzhg E\lN xxxx-xx *kXQ Ncknx y_{:Nf[uNShg HkXQ Ncknx y N:Nzz N^_{'YNI{N1MO N NǏ18MOhg checkZjlx kXQ Ncknxhg checkXJH 1, 1, 50 HkXQ Ncknx y N:Nzz N^_{'YNI{N1MO N NǏ50MOhg checkBank 2kXQ Ncknx ykXQ Ncknx b~c T!k_{(Wb~c T;`Npev50%KNQhg checkSFJE 1, 4, 0 kXQ Ncknx SkXQtepehg (kXQ Ncknx,peX`+ @`8+)B% %XP %< %h B% XX xice*\R1*#2a0$*\Rffff*0T67339000` "  "  (opXo`XAttribute VB_Name = "She@et1" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$BustomizD2 P Sub Works_Activ () p EndSeleonChange(ByVal Target As R %Zh#pܝJN. FGB9mOxGB9mOܝJN.ME(SLSS6"N0{00020820-0000-0000-C000-000000000046} 0%@p%F%Hx@x8ice$*\Rffff*0V67339000`xAttribute VB_Name = "She@et5" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2_0VJH PH VBAPr@ojectT@  = +r ice J< 9stdole>stdole h%^*\G{00020430-C 0046}#2.0#0#C:\Windows\System32\e2.tlb#OLE Automation0E OfficEOficEE2DF8Dz.(/~xMEh6  LLI @ `0)8k KI I @ +`k8 giXiP`hH`>H``,` ` H  I @ `   I @  ` h I @ 0 `  I @  `  I I @ p ` 8 I @  `  I @  `hkX  I @  `  I @  ` x I @ @ ` ` IV @ I  D `  IV  I   ` P  IV p I  ( `X%Pk (I  I   ` >I  I  X`  [I 8I  `k ''mI I(  ` H  I @ `   I  ` P  I @ `   I @ ` p  I @ `  ""I  IV @IP ` ` `t````@ ` @ ` @ ` @ `  I ```@  `k %%I I   ` x &I I @ !`#`k( ! :Iv HIV hIP ` ( 0 ` X0p  %0(H0hH@ X0Z@ @ @ xH0h` h``P79058421637905842 10X98765432Z0@x @` @ @p @h @` @@(H @0 @ @P @ X x p@X @ 0@ @ Ph8x(`@@ P(4@ @ @ @ @ @h @P @8 @ @ @ @ @( @ @ @ @p @@X @P @X8 @p @ ( !P!!h! 8!! x ( ` @ @ P ( 4@ @ @! @ @! @h @!P @8 @ @ @ @ @(" @! @! @ @"p @@"X @P @X"8 @p" @ (##`#(##@#@ P#(#@x# @ @ h(H$`$$$%`$$x$@ $`$^4@@% @ @$ @(% @ @h @` % &&`&&H&%0&&@  &%4@x& @ @& @& @' @h @8'P @'H @ '0 @P' @h' @' @' @ @' @ @' @'h @P ()(()(@ ((@ @ )++8**) *)@ ))@h* @P* @* @*p @*X @*@ @*( @* @+ @(+ @@+ @ @X+ @p+ @h @P @8 @""X4ice$*\Rffff*0X67339000*\R0*#f$*\Rffff*0U67339000$*\Rffff*0S67338fff*\R0*#14*\R0*#10*\R1*#405*\R1*#13f*\R1*#2a0*\R0*#9*\R1*#12e*\R1*#29f*\R0*#13C  B       (  B 6    "(2P` hpx  B  " "(H PX` hpx &02Xh px  B  (  B  2@P X`h p xB  JJ 2H 2X  Lh                n P h B  , $ "L  H((  p  x  $ "V "  T $ "r0 X ` 4p  0 P B h p 4x        B  ( 0  B 60@HPX` |h  B  (00`px x  0B H P ` x x B  |  B $ (08 |@  B  lZx2   |  B   (  B :HXp    h B        .B     ( 0 .B  (8@HPX `B Z "&6 HP X`D"h4   ^ @ HPX ` hB    &( P X ` h  p   (   "    D!4H!! !!!!!!!!! "B """ """" "" "#(# 0# <8#x## ## #B H$ZP$h$ "p$&6$$$ $$ $  $"<$ %  %(% $$0% "$X% 0% % % %$%Z%% %&  &>t & n`&4& &  && & & & h' 'B ''''''''' ( ( (B (( ( ((( ) ) )B )) ))*** *(* 0* * *B +++(+8+@+H+P+X+ `+ + ,B 0,8,@,`,p,x,,,, , H- h-B - &- $- - -&.*0."`.$..(../8/X/h/p/ / 2//"/ 0@0  H0`0x08000 0B p1x1111182 X2h2p2x2222222 2B `3Zh33 "3&6333 33 3  4"<4  0484 $$@4 "$h4 04 4 4 4$4Z45 55  5>t05 np545 5  55 5 5 5 x6 6B 666 6&677 7(707"87`7p7x7777 7B 7D7 T7 7t8  8D88P8 X8h8-----------------------------------------1 ,дϢʾ Ϣsheet--------------------------------------- ʱ0 Ϊʱ1 Ԫ] V X v$L%^'Z Z'd'ki-----------------------------------------2 Уѧ ҪΪ-------------------------------------------------------------ʽȷfalseʽȷtrue $Z'zk]H^[\u4e00-\ue863]{1,20}$'  $'d'ki|-----------------------------------------3 УڸʽΪ2012-05-09(Ϊ)---------------------------------------`  ,ΪDZ'd'kzk]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]))))$"^\b[1-3]\d{3}-(0[1-9]|1[0-2])$'  $'d'ki|-----------------------------------------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]))))$'  $'dX'kHi@-----------------------------------------3 УڸʽΪ20120509(Ϊ) У麯---------------------------------------]^((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]))))$'  $'d'kiz-----------------------------------------3 УڸʽΪ20120509(Ϊ)---------------------------------------0]^((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]))))$' $/ $ / $ ' $/ $ / $ '  $  $d  $ 'd'kd'kd'kih-----------------------------------------4 У֤---------------------------------------Ϲ򷵻trueϹ򷵻false]79058421637905842x0Ȩ] 10X987654320У $Z$''ȥո] P 0 6)׶֤Ϊ,ΪͨУ'zk Gzj $$Gzj *[0-9X]Gzj ,  ,$' G 'j   ,$  '   ' $ >  $G'jiz-----------------------------------------У֤ -------------------------------------------------------------ʽȷfalseʽȷtrue]h,^[\u4e00-\ue863a-z|A-Z|0-9|()|]{1,18}$'  $'d'ki----------------------------------------5 -УѧУѧУʶ 42λһλΪֻx-------------------------------------------------------------ʽȷfalseʽȷtrue]^[1-9]\d{40}[\dx]$'  $'dh'kXiPz----------------------------------------6 -У黧 -------------------------------------------------------------ʽȷfalseʽȷtrue].^(\u519c\u6751)|(\u53bf\u9547)|(\u57ce\u5e02)$'  $'d0'k iu-----------------------------------------7 Уѧʱ-------------------------------------------------------------ʽȷfalseʽȷtrue]'^(((19)|(20))\d{2})((0[0-9])|(1[0-2]))$'  $'d'kpihq-----------------------------------------7 У-------------------------------------------------------------ʽȷfalseʽȷtrue0  ,ΪDZ'kpzhk`]^((19\d{2})|(2\d{3}))$'  $'d'kiq-----------------------------------------7 У·-------------------------------------------------------------ʽȷfalseʽȷtrue]X^((0[0-9])|(1[0-2]))$'  $'d 'k i v-----------------------------------------9 Уѧ-------------------------------------------------------------ʽȷfalseʽȷtruep]^\d{4}[0-7]\d{3}[0-3]\d{7}$'  $'d 'k i v-----------------------------------------10 У绰-------------------------------------------------------------ʽȷfalseʽȷtrue ]x freg = "\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"R^((^1[3|4|5|7|8|9][0-9]\d{8}$)|(0((10)|(2[\d]))-[2-9]\d*)|(0[3-9]\d{2}-[2-9]\d*))$'  $'d 'k i v-----------------------------------------11 Уп-------------------------------------------------------------ʽȷfalseʽȷtrue ] ^[1-9]\d{14,20}$'  $'d'ki-----------------------------------------checkXn Уѧ磨2012-2013-------------------------------------------------------------ʽȷfalseʽȷtrue ] ] 1^(20\d{2}-20\d{2})|(19\d{2}-19\d{2})|(1999-2000)$'  $ -$'$$ 'd`'kPdH'k8i0-----------------------------------------checkOption У鱸ע磨Сvalue2-------------------------------------------------------------ȲС200false 򷵻true V'z8k0 V  'd'ki------------------------------------------------------ȽϴС(Сڵڷtrue)----------------------------------------------------------------'value1value2false 򷵻true` VX'V X' V  'Dd'Dki------------------------------------------------------ȽϴС(Сڵڷtrue)-dec---------------------------------------------------------------'value1value2false 򷵻true V$4'V $4' V  'd'ki}------------------------------------------------------У鳤--------------------------------------------------------------- ,$'' $/ΪDZ'kzk ,-±0ʼֵΪָάõ± $$4 $$4'zkd ˵У̶ $$4'zkki}------------------------------------------------------У---------------------------------------------------------------( ,$'' $/ΪDZ'kzk $& Ϊzh .e+Сz8 $4e% С0zk ,-±0ʼֵΪָάõ± $$4 $$4'zp kh d ˵У̶ $$4'z k k i ------------------------------------------------------УֵΧ--------------------------------------------------------------- ,$'' 'z0k( $) Ϊz $4e) С0zk $4$$4 $4$$4'zxkpih------------------------------------------------------Уֳ(Number,ΪҲΪСС0)---------------------------------------------------------------X ,$'' $/ΪDZ'kHz@k8 $% Ϊz $4e% С0'zk$'+󳤶$'.Сλ .''' "˵ûС $4' $$4'zkd С  . $'DԪֵλ  . $' $$4 $$4'z8k0k(i -----------------------------------------checkIsInt У鲻С0-------------------------------------------------------------ʽȷfalseʽȷtrue]h ^0|[1-9]\d*$'  $'d'ki-----------------------------------------checkIsNumber УΪNumber-------------------------------------------------------------ʽȷfalseʽȷtrue' $'ki-----------------------------------------checkMoney У0-9999-------------------------------------------------------------ʽȷfalseʽȷtrue]p^(([1-9](\d{0,3})|0)|0)$'  $'d'ki-----------------------------------------checkMoneyTJ У0-9999Сһλ-------------------------------------------------------------ʽȷfalseʽȷtrue]^([1-9]\d{0,7})$'  $'d'ki-----------------------------------------checkPersonNum У׶԰һ------------------------------------------------------------ʽȷfalseʽȷtrue]^(([1-9]\d{0,3}))$'  $'d'kpih-----------------------------------------checkIdNumLink У֤ԱͳûдǷһ------------------------------------------------------------ʽȷfalseʽȷtrue If colIndex = jhrIDColumn Then checkIdNumLink = True Exit Function End If]`%Ա֤ǷӦ]x$ں֤ǷӦ]ڵһγֵ±]"Ա,Ԫ֮ڵ]$ݺŽȡ]!,Ԫ֮ڵ]"ݺŽȡ] #]8P%·]h] $' $'  (ڶλΪΪ V  ~$d,^dڶλΪżΪŮŮ V  ~$d,^k $' $' $' -  -  V  ~$d,^'i(-----------------------------------------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$'   'zk  $'d`'kPiH------------------------------------------------------Уֳ(Number,ΪС0)--------------------------------------------------------------- ,$'' $/ΪDZ'k0z(k  $% Ϊz $4e% С0z k $'+󳤶$'.Сλ .''' "˵ûС $4' $$4'z k d С  . $'DԪֵλ  . $' $$4 $$4'z( k k i ----------------------------------------- Уѧ ҪΪ-------------------------------------------------------------ʽȷfalseʽȷtrue  ,$'' $/ΪDZ'k z k ]^[\u4e00-\ue863]{1,20}$'  $'d 'kp ih ȥǴӡַ V P$^'  $4   MsgBox addr  !%' MsgBox addr  V P+^k i 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(vgCpRTrim?"R1IDS8Exit GIPre ^[\u4e00-\ue863]{1,20}$ '@ C(, /L|(_q{R2y{3 =1Ϊ2012-05-09(o)?"sBirthday5, fwArgsArrdrVC$,/9+0b* 'ΪCjB-`. km)pJ2oIMM' G"^((19)|(20))\d{2}-(0?[1 3578] 1[`02]))-9a[12][0ac3[01 (( 46"11Y# 0?2 )))e^%\b[1-T3]309]|-c)c523d_bYd(dG udNecessaredcrSB2B0@9B[ |(3 / PgP1 5w9k / ]r@/ / gR05@R Ta R 2TnM AA ?OpA 2Cx d  a02 ?1 ? ?<3 , su? 6?Oa/CO|(`??aMidr 1, 4) +0 "/"PU5,T 2_7$bsu, QQ'P're]f_*`h@'DateDiff("d", a, b) > 7 㼾J3 ~KN---p!%naSSo 9//,724A 2Q֤x?>ϹAq'Iȥb IsIDNumber(By0 y, )Boolea݀Const W' "790584P2163"2'Ȩ c10X98765432Cɒ '& = UCase(TTr)) 'ȥո  Dim s As Integer, i 4T4If colIndex = babyIDColumn And IDNumber6"" Then׶֤Ϊ,ΪͨУNaIsLFalse Exit FunctionEf !Len(H) <> 18K@Not Isberic(Mid, 17kLike "*[0-9X]UFor= 1 To 17 TCW@) W0g10Bss + ai! * T Ne xtCs Mo0d 11CRi(ghtI@)#c,l TAD)kTru@kch'-%AA& 'ʽȷ෵fBt,+ checkSFZJLX(`value^r4egH @@D"^[\u4e00-\ue863a-z|A-Z|~|()|]{1,18}l$"FWCA(, T>H"VDEK -tc5A c-3ѧ`ʶ 42λһλֻx585@85chC8ode5,51-9]\d{40}[\dx]2\2 22'#6H2 8..FamTyp.^(\u519c\u6751)|3bf@\u95477ce`e02)?222d=2?2*$7 dѧx811RXDat1^(((19@20))02})((0j]@12])OckJ0~l13?"q+JV/ J--$_cHc kYearG, fArgsArrcPuR^3=< 0d~'ΪDZpcqIi Gp= "%1"9$|(23}#u## n ?##4o#####Monthkk:::?ck"F_9"%RѐkO?XJNH,4}P7т337o//ck@{Q#O?10i绰OPphonep?5' .\bi(([38h4[57Qi25p35k8}ՠ00p2Pj(-[2r*[3{2}g)\b4^1[3|4|5|7|8|9]@Qt8!!ck!!x""i-11 Уп 4 'ʽfalse*truFunction checkBank(value) Dim0 reg  = "^[1-9]\d{14,20H}$"If)CKFT(-, K Then%*5&TB EQF^ End If ]k+ Xn%ѧ磨2012-3$XnW]`yearsPa(20` 2}-)|(1N9CB9900)oi@hSplit', "-"DAc|B (1) - 0) 1L| ^= |}K ?H~ Du= g?FvB,OpCעСڂ2 D! 200 vxu##31Dm23$ 4b12""2ai-4eExit 'oJg3Le[D>2!@oFe}߈Q~`ȽϴС(76)$@7eMa uCompareBBCIn{1F2EJ'J9c 87̃J?*-X5decO:5C 4 dDec,g1= Cue1 r??!oz'z!RiaI, fdArgsiArrppy@q,IqGO3wX" @(u0"S 'ΪDZ7bKEPv]p UBound(] '±0ʼֵΪάõ qp&) >.<X) A@B<s2))g=?_oq]!5 '@˵.̶A.1o  [ @9? @o@ &;@@Ԡo \@0.@@b@R@@ Not IsNumerik53JΪ}>, I0nStrcp0." ) <> OС{oO 6`gq= 0 -p?P!8?P7PfΪָάõ± If Len(value) >= CDec(functionArgsArr(1@)) And T<T2*ThenncheckInt = True/ Exit FK.EQIf Else '˵У鹀̶ȓ p,p1ow3{'-2GֵΧsF  E# AValC, I)a Split , 8","  FazGq@"" jHcANot IsNum0ericA 'Ϊ(E˜}AB@04С0Y $FL u0d7.^/}e0^Y)^(8ber,Ϊ@ҲcЀ".)\ cc [c,@ càB: 0)@ OΪZ=#tlQ4X>Aa`nn @ \m,!bmaxO,i 'Q8oؠDo0uble|2)$ '!,λDintgthInStry(".)W \ueGdou P%yû ?$`P ( ) OI!9+ +1^\o 5 PMDid1,  - 1ԪQg#|λ_!h+pC ϓuϤ_??0Uqg oo` IsgDeC?@ʽ@fs'Q5t¶ C%Dim regp'"^0|[1-9]\d*$n"pC(, 6H /ߣJHk?o_th} Aª_???Ѣj = 8 K??_@Money @0-9E___ ++((+(\d{0,3})|0!_,k_,*H_,,V,gTJ="t-һλ-9 'ʽȷfalse*&tru$Function checkMoneyTJ(value) Dim0 reg  = "^([1-9]\d{0,7}H)$"If)CKIW(-, K Then%T mPTE Fc End If ap,PersonNum У׶԰һxr% bHb3})bGB= c 'cFWcIdbLinkcԱͳûдʀǷһ¿i p+(B, rowIndex, colB@'jhrIDColumn'[a")3Exit `a ed  !yisGe@rRight As Boole0an ',.aA+ӦvB0irth3]length2Integer ':һγֵϨ± gV!String,Ԫڵ61Žȡb |B;year, Var@iant 'amonthL, dpay, i %a,rr-1UMid\17, 1[f g= H 8%Ū Mod 2` 1b@XڶλpΪ[Sheets(sBoB71).Cells(GsC#o) "A E,ż%Ů?x?mn"Ů)$ w! q, 4"!, 5, 2x _|, Y18 " 0 + "-" +*ppw N}o^--3"}:ѐΪ2012-05-09δʱ(Ϊ) WNowNecessaryn{sVS@cTtime`L=PNߘИ(19)|(20)) 2}(0[1 3578]p1[02]))((0P[12][03[01P469"1P02)G`= FormatB(, "ympmdd"d( @ > :B!PV*0o )oߨw_2%@ ?+_$!,ֳ(ber,Ϊ1I0/+,um1#,, faArgsCiArrSplit(y,uc "1\(0QT0 ΪDZ4u)gY $z?@ Not IsPericc)( l1 ,h CDe<=  ; 1@maxIntLen !1) 'a&A(DoubleI0!(2С|λi3InQ5'"._i# Bu0Kd|ou!1%EˀûГ r@(%) Bc oa5checkNum1 = True  Exit FunctionEnd If 6Else 'СvintValueMid(v , 1, InStr".") - 1) 'ԪֵλZdou[ZW++ k Len(R) <= CDec(fArgsArr(1)) A<2ThecFaTy lqG|'-% У ҪΪ֦ 'ʽȷ෵fABtE- MStu`Name1El)Qq@Splitw, "," 8@ eIf B@8"" SyL(0) 0 ΪDZ|?!y1DDim reg^[\u4e00-\ue863]{1,20}$" CVa1(,!)L!A -%? !'ȥǴӡַ @moveEnter(sheetIndex, row$colC"`>addrCells(2 CC`, Ch0)bBinaryCompare0) > <'MsgBox #! Ap`Pca`.Work.Clean(AdRO  S'2 ( -UxMEx6 LL L"L <x :@`@8kP@ @ @ @ @X ` @ @ $` `& `( `> `* @8%pXX@p@x@(X L2fdh&@8 @0 @X @p @ @ @ @ @0 @`p @h @P @(8 @ $<l084@ @ H6`@ @ @, @ 01@ 1@p d6 @2X @@ :@( :@ @ @0 HB@p 0B@ @ pH@ H@x @p J(0L@8X PP@p@ `8P8R@( pY@ Y[@ _@p _0ae@ @  @ ps@ su y@"h @ P 8 {@8 H { XN@ice$*\Rffff*0P67338f4b*\R1*#405*\R1*#13f*\R1*#133*\R0*#17$*\Rffff*0S67338fff*\R1*#12e*\R1*#43$*\Rffff*0T67339000*\R1*#13b*\R1*#2a0$*\Rffff*0U67339000*\R0*#2*\R0*#f*\R0*#1 h"hp:x.6" "H.p D  :L \8@\H\h\>^":  4P,`$>^, ( ~@$PV 8X x   \ @ HP.dX ,L \ * *8h(%0%D%%%0 %P%,p%&  (#6z$J  $"h (,V (PV (`" (,LFp 4Jv <($ <? 8 D6vH D0> HBj D @ ,  ,0  48v( 40>` 8 j 4 0 )"( <($ <<0 H6v@ H0>x PBj H < (" ,8v(,0>`0 j,($$x  < 68(LZP(&( (   )$  > ,`, p (,>40x, ,",   (8(2@h x*4 +$N  `^` h4LpdN   &4 $(LPdhPVJ 4Ld(N@P X \` \ \ x"@HX2h$@6 @*P :   ,HPX ha--------------------------------------------ʼУ-----------------------------------------]X]p+ijһ͵ıʶкź͸ʽ3:1;2] ʶ(ĬϱʶԶʶ)](ijһ͵ıʶ飨кź͸ʽ] ijһͱʶľֵ]Զʶ]%Ѽ¼ΪյкŷŽ]( L!^' "ȡĿ 0ĿȷģٽдУA@21qazT$LB@ |k1qazT$LB@R1qazT$LB@R1qazT$LB@R f$d!^B@*-$ÿοʼʱѴϢsheet,'hϢ¼ʼ'.ôУУ¼Ƿд֣׶ϢУ ('#Ĭ϶ѼδͨУ'Ĭ϶δͨУ f$d!^B@*-$ÿοʼʱѴϢsheet, &A65530$L%D%!('$ ȡxcna = Worksheets(1).Range("1:1").Find(What:="*", After:=[a1], SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Column IV5 <%D%!L'FAILUREA@l&+ȡǷУɹ־Ԫ񣬲ֵʼΪ0'ռ¼ʼΪ0 0 8" ʱִd ʼУ鰴ť¼ʱִ.ȷʼ Уرexcel $4ܵݶʧʧ 6ܰʾ$2 8d1qazT$LB@ |kk.$L!b(r)ҳǩΪɫ $  "ûвҵѧϢ޷У飡A@2'01qazT$LB@ |k'ôУУ¼Ƿд$L!дϢ£A@` $   ,  $'<"ִ һǿУ ĵԪĿ';6ִ һǿУ ĵԪΪϹĿ'''5"һǿУʱ¼Ԫ'9ǷΪЧ¼ 'C¼УǰǷд';¼ԱǷд 2  2$L%^!'Oһбʶֵ'2=жforѭǷcallFunctionXQStart ûִĬϷ <ʶΪ -$'Gʽ14-3:25 :$'H6ʽ3:25ȡıʶвֳ֣кź͹ DJҪּϵҪУ飨ĬУ͵ԶУ   Y&+1ΪеһԪΪĬУ $:$'V*ȡıʶвֳ֣кź͹$'SԶʶ , $;$'cԶʶ͵ľֵ   gԱʶб $ , 2 A@}ݱʶֵöӦķk  $;$'Pȡıʶв   WԱʶб $ , 2 A@Hk@ eJ ʽ3:25$'QԶʶ , Pʶеڵǰ$;$'eԶʶ͵ľֵ   kԱʶб $ , 2 A@ݱʶֵöӦķkd-ֻĬУʽ14$;$'Hȡıʶв   OԱʶб $ , 2 A@Hk@k8 , 2$L%^( 2 6ִ һǿУ ĵԪΪϹĿ    , е һдȷ''8УʱдϢ A@`  'd   'Tÿһкϼеֵk  <,һؼֶȫ򽫸ɾ , +  ',"ϢеĸдϢɾ  h  h h  f$d%fB@hr Ѹɾ  h  'h 'k ,k "  6 ɾЧ "$' " A@dB ѸɾdP  " A@dH Ѹɾk  "  ˴Уɾ :Чݣ֤У鶼ʧܼΪЧݣA@2k *дϢ鿴ϢA@2$L!b(r f$dB@Hd( '6A@  6'%ִУظݷ,ûظǷҪɾЧ Уͨ!A@2.$L!b(rSUCCESSA@l:+ȡǷУɹ־Ԫ񣬲ֵʼΪ0 $A@Nd *ظݣ鿴ϢA@2$L!b(r f$dB@Hk k 1qazT$LB@ 1qazT$LB@ 1qazT$LB@ o8 q-------------------------------------------------ظijһ------------------------------------------------@]] &A65535 \%D%!('$2Scripting.Dictionary$.,O8O $ \%D!'.>ȡѧ 0 .%"ѧ໤֤ݽб 0 0 ,%2-֤Ų 0 ,B@4&#addһΪkeyڶΪvaluek8 k0 ( &!6'(Sheet2$LG:G7DB@* ( !%: &!^G17D,8q.&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).. h/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^`Ӱť¼) ("ȷm cرexcel" & Chr(1`& "ܵݶʧ0ʧ7Can`@&ܰʾ") c"Ř@ kO TQKTab`PlorIP8x -4142fҳΪ8ɫ b2startTitle\ +PIlb cвҵ ѧ1G0޷!bQ%_Q!%ee`9QhU>ÏUUQ1writeLog + 3S`'"ֲY£?->  {Fbi2 ToaP atLea0OneNQ= P>: Ҁǿձ BOPHΪ᧵?totalMoney&ewF "? z"URzSis`\izeH[Ϊ015/InE 'ǰQC0w??9dcbTԱ~A}-j 1,pW=9(1, j ).qɵһ㾥_$is = $forѭ callFuncXQSV S5̗Zw p&QZ ' !/= SY t(o-o'C14-3:250cۿ ":c˵Ad0P?c?UBId(S) 00s"ҪּϵQQ0͵SUO ?For m = LBound(bsType) + 1 To U '+1ΪеԪĬУ 0valEntitySplit(m), ":") 'ȡıʶ@֣кź7ŅZtRowDJ(0?Զ=3v4"0If iSXThen)'@>bGA1b;bBľ`ֵFpor n@)#H'ǀ=callFunctionXQStart (n>1, i, j@sValidateC΀t 'C$ֵӦķ &&NextEnd If! me aAYsA?= False YM5WCw"W? U U rSoSQ MKE=?row<> 0?kʽ3:25_eǺ v `W) 'еڵa3E?_ʶo?__4__?6_ i_____9:X'ֻЅ)B914'YY//O$O$O$O"O"M" ?oWorksheets(1).Cells().Lock|edJz = j}'ִ ŷq ĵԪΪϱUatLeaOneNullsfA0= 6?merrorMsgP"" && "0\6ArE"дȷ"GhasC= True 'ʱeд8ϢOOwriteLog /=S=^T+ ?/~!OntotalMoneyLSu+ 'ÿһ@ϼO4?Q},c>1 'Aؼֶ򽫸ɾ is+Arr(Num) )ic %isNullRowNum = 8+ 1 &P'Ϣ@ĸ +PFor pcurM$sg -ValidateCount To ,oSheets(msgNamHe).8s(=).Delete 'Ѹq+pNext peH=|is +h asErr[= InEnd If :i5q0| - 1 '_Ч Л!@|rowDataArr(Dq)If D!hen^ ŗdŠ1, )Else -V;3;qw&j6> 8>(~Box "˴Уbl" &k & "?ݣ֤@СʧܼauΪ"-feTeF鿴 Worksc1).Tab.ColorIndex`b672S`Qct7J `S` FaAOcheckXQNew (1hq'NotE n0 'ִA;ظ7,û'ǷҪဵą;3Cͨ!/!ı/-41427 setCellueXQ 2,A8, "SUCCESS" ' ȡAɹ־Ԫ񣬲ֵʼΪ0 qFGna(? ,u,,,,,y,;Protect Password:="1qaz 2).:3 Subp '-!2ijһN  ;(2;Dim myDic As (Obj,KeyVarianrCB4, vaFrQu|rnaCA ctive.Range("A65535").P(xlUp).@q '*Set idpz = Cre`S ("Scripting.tionary"Ge" = "O8"08Od@ ).valu8ѧ!d !Each cara In 'Ա໤ggqMA^J V<> ""> PRe .EXxis) 'qReԎ1Add,  'add#һ@Ϊkey*qSsSmy"=C$. srWithj 4"!2W!G:G!ClearContentc 0 &1Resize(+q)&@pplica1!.Fun@(on.Transposa #1 'c0= `hP& !: 3(4xMEh> LL   N `@/Hkp Iv/ IV IP Ip(   `0kH I hIV IXH @\p dX `  Iv 8 I`  j ` Iv  I`   `(xkH Iv h IV  IP  l `HHk Iv  IV @ IP ` I (   ``%k I  Iv   IV 8 IP( @\ @n @Zp `0k Iv  IV 8 IP `V`r`t  H( X x0( R@%@ ` 8P @l L@ @h @ @ @ @x @` @H @` hfd@ @0 @ @H @` @xx @` @H h H8 `H`@ pHL@ @ @( @ @ @x @@` @pH @0 @ @ @ @ @ 4@ @p `(d@p @X @@ @( @ @ @ @0 @ @ @ @xx @p @h @` @X @P @8 @ @X @@ 84@ @ h@ @ @x  @` @H @0 @P @ @ @ P @ X X 8 p  0@ @ Lv@ @` @ @Hx @` @xH @0 0x0hH@ X0@ @ @ @ @ @ @H Lt4`@0 @` @ @x @x` @H @0 @P @ @ @ @  @8 @h @p @X @P @8 H0PPh@ xPL@ @ @x @ @ @`x @` @H @0 @ @ !0"H!"! !H ` @ p H !@ @@! @ Z&bd8@! @^X @(!P @H @X!0 @p! @ @` @ @, @! "! @H" "! `"!@2hp @p"X "H"@@ "p"@"8 @0 p"$#x##@$%p$x#($#`8#x##@v ##@: $#`<$FJL@X$ @ @$ @$x @$` @$H @$0 @% @ @0% @H% @ p'P(8  X &X'P&&h&'&8&&@ (&&'d&b8p@& @& @'h @` @&H @&0 @ @^ @(' @@' @h( @` @,& @'p ''@(X ''(' @2@ @((( @(( @ ((( @V' @( @ (( H)H h )))H))`)@ p)H)L@) @) @ @ @* @x 8X++0+*+*@t **L@`+ @H+ @x+ @ @+ @+x @` @+H @0 -p.(X..,,--.,/,@  ,, .&d$fh0@0- @- @H- @ @`- @x-x @-` @H @-0 @- @. @, @0. H..@. .0.@. @2 @.p .. @X /. @4@ @( ,`60/.0.000H0/0/@N 0/L@x0 @`0 @0 @ @0 @0x @` @H &  ice$*\Rffff*0U67339000*\R1*#405*\R1*#13f*\R1*#133$*\Rffff*0S67338fff*\R0*#f$*\Rffff*0X67339000*\R0*#10*\R0*#17*\R1*#12*\R1*#43*\R1*#47*\R1*#60$ B       B n  B h p2 p `B x 8 $z 8 " @ pHB  8 n @$0  X$`   xB 48(0p* $*0 8B H*0! X`h p x  B ( f0 4jP $  "j  (  "~    .&( <X p 0, <  *, <  .,0 <` x .,    0,    .,8  h x 6,    6,  (88,P 6, (, 8H(,`&,  f p 6>`& 0 X@B h $0**H tx*j`&  H$XhBp ` $****86h H Hd(x Hj`( HjH(p Hj(H  &  B(H nP $6 H 86(@ 8<(0  &  B(H pP $6(8 H 868$p 8<P$ h &p < 0%h`  6h $H$86,d`$8<8 ,d`p $      &  !(!B0!P! nX! $!(8!8"H "h"0x" ""0""j""""X`#&X# # # D##B## b# P$ $p$6$$H$$&@% h% ,x%%B%% f% @& $`&6p&& H& 86&(& 8<'(' `( &h( ((B(( f( $8)(8P) x) T`) &) * * * $88* &`*$X`*$&*$ +$$+ (+ 0+ *8+ H+$t`P+$&+$ + , $,, B,8, ^@, $,"\,,@`,&(- P- `- Dh--B-- b- $ .D0.P. t`X. &. . /B/0/ b8/ / $/*///&x0 0 00B00 ^0 H1 $h1611X`1&1  2 02B82X2 ^`2 2 $2*23X`3&`3 3 3B33 ^3 (4 $H4*`4p4T`x4&4 4 55B585 n@5 5 $505"6(6&6 6 66B67 j 7 7 $7*7"78&8 88B89 n 9 9 $969"9:&: : :B::  n; (p; &$;*;";;&< < <B<<  n< X= &$x=(8=(8=0=">0>&> ? ?B?8? P@?$?*???&P@ x@ @@B@@ R@$A80AHAX`PA&A A AABAB bB $B$PBB@`B&C 0C @C$DHCpCBxCC ^C $D&PD @D@`HD&D D D&DDDBDE | E $E$\EE(E@`F&PF xF  F"DFFBFF |F $hG PGG@`G&G H H D(HHHBPHpH |xH $H$PI8I@`@I&I I I$DIIBIJ dJ $J XJ@`J&J  K0K2x8KpK xK $L(8L(8@L(8hLLL0L LL0LLjMj M@MHM PM HXM86xM$MN &N NN :N$bN HO 868O(j`pO  O  O &O P(P0P B8PXP Z`P $PDPPN`Q&PQ xQ Q.QR`Q&R (R 0R @R HR PRBXRxR  xR $R6S.HPSSS( S2S( S1S( S2S( S1TT TJ8T.TTT ZT $U$\(UPU@`XU&U U U"DUVBV(V  P0V $V6V VVV(8VV HV86W$HW W &X (XT8X   HPX 86hX(b`X Y   Y &Y @YPYBXYxYY Y fYB Y Z<.ZHZ hZZ$Z$"ZZ Z [ \[ B \,(\ 0X\@^\"\ ^\ 6P](]n]2]n]0^D\0^x^^^^^ ^ ^ "`_ _ ._B &_ _$_B` `` p` "`  ` "` ``` `B Pa^Xa vxa a a 8b Pb hb bB b""b 6bb b bcc c80chc22pc"c ~c  c c  cd dBd F8dd d d d *d d d e eB ee*e 4f@f Hf f gB g* gPg XgB g tg h hB h^h vh h hB i i "i i8j22Hj"j ~j j  j j j jBj"k0*8k zhk(k k k&kk k l lB llVlm 88m |pm m: m4&m$n2@n"xXnnn nn-----------------------------------------УУдϢʾ ע----------------------------------------------------------- Ԫ] V X \%^'Z Z'Td('Tki--------------------------------------------д־ ¼ϢʾһϢ-------------------------------------------- b h f$d,^ h 'hiX--------------------------------------------д־ ¼ϢúɫʾϢ--------------------------------------------( b'l b h f$d,^ l h f$d%^%n!p(r h 'hipi--------------------------------------------עʼУ飩-------------------------------------errorInfoע 1Worksheets(sheetIndex).Unprotect Password:="1qaz" x V X v$L%^B@z V X v$L%^!|(~W ӻɫ V X v$L%^!(Nii--------------------------------------------ɾעʼУ飩-------------------------------------x1Worksheets(sheetIndex).Unprotect Password:="1qaz" V X v$L%^B@ V  X  V X v$L%^!|(rd`  V X v$L%^!|(rk0i(r---------------------------------------------ʼУ Ƿӻɾעõķ----------------------------0  Уʧ V X v$L%^!d жעΪ v V X A@tV עd"Ϊգȥǰע v V XA@N ע v V X A@tk1 MsgBox "" & rowIndex & "" & errorMsgd :УɹжǷעУʧʱעȥ v V XA@ ,#ȥո,ʾ VУ XУַ"$4 "$4"а˿ոϵͳԶΪA@`d`kXkPiH----------------------------------------------------------------------------------------------------------------------------------y--------------------------------------------ݱʶöӦķ(ʼУ)-----------------------------------------------------------------------------------------------------------------------------------------------------------------------ѴϢдб( V X v$L%^'  X v$L%^'Iȡбͷ Ϊϲеıͷ  X v$L%^' V e  X v$L%^'kh0'  checkLen*)ΪУ  $'checkLen'  checkNum*e-ΪNumberУ  $'checkNum'  checkVal*e-ΪֵУ  $'checkVal'  checkInt*e-ΪֵУ  $'checkInt'  checkTerm1e-"ǡ"Ϊ1' checkTerm'  checkYesNo1e/"ǡ"Ϊ1' checkYesNo'  checkYesNoe."ǡ"Ϊ1' checkYesNo' checkDiffName1e2ѼΪ1' checkDiffName' checkDiffCode1e2ѼΪ1' checkDiffCode' checkIDCardType1e4֤Ϊ1'checkIDCardType' checkSqyyName1e2ԭΪ1' checkSqyyName'  checkYear1e. У1' checkYear'  checkPmmce- У1,8,0' checkPmmc' checkBxke, У1,8,0'checkBxk'k _=================================1 ִеķǿУ==========================================ѴϢдб checkNullKT v V X$'  V е Ϊգ'')УʱдϢ A@`RMsgBox "" & rgold.Row & "е" & Chr(10) & titleMsg & "Ϊգ"k` v  V X A@'a=================================2 ִѧУ========================================== checkNameKT v V XA@@ȥոķ V X v$L%^!' $'  V е ;дȷΪ֣ȴ1ܳ20ַ''%УʱдϢ A@`  'k v  V X A@'Z================================= ִеijУ==========================================checkLenKT v V XA@Fȥسķ v V XA@Hȥոķ  $'  ,$'$ ` ΪDZΪ̶ȹ V е .дȷΪաд򳤶ȱΪ$ λ'$ ed ΪDZΪȷΧ V е 4дȷΪաд򳤶ȱڵ$ λҲ$ λ'$ ed ΪDZΪ̶ȹ V е &дȷΪգҳȱΪ$ λ'$ ed ΪDZΪȷΧ V е ,дȷΪգҳȱڵ$ λҲ$ λ'k '0УʱдϢ A@`k v  V X A@'h================================= ִеijУ飨Numberͣ==========================================checkNumKT  $'  ,$'$@ ΪDZΪ̶ȹ V е GдȷΪգдΪ֣0λȲ$λСλ$ λ'$eD ΪDZΪ̶ȹ V е ?дȷΪգұΪ֣0λȲ$λСλ$ λ'k'0УʱдϢ A@`k v  V X A@'i================================= ִ30%У飨Numberͣ========================================== checkPmmcKT  $' v V$'N ȡд  ,$'$@ ΪDZΪ̶ȹ V е ?дȷΪգұΪ֣0λȲ$λСλ$5λҳɼαڳɼ50%֮ڣ'$eD ΪDZΪ̶ȹ V е ?дȷΪգұΪ֣0λȲ$λСλ$5λҳɼαڳɼ50%֮ڣ'k'0УʱдϢ A@` $ $? $ $ e  ?  V е 9дȷɼαڳɼ50%֮ڣ'  ?e ,$'$D ΪDZΪ̶ȹ V е 6дȷɼαڳɼ֮ڣ'$eH ΪDZΪ̶ȹ V е 6дȷɼαڳɼ֮ڣ'k k''0УʱдϢ A@`k v  V X A@'g=================================15 checkName1 עжǷ--================================== checkName1KT v V$'K ȡд v V$' $ ?$ $ 333333?$1,8,0'  $'dh0,8,0'  $'  V v$d,^kk  V е )ֻ뺺,ַΪ20λ''(УʱдϢ A@`dh" checkYesNo v V XA@k@" v  V X A@'[=================================ִֵΧУ==========================================ѴϢдбcheckValKT  $'  ,$' V е $дȷΪ֣ڵ$ Ҳ$''-УʱдϢ A@`& isValidateCount = isValidateCount + 1kP v  V X A@'_=================================ִеΪֵУ==========================================ѴϢдбcheckIntKT  $'  ,$'$@ ΪDZΪ̶ȹ V е 8дȷΪգдΪڵ$ҳȲ$ λ'$eD ΪDZΪ̶ȹ V е 0дȷΪգұΪڵ$ҳȲ$ λ'k'0УʱдϢ A@`kX v  V X A@'`================================= ִе֤У========================================== checkSfzjhKT v V$'S ȡд  V е &дȷ֤Ϊգ''0УʱдϢ A@`d  ֤  X$'O ֤У :֤У V е *дȷΪѧ֤ţ''4УʱдϢ A@`  'kd $'  V е EдȷΪգҳȱڵ1λҲ18λ''4УʱдϢ A@`kkk v  V X A@'X================================= ִ֤У================================== checkZjlxKT checkZjlx 1$'  V е дȷ''(УʱдϢ A@`d checkZjlx v V XA@kp v  V X A@'\================================= ִѧŵУ==========================================checkXJHKT 1, 1, 50$'  V е EдȷΪգҳȱڵ1λҲ50λ''0УʱдϢ A@`k v  V X A@'[=================================ִпУ==========================================ѴϢдб checkBankKT $'  V е $дȷΪ֣ڵ$ Ҳ$''-УʱдϢ A@`k@ v  V X A@'W=================================ִУ==========================================ѴϢдб checkYearKT  $'  V е *дȷʽ20122002ȣ''-УʱдϢ A@`k v  V X A@'W=================================ִѧУ==========================================ѴϢдбcheckXnKT $'  V е )дȷʽ2012-2013ȣ''-УʱдϢ A@`k` v  V X A@'W=================================ִ·У==========================================ѴϢдб checkMonthKT $'  V е &дȷʽ0112ȣ''-УʱдϢ A@`k v  V X A@'g=================================3 ִеУ(DZ)==========================================ѴϢдб checkDateKT  $' 2Уʧ V е дȷдʽΪ"$4xxxxxxxx"$4 20130221''-УʱдϢ A@`k v  V X A@'c=================================ִеУ飨==========================================ѴϢдбcheckDateNecessaryKT& $' 2Уʧ V е дȷдʽΪ"$4xxxxxxxx"$4= 20131221ֻõ֮ǰʱ䣨գ''-УʱдϢ A@`k v  V X A@'g=================================ִеijУ飨==========================================ѴϢдб checkBirthdayKT!  $' 2Уʧ V е дȷдʽΪ"$4xxxx-xx"$4 2013-12''-УʱдϢ A@`k( v  V X A@'g=================================ִеijУ飨==========================================!ѴϢдб ߺcheckBirthdayNecessary2KT, $' 2Уʧ V е дȷдʽΪ"$4xxxxxxxx"$4 20131201''-УʱдϢ A@`k@ v  V X A@'g=================================ִеijУ飨==========================================ѴϢдбcheckBirthdayNecessary3KT, v V$'K ȡд v V$'K ȡд  $' 2Уʧ V е дȷдʽΪ"$4xxxxxxxx"$46 20131201ҪԺϵ5գ''-УʱдϢ A@`k v  V X A@'J=================================10 У绰====================== checkPhoneKT $'  V е дȷдʽΪ"$4-̶绰 ֻ"$4 ''%УʱдϢ A@`kh v  V X A@'L=================================checkOption У鱸ע ====================== checkOptionKT B$'  V е )дȷȲܳ200ַ''%УʱдϢ A@`k v  V X A@'\================================= ִ϶ѼУ================================== checkDiffNameKT checkDiffName  $'  V е дȷ''(УʱдϢ A@`d checkDiffName v V XA@k v  V X A@'X================================= ִ֤У==================================checkIDCardTypeKTcheckIDCardType  $'  V е дȷ''(УʱдϢ A@`d8checkIDCardType v V XA@k v  V X A@'v=================================14 checkGender ִǷΪСŮУ--================================== checkGenderKT checkGender 0$' '-ԱдУ֤Ź V е дȷ''(УʱдϢ A@`dpE checkGender v V XA@k@E v  V X A@'u=================================14 checkYesNo ִǷΪǡУ--================================== checkYesNoKT checkYesNo  $'  V е дȷ''(УʱдϢ A@`dC checkYesNo v V XA@kC v  V X A@'u=================================14 checkYesNo ִǷΪǡУ--================================== checkSqyyNameKT checkSqyyName  $'  V е дȷ''(УʱдϢ A@`d@B checkSqyyName v V XA@kB v  V X A@']=================================checkTerm ִѧУ--================================== checkTermKT checkTerm  $ V е дȷ''(УʱдϢ A@`k@ v checkTerm  $ V X A@'}=================================15 checkNumYN ִǷΪǡжǷ--================================== checkSNumYNKT v V $'L ȡд v V $'H ȡд v V $'H ȡд 1,8,0'  $'d0?0,8,0'  $'  V v$d,^ V v$d,^k>k> 1,8,0,$'$@ ΪDZΪ̶ȹ V е ?дȷΪգұΪ֣0λȲ$λСλ$5λҳɼαڳɼ50%֮ڣ'kh='0УʱдϢ A@`k(=   $ ?$ 1,8,0,$'$@ ΪDZΪ̶ȹ V е ;дȷɼαڳɼ50%֮ڣ'k<''0УʱдϢ A@`k;k; v  V X A@'S =========================== ִ϶ʵУ================================== checkSFJEKT 1, 4, 0$'  V е  дȷֻд''(УʱдϢ A@`dp: $ V е #дȷ,ֵֻΪ5000'')УʱдϢ' A@`d9k9k9 v  V X A@'r=================================checkAtLeastOneNNull ִһΪǿ--==================================checkAtLeastOneNNullKT  'A"ִ һǿУ ĵԪĿ $ =Ϲ   ' X KTF   ' KTF   ' KTF   ' KTF   ' n7dϹ  'F6ִ һǿУ ĵԪΪϹĿ    'kX7'T================================= ִУ================================== checkPmTypeKT checkPmType 1$'  V е дȷ''(УʱдϢ A@`d(6 checkPmType v V XA@k5 v  V X A@'J==========================================================================checkBxkKT  $' 'k85 v V$'N ȡд  ,$'$@ ΪDZΪ̶ȹ V е ?дȷΪգұΪ֣0λȲ$λСλ$ λ'k4'0УʱдϢ A@` $ $e ,$'$@ ΪDZΪ̶ȹ V е 4дȷμ޿һ£'k2''0УʱдϢ A@`k2 v  V X A@'nx2ip2_--------------------------------------------ʽ------------------------------------- ]VBSCRIPT.REGEXP$.7RegExΪʽ (4 ȫֿvba\ת  (.ʽ (5ǷִСд  %'3 ִ.i1-----------------------------------------------------------° Уظ˵Ѿûиʽ------------------------------------------------------------V-----------------------------------------------------------1ѧ׶ڱڲ(sheetѧ׶ &A65535 "$d%D%!('$*cna = getTotalColumnCount(sheetIndexValue) f$d!^B@*1&ÿУظʱʱѴϢsheet,'hϢ¼ʼX==============================ѧ׶ڱڲ==================================0ðÿԪغ֮ǰнбȽ ,  $ , 0 "$d%^'. 2  , 2 0 "$d%^'4 . 4.ѧͬ˵ظݹ 2 еݺ͵ ,ظ!!!!' A@`*ѴϢ'6kX-P-H-i@------------------------------------------------------------һ ֵȡֵ------------------------------------------------------------ֵҵֵڵлkeyWord ҵĹؼ'kbn л ֵΪ rowrowH'8]the find result object :B FD JH A1:A65535 v$L%D%@.> > <row >!('8dh+ >!L'8kP+kH+i@+------------------------------------------------------ ָcellֵ-------------------------------------------------------------1qazT v$LB@R  V P v$L%^(i`*------------------------------------------------------ ִڹУ(Ϊ)-------------------------------------------------------------value value1 cellУ鲻ȷfalseУȷtrue X0˵ΪDZ V$Z'z)k)k(]'^ijһļ¼ &A65535 b$d%D%!('`B' b row$8'\=ȡ , \ ` , b$d%^  ^ '^d(y(k' , 2 \ \ ^  2 b$d%^X VX LжϹǷcell'yp'kh' 2#ʱcountĿΪùеĿi '------------------------------------------------------ ִɾijһвexcelܱģ-------------------------------------------------------------sheetIndex rowNum к1qazT v$LB@R ` v$L%fB@h/ Ѹɾ- Worksheets(sheetIndex).Protect Password:=123i%------------------------------------------------------ ִɾijһвexcelûб-------------------------------------------------------------sheetIndex rowNum кX ` v$L%fB@h/ Ѹɾi$------------------------------------------------------ ȡָcellֵ------------------------------------------------------------- V P v$L%^!'i#------------------------------------------------------ ָcellֵ------------------------------------------------------------- 1qazT v$LB@R  V P v$L%^(i#------------------------------------------------------ ݴеֵǰʱѾͨУ飩------------------------------------------------------------- ]X p  V P v$d%^!X 'Z'^ijһļ¼ &A65535 b$d%D%!('`F b row$8'\Aȡ , \ ` , b$d%^  ^ '^d0!y(!k ! , 2 \ \ ^  2 b$d%^!X 'V V ZX 1жϹǷcell 2 b$d%^!'n nX V P p v$d%^(yH d@ V P p v$d%^(k  2i------------------------------------------------------ ȥcellеĿո------------------------------------------------------------- ]X Ԫ]p  3Blength1ʾcellԭijȣlength2ʾִȥոַ'ĬΪûȥո2 Worksheets(sheetIndex).Unprotect Password:="1qaz" V P v$L%^!'V V'r rGzj*"ԪΪգȥո V 't%length2Ϊոһγֵλ tַո V $v'V VX V P v$L%^('kpih`zAttribute 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_L?%K Ƿ4*õķo)beginC_c#LHGpMethod?LLuwLЋNot3 '焹aWʧ|?u$6 Is hing$жρ<Ϊ/T\ W| LAOAa'ȥǰq¡$ cDt_ ʫ 'L alw/ !. <' "Box @"" &gD& "h'tt$ɹ3!0гѕ&ʱđ rCq+remopaceFla(/Qո,ʾ:sW@УȀַChr(34)%QC& w"րа ϵͳԶΪa%ˬ A ]!qO?L?Y/ݱʶC 0XӦsX([)O-O?@!дccallFunctionXQStart(typeVal, sheetIndex, row$colHumn0isRidateCoun t) value = Wo$rks().Cells(DtitleMsgGsT,, ) 'ȡбͷ If `"" Then 'ϲеn/J - 1 L(ElseDÅtheadG=! ;CEnd( IffArgs!"0"JÅ Like "checkLen*MУGĄD Mid9& #EH%O 1H&NumL&@ber&& &@&&ֵLC&M%@b%Inta9?~nE9- 'W9Term1L""ΪL"1 7 YesNo -kk ?&ȗ>$ C$DiffNamej%ѼA8$% G _&CodslƖa `IDCar dT*'֤a6M#; e !8VSqyyԭDe_ < (e? ? kYearZݯVE jC]   kPmmcL ^,8,yy- GM:Bxk {  U   Select Case) '=11 ִqǿ>q?ϢдGq Null8UMethodXQ @RequiredX_boP Not Ѫ rerror"" &6"! F& "Ϊգ/ahasE`Tr'qʱ% fwriteLog E ' Box 5 gol d.RowO & Chr(10){ Tb eginC_commentJ,?isFor.o+.2.ѧ/_Ky-@{O removeSpxacep-ܟ 'ȥոķA\)./k2=c3Stuj(2/6/6;/6V555дȷА@֣ɴ@1820ַ*_8_8M> writeLog error`Msg  isValidateCount =" "+ 1vEnd If.beginCheck_ commeQsheetIndex, cMethodXQ, rowolumn AisForTrue '= ִеijУlCase "a^Len"{removeEnter {t 'ȥسķ-SpaceXQ).ոeW:(value, functionArgs)(@If NotKy pThen ENIArxSplit(, ","#!(0)@50 AUBd 1* 'ΪDZΪ|3"@"`" &Ƽ"titleд ȷ"Ϊա"ΪA<1)λ`VElse'n'2'Χ''!'''ڵ Ӣ3v(Ҳ1-2?-wE9-1T`jT?-TTTĚT &S "Se&{SSf{F{&R`'R?) }hasEx '1vʱSдϢ_(-ϊϊ4 rnNumberͣh] Z }}F }B_X|U0}}]j}oQ{%oQh& >h1{{֣>0޻qSf(v}?Сi?VsQ //9T0~cU7K UUUU  dUU`UPUx30%!hU==lLUPmmcU UU1VVw@ resul1g@etCellu1sXQ(5)@ 'ȡ0Ȏ If Not checkMethodXQ ThenfunctionArgsArr = Split( ., ",") M(0)P1p'ΪDZΪ̶ [errorMsg-"" & rowIndex" title& "дȷCΪգұΪ֣0@λL`'p1):λ!С2ҳ <څ50%ڣ"Else``` ``E(``BE End If_jhasETrue 'УʱдϢwriteLog2W$Dval(`@ue) / result) > 0.5 Or$>*!!P C $ (?L|l_l1G,:/ <="+ @Iu? l;;;7 ?!?!dL/*}ۋ= FamTTT]T_ $cbeginC_comment@ sheetb, ,olumnT!OisFo!Qd@'= 15Name1ע@Ƿ!--?Case| "G` P= getCellValueCou`ntXQ(՜, 3) 'bq10P, 4k( >=p *\@A~ nW^R ^#Ra "1,8,0vb&=#StuS|, a1 L a2"08 * 2Vk S2sX!).!#s(!5":  ? //' 뺺ր,ַΪ20/P/P/P\OO %yset@DMBCodAYesNo",O7cN_*q?/V/V3/V/VUUQִֵΧ 'EдбwI Case "checkVal8" dMethodXQ = (value, functionArgs)zIf NotzThen2; ]ArrSplit( , ","zGerrorMsg@"" & rowIndex"еA title& "дȷΪ֣`ڵӂ'T(0),Ҳ`+1量\hasEcaTrue 'Уд write0Log E ' isidate`Count@ M+ 1End IfbeginC_comme@sheetf, ,FlolumnD 0isFoAK '=ִΪֵoU+_d= 0b 'WkΪDZΪ̶_GU A_} Y}Ϊՠk!D_D{W2B Else)1))++)_C)(gs(((h f _FckE}/f_T?Q cT֤oTRԉSfzjhRv resZjlx?getPCell`ku3kXLQ(e, 8'ȡ>ȞݟF)7G""6?4Q E4_C_,߃߃_,#KO? sIsIDNuPmber%scg) ') = qtk#.OM?!!!!ѧ Oe/"/"/"/o"o"ߦ{ߦo SO)? \4SFZJLX%n$ԏo"o"o"o"Yxx1t18t $$$O$$o /:??_5/| д/|п/|v= ִ֤У. Case "checkZjlx" :PMethodXQ = DMB(9, value@, "1")FI`f Not=MThen.}err orMsg:"" & row Index"е title& "ȷna3hasE43True '偧ʱдϢUwriteLog ZElse"setCod, sPheetB>,@, columnEnd If@beginC~_commentJ J},;isFobrDU 'рŵ#8XJH~J9C@*Len(, 1, 50Up  \Ϊգҳȱڵ150b%cce dFW[\ck\ e\^п8\i@h!%дaЄ_Bank_^A^?]"\\ZΪ`֣[afunctionArgsArr(0)!ć^q1c_ab``"`'/0/0/]/ e]yE //+.!/..@x.^Year..E^#/f/g/OO+H/ʽ20122002ύ+ \)j++++++?(+ѧ+++yn+++Xĉ*P*******-*3*****g j*******'*OV_***Month***_ G**,*****011OU*****b ' PE nd If|beginCheck_comment sheetIn@dex, c2MethodXQ, row0olumn errorMsg^isFor = True '=3 ִеУ(DZ)<4ѴϢдб P@Case "qDate" hBirthday(value, functionArgsArr)If Not Then 'ʧ$_%"" & j"Rtit le@kдȷʽΪA Chr(34) x 20130221"*hasEA* 'Ayʱn\writeLog WE[?? $f -Njţb:c%c" cNecessary?dE;"dNowdb b*bbb xb1bֻ֮ǰʱ䣨aggg# g???ןc^c d+d"deyc+Z=þǟddc IO2%~_cccc-x?2c-12/> /cc*/O1//M1/t1 ,_-22O2A ߰o3ya24 44'f'oXQoR3 noooo o3313^ 333 33x33333, c Lu3033_33?3E/3?3 re)getCellVCoun0tXQ( 27@) 'rĘݯsu29x >A>ry3(rsu_r>>> _r_rt"bՃ>ҪԺϵ5գ " hasError = True 'УдwriteLog eOMsg/End IfbeginCheck_comment sheetIndex, c MethodXQ, row `olumnNisFN '=10 绰 7Case "ePhoneߊsNum(@value)/I f Not I Txhen 8I"`" &T"еtit le|дȷʽΪA Chr(34) -̶F H ݱ>'I`COptionBQ PPCQcKP, 66_Qu_Qsg_QGUQȲܳ200KK#Kck? ִѼLjDiffNamQA!Z@C0DMB(, B, func`ArgsRa j~ߜoz (@Else#NsetPCodujxwPzoaT .O.ЀOc /.=,.ɀ֤1~.-.IDCardTyp. .0...3 /0XQY5r/0~/0J /0XL/0/0!?0>0*_0)"o6_0_0_0_0orD_0O,L14)GerA`ΪŮ2--823OPT`1"0"_//G9U)IdзCӣΘC44?A694 444L44$6b6F55?fG5555565 _f05YesNo5$55n --=  Case "checkYes8No" <R@MethodXQ =B DMB( t, value, function Args)PIf0 NotGWTh en.errorMsg~"" & rowIndex " title& "дȷs30hasE43True 'Уʱ    A!"#$%&'()*+,-./0123456789:;<=>?@CDEFGHIJKLMNд@ϢUwriteLog CZElse"sDetCod,@ sheet|,, columnTnd IfbeginC_commentJ,;isFDorDU '14cBִǷΪǡg:SqyyNameF_`_`_`_`_`@: _`MBH`(-`* ```` c`Term`_ѧڿ]cK}H 4] [ 0E?H:H*KKOV%15 2&NumYNOVEVжϡW̶V='S(!resultbgetCellVaPCountXQ(_?ex, 9) '~bt mc__T, 10orsoogV1oo z ""6Ya1@"1,8,0(a1ZF a2v08 ܞT2I GS%qs(#).$s(ㅣ#= "@YoC,Z?ArQSplit(#, ","}(3= 1*'aCΪ̶𳤶ȟ =E_1&qΪգұ֣0λ xp !С`(2)ɰɼ$΁50%֮/#ߜoh C_r$NAv??S5L(mc) >(Y* 0.5)Sh '111111N1a= "" & rowIndexP"еʀltitleMsglдȷɼα 50%֮ڣ"  !End If'checkMethodXQ = False6hasErrorTrue 'Уд&writeLog e)m|1beginC_comment sheet4, JK,olumnD 1isF#M!' = ϶ʀX 6Case ".SFJE6uNum(value, "1, 4, 0")KEIf NotKH Then IC@xֻA@?V< E{i@&+,) <> 5000|&fd&W,$ֵ!'Ϊ_'_~ C?-"-- Q {y߈߈̈ $'>|AtLeastOneNNu llһΪǿ-- =K%7( aACou= + 1 ' ! ĵԪĿ$#PoneyoAgBqp '! Ϲ5qtotalMA9+ Select ">cdOIbaojiaoBCR:iSum? ? _ huoshi H   zhusu G  others H  RRc*'?%n '23 =pG>6>>>Ϊ@KEu + + " Jb`YXTQͱ ["cPmTyp>eo 2_DMB(,3KqsSo)\x!OsetCod%,zUO6pj#o˕oIq,OسTo .+<8.Bxk_.O.`1~, functionArgsv#ue = "" Th en checkMethodXQTrueEnd If>@resultgetCellValueCountXQ(sheetIndex, row 7) 'ȡд\If N8ot zfunctionAr gsArrPSplit( , "x,")?%B&(40)(1'DZΪ̶14errorMsg-"" &"еʀ title& "ȷ!գұΪ֣0λ&IM81)λ 2 ";DhasEED 'У@ʱ]дwriteLog EZ ElsBe}val(ue) <> Aû)؃/_$_eAx < YXYYaWμ"޿aһ£NEN#>2_6 FaIw_]_] _]E#b eginCA_comment jcolumn$misFoakASelect aFd '-&ʽ  e reg(,:DimEX As Obj+Set= Create#("VBSCRIPT.REGEXP")A'RegExઽ EX.GlobalE 'ȫֿ''vba\תPatter.n RʽIgnoreCaseB/ǷִСд<pTe stXG'ִhing#$o!° Ahظ˵Ѿûиi 1ѧ׶ڱڲ  -;ДSame`XQNew }'r>w(naSs:.Range("A65535").P;(xlUp).'c TotalCBBؙmsg%NP ).!s.ClearContIs 'ÿʱUAB ,c"uaRowP 1 '¼@ʼ'=ocO'ðԪغ֮нбȽϧ1Ti0 startT + 2 To rnag4babyID1WI2(i, c3ϲ AjO@i - 1o32exj x@q e ! Ҍ+ͬq:1;o UjzùiCr@!O y ') :prr NexptnOG/Fһ ֵݸֵo` #@ҵCлkeyWord Ĺؐabn"# ֵΪ H RI Get@@ODlR0(By@H, QStrf)AIqHgerm- x1уc 'the fipol c@@k";GXvex).Range("A1:A65535").Find(What:=keyWord, LookIn:=xlVal(uesDADxlWhole)  If Not c Ishing ThenBPJkbn = `"row" $GetRowOrColIndex. c./ JElse' ;Hum Enpd If F@unctio  '-2 cell`ֵ3# I setC*CountXQ@(sheet, c, vWވ@wk s).Unprotect Passw:="1qazN"I$s().@p W5WִڹУ(Ъ)CFor i % To1bi, 3B?p'+ 1G #5orh(Next ic!j.#4+ c -i DCStr(j, 3>)MB '0ж(dCGA eSbS)A IQj 'cĿ_wߐ  ]в@exܱģ 8c  Qahкdelete`䋿__o3 y:ow_.D 'Ѹf!' P~f123__Uûq_o__ VNo mP??;A0W[t_ - OIJ:O8)g-=QL$$% _?Y\k?obx, Ťg/(/ ݴ!BpZ0ֵǰʱ1Ѿͨˑ?orowN, c$ol + um`nPlusYCPStr()kExit ForElsep8O""9nd If Next j  E Function '-2 ȥ0ո3#D $ removeSpaceXQ(D, jaDim B1 As king 'C length Integer, 2 ' ʾC<ԭij0ȣ ִ ЁECַ 7Fa@ 'Ϊû ' WorkBsC).Unprotect Password:="1qazȂD~=PV@@,Len(_IfDN:1@0CaM '1Ϊգ%$*` Ino , "( ")12һγֵλÃf2 <> 3A5' ReplQ"Et4+@  ETru!y!|+z > &xRRME(@z0D6 <`zhX0h|ꐀHꀄH@ʀx @8 @ꀐh @Bx @%Ϣ%ꀪh  @  @ꀦ @0B‚(@ʀX @$@ꀬ @bBphB!ꘔB#˵%~BfHpHꐂxHʘBʀ @ʀP @8ph @ꀤ8 @0 @6  @ꀈ  @ꘊ B‌P@ꀒ @h@ꀎ@ʘBꀐ@ @ꘒpB"H8h(XPpx x8@Hx$p(8Hice*\R1*#2a0$*\Rffff*0S67338fff(*\Rffff*0S67338fff\044    08  @ ` Dp 8 0 P0pD084P. ..(8(`>"$$@>`R^FX `*0$`   ^^0p@һṹҳ]$H=Public Const sheetNameValueTJ As String = "2ʵͳ"]$Ϣ2Public Const IntroSheetName As String = "˵"]$H]$˵] x ¼ܵУ]$H¼ͷ] "ִ һǿУ ĵԪĿ] x6ִ һǿУ ĵԪΪϹĿ] ÿһкϼеֵ] "һǿУʱ¼Ԫ] Ϣ] %---ģУ¼ĸԪ] 8---ģУ¼ĵԪ]  Уʱ洢ַ] 8¼ʱرհť]  ¼ܵУǷвϹ] h ¼ܵУǷظ] #¼ܵУǷظ] %/¼ЧǰǷдϢ ״̬] #У鷽ķֵ]$)¼ʼк]$ )ѧѧſʼλ]D¼ΪյĿ]P"/ǷΪЧ ͳ 5ֶΪյĸ] ("C¼ȥոִнȥ˿ո򷵻true򷵻false] PcellԭʼĵݣϵͳûнԶûĴ֮ǰcell] X7ϴдϢʱڵ,ӦĿʼʱʼֵһ] ] ] RڸݱʶòͬķʱжǷforѭ Cell_SelectionChangeҪõñ]$¼ʡصȼ¼ڵ]$+sheet±Ƿ] ]$h@)е]$) Ա]$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= 3 'ѧɀѧλ Dim isay)i Ϊ%n%ArЂ>ΠЧ ! 5ֶc &removeSpaceFlal:ȥոy`ǀa$ˡ*tr@uefalse3e@ac2)!t`ûнԶûao?֮Csc ur @*)Long 'ϴxдF!8,ӦĿʼʱֵһF rna A',c1^isFO).ڸݱʶòͬ0)CA жϑ;forѭ C_Sele BFChMҪõW^,headIb'+ʡصȱ& SqsV9= 2 'q± "nottinueQ$AqJ1Plu"S6104 '!crge r6Ա s birthday= 04C-5BFA-101B-BDE5EAAC42Egram Files\CommonMicrosoft Shared\OFFICE16\MSO.DLL#M 16.0 Ob LibraryKMSForms>SFrms3D452EE1-E08F0A-8-02608C4D0BB4 SINDOWS\sSFM20L'B _&/;"~1jIqAHq00}#0Bq# ў50 A5D1A279C-3351-40F3-9FEC-4B779A1DBBD86Users\١\AppData\Local\Temp\VBEÀb7.exdc<!.E .`M(  "ThisWorkbookG TikWBnkbok 2 HB1ZPB,zTL""+BrS@heet1G SŠe@`t1 vm2  R ߪH 6 6 6 46  ӡ GSbpSȉme2jo m !(e) ߺc ]wQQpec ec eo m k G;Xf"a2fo o &У!heeo o ~k !LGbQ;N z^bM2o -o U!2ShowaxG`6\ow3me2row4JnO( l5խ^5^5^5^zh^ PrintCrinw%bj\2od7 ʘID="{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="DBD9778C8490849080948094" DPB="E4E6489B58B975B975468BBA756954DB3B32FB9FC7A4BE0FBB5C6E3E8B61DDD34D1BA9CB2472" GC="EDEF4192439A449A4465" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisWorkbook=0, 0, 0, 0, C Sheet1=0, 0, 0, 0, C ߺ=32, 32, 1071, 702, Z =0, 0, 0, 0, C У麯=192, 192, 1231, 862, Z =320, 320, 1359, 990, ShowForm=0, 0, 0, 0, C, 26, 26, 1612, 699, C ӡԤ=0, 0, 1039, 670, PrintForm=0, 0, 0, 0, C, 52, 52, 1638, 725, C Sheet5=0, 0, 0, 0, C Sheet6=0, 0, 0, 0, C  FMicrosoft Excel 2003 T ? &" WMFC ,l4!K EMF, V@8F, EMF+@``F\PEMF+"@ @ $@ 0@?!@ @     !" !" !  " !  5" !  5" !  5" !  5" !  5'%     Ld4%!??'%   &% 6% Ld!??% 6% Ld!??% 6% Ld!??% 6% Ld!??% 6% Ld!??% ( '% % 6% Ld!??% 6% Ld!??% 6% Ld!??% 6% Ld!??% 6% Ld!??% ( Rp[SO090W`2p[w,(S`2@0,z,T0z,d0zp[wt9N0zH0 x= H07!  - ^0ކhxv$t0dv%    T|GihAUuAGL\vQNDRNR TUS$$$$$$$$Rp[SO090W`2p[w'(S`2@0'z'T0z'd0zp[wt9N0zH0 xȖ H07!k"  -k" ^0ކhxv$t0dv% Td;hAUuA;LTf[uY TT`ThAUuALTf[M|STpBhAUuALXNN{|WTlhAUuALXNNS% % " !% %   5'% (     ( &% 6*% Ld)*!??% +6% Ld++V!??% 6*% Ld)*!??% 6*% Ld)*!??% g6g*% Ldgg)g*!??% 464*% Ld44)4*!??% 6% Ld!??% 6% Ld!??% 6% Ld!??% g6g% Ldggg!??% 464% Ld444!??'%   ( &% 6% Ld$!??% 6% Ld#!??% 6% Ld#!??% g6g% Ldggg#!??% 464% Ld444#!??% 6% Ld!??% 6% Ld!??% 6% Ld!??% g6g% Ldg!??% 464% Ld4!??% (   ( &% 66% Ld46!??'%   ( &% *66*% Ld*4**6!??% 66% Ld46^& WMFC ,!??% 66% Ld45!??% 66% Ld45!??% ( % " !%   550  % %   % % !&% '% &% ( '%    Ld>>>!??Ld>m>0!??'%   Ld>m>0!??Ldmmm!??% ' %   Ld???!??Ld?l?.!??' %  Ld?l?.!??Ldlll!??% %  Ld@k@,!??% " % % % %   % %   % % @lRp [SO090W`2p[w%(S`2@0%z%T0z%d0zp[wt9N0zH0 xL H07!k"  -k" ^0ކhxv$t0dv%    TxJdhAUuAJL\_ Y h g% % % " !% %   5% % K@0 55  % % % ( % ( " Q|4P(x5( F4(EMF+*@$??FEMF+@   5  '' ' ,5' ,5' ,5' ,5' ,5-   @ !%- -- @ !-- @ !-- @ !-- @ !-- @ !---- @ !-- @ !-- @ !-- @ !-- @ !-- 2 Gҵ$$$$$$$$-2 ;ѧ2 ѧ2  ֤2  ֤-"System-'-- ,5-  -*- @ !*-+- @ !V+-*- @ !*-*- @ !*-g*g- @ !*g-4*4- @ !*4-- @ !-- @ !-- @ !-gg- @ !g-44- @ !4- -- @ !$-- @ !#-- @ !#-gg- @ !#g-44- @ !#4-- @ !-- @ !-- @ !-gg- @ !g-44- @ !4- -6- @ !6- -**6- @ !6*-6- @ !6-6- @ !5-6- @ !5--'- ,5,5--  --- - -  -    @ !> @ !0>-   @ !0> @ !m- -  @ !? @ !.?-  @ !.? @ !l- -  @ !,@- '----  - - - -,l@-  2 J ʼ ---'- -  ,5--,5 - -- - '#A 5(NANIBiff8Excel.Sheet.89q_VBA_PROJECT_CUR"ShowForm2 o CompObj aVBFrame f&PrintForm oCompObj aVBFramef&PROJECTwmVBA__SRP_7$!__SRP_d __SRP_11<j__SRP_13> ThisWorkbookf. _VBA_PROJECT\n(PrintForm__SRP_12t+ShowForm__SRP_10__SRP_e__SRP_fj__SRP_b__SRP_c__SRP_9 __SRP_an__SRP_8~Sheet6,__SRP_5&__SRP_6#__SRP_3(__SRP_4%!__SRP_1)$__SRP_2' __SRP_0" 7SbpSȉ /5Sheet1-HSheet5+i!hQpe *U;N z^1h?]wQQpe .Xf dir0|cPROJECTOlePres000 8@Ole CompObj4i