ࡱ; V T8\puservo Ba= ThisWorkbook=98X@"1[SO1[SO1[SO1[SO1[SO1[SO1[SO1Arial1[SO1h>[SO1,>[SO1>[SO1@[SO1[SO10[SO1[SO1[SO1[SO1Arial1Q[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@[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_                 ! ! ! ! ! ! ! ! ! ! ! ! " " " " " "      P #P      $ ! !  % & 'a   (  )ff * + ,`   - . /  0 " " " " " "    ""@ @ @ @ @ @ @ @ @ @ !@ @ ""@ @  @ @  1@ @  1@ @  1 1 1  1 1 1 !1 1@ @ 1 1@ @ 1@  1@  1 1@ @  @ @ 1 1 1 1@ @  1@ @  x@ @ 7  x@ @ , x@ @ ,  1@ @ 1 1@ @ 1@ @ 1 1   , 1@ @ 1@ @ !1@ @  !1 1 1|@  1 1  1|@ @ 7 1<@ @  1|7 1@ @ 187 28 387 48 ||y>Y-}-} 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?_)[$ -}-}. ?_)}}}1 }?_)[$ -##0.  }}2 ?_)[$ -???##0.??? ??? ???}-}3 ?_)}-}4 ?_)}A}5 }?_)[$ -}-}< ?_)}A}= ?_)[$ -}A}> ?_)[$ -}-}? ?_)}A}@ ?_)[$ -}A}A ?_) [$ -}A}8 e?_)[$ -}}}9 ????_)???[$ -???##0. ??? ???}}: ??v?_)̙[$ -##0.  }(};  ?_)}x}B?_)̙[$##  }-}J ?_)}-}L ?_)}-}M ?_)}-}N ?_)}-}O ?_)}-}P ?_)}-}Q ?_)}-}S ?_)}-}T ?_)}-}U ?_)}-}Y ?_)}-}[ ?_)}-}\ ?_)}-}_ ?_)}-}a ?_)}-}i ?_)}-}j ?_)}-}k ?_)}-}o ?_)}-}p ?_)}-}s ?_)}-}t ?_) 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^ĉ 2 %+ 8^ĉ_hQVL?e:SRNx,(c  -}Y5}Y  a% .Gl;`+Gl;` %/'^0 '^[0] 1{c{ }% 2hgUSCQ@wr 3;%@wr 3 Y % ?@wr 4/)@wr 4 % @@wr 5;-@wr 5 K % A@wr 6;1@wr 6  F % Blʑ^ lʑ  XTableStyleMedium9PivotStyleLight1683ffff̙̙3f3fff3f3f33333f33333\`"^ ؚ!h,gNy[^~NmOo`U_eQvNxhOo`VV!  =- KmՋ@b g!hĉRv^SbpSOo`ff@@F>xMObS AA@A@   1 71 xm 7sfzjh 7 familyMembers suortMembersfamilyYearIncomedisasterDescribe burstDescribe 7poorStudentEntryfamilyDebtAmountfamilyDebtReason checkDiffName[V~+R Ty checkSqyyCode3ut1uxkuNOO checkSqyyName3ut1u Ty checkYesNo 7 checkGender 7 checkYesNo checkSfzjhel T 7^S/f 7 Ty 7{|W 7/f/f 7&T 7sY 77u 7'`+R7u 7vQN 7e 7USN 7d[?Q 7pXP[sY 7QQgNO 7Vu 7V~p 7mQNN 7SkX /f b &T ^_kXy 7 checkNum0,6,2 Y T 71 7[e[SVclassIdentifyReasongradeIdentifyReasons~[at^~[acheckLen0,1,33[V~+R Ty 7sysDifficultyGradeName 7 indentifyDate 7indentifyReason 7 checkDiffName 7yr+RV 7V 7N,V 7 NV 7TyYgkXQ R [e 0 [SV _N_{ TekXQN TeǏ!h0kXQ[vVI{~ S/f yr+RV  V  N,V  NV -NvvQ-NN*N ^_kXy 7/f&TNO7b 7/f&TNOO 7/f&Td[?Q 7/f&TUSN[^P[sY 7/f&TkuNP[sY 7,gN/f&Tku 7 /f&T6rk'N1YRRR 7 /f&T[-N g'Yu` 7 /f&T^chzaSv+V7b 7/f&TNO6eeQ[^ 7 /f&TQp^\bObP[sY 7[^NGWt^6eeQ 7 [^/f&TmS6q~p[ 7 6q~p[wQSO`Qc 7 [^/f&TmSzSaYNN 7 zSaYNNwQSOc 7[^ k:Pё 7[^ k:PSV 7[^NSpe 7a{QNSpe 7ku{|+R 7 [^;N6eeQegn{|WfamilyIncomeTypeNameJkXQf[u[^;N6eeQegn{|W SNxh-Nv[^;N6eeQegn{|WۏLkXQ Y ]D0VYё0%m40e4TvQNRR6eeQ 0 LN6eeQ I{ ^_kXy 7checkDisableType 7checkFamilyIncomeTypecheckFamilyIncomeType 7ƉRku,TRkuzfRkuvQNkuku{|+R 7]D0VYё0%m40e4TvQNRR6eeQyOё0W,g{Qё0W,gu;m901YNOiё~b0cS`N0QybQ.U[^"N_v6eeQX[>kS)Ro` gN8RS~)R0hy0ZSi_6eeQ~FU0RSNSNNy iN0 {Q iN0R]Ncbd_b,gTv6eeQ a{Q90b(vb){Q9 LN6eeQ vQN^S_eQ[^v6eeQ[^6eeQegn{|W 7 checkYear 7checkIdentityReason 7SkX /f b &T ^_kXy 7RRRNSpe 7 otherInfo 7[^bXT1YNNpe 71 7Nt^~ 7t^~ 72 7Nt^~ 73 7 Nt^~ 74 7 Nt^~SN N 75 7Vt^~ 76 7Vt^~SN N 77 7Nt^~ 78 7Nt^~SN N 79 7mQt^~ 710 7'`+RsY 7mQt^~SN N 7 checkYear 7 checkYear 7 isFiveHome 7 isPoorLow 7isOrphan 7isAloneParents 7 isDisability 7isParentsDisability 7disabilityCategoryName 7disabilityCategoryCode 7isParentsLabor 7isFamilyDisease 7isFiledPoorFamily 7isLowIncomeFamily 7 isJlsyfzl 7familyIncomeTypeCode 7isFamilyDisaster 7 isFamilyBurst 7jtcysyrs 7ldlrk 7sysDifficultyGradeCode 7 checkLen0,1,33 7& kXQvQ[NNq_T͑'YFO*g(WRv[^~NmOo` ^ NǏ100*NW[&{0^_kXy! 7checkLen0,1,100 7  ؚ!h,gNy[^~NmOo`U_eQ 7checkLen0,1,100 checkLen0,1,60 7 checkYesNo 7checkLen0,1,40 71 7 otherMessage 7vQN 7/f&TQQgyrVO{Q 7/f&TQQgNOO7b 7vQNOo` 7isCountryLowFamily 7isCountrySupport 7(kXQQQgyrVO{Q0QQgNOO7b0^chzaSvsQOo` Q[ NǏ40*NW[&{0^_kXy 7SkX /f b &T ^_kXy 70SkX /f b &T ykX /f R /f&TUSN[^P[sY ySkX &T Lhg0^_kXy 7,SkX /f b &T ykX /f R /f&Td[?Q ySkX &T Lhg0^_kXy 7<SkX ƉRku 0 ,TRku 0 zfRku 0 vQNku 0 ,gN/f&Tku y-NkXQ &T Ry NkXQ0^_kXy 7#pek ^_kXy 7% kXQf[u[^NSpe 'YN0 NNSpe NǏ99 OYSkXQ 6 ^_kXy  7( kXQf[u[^RRRNSpe 'YN0 NNSpe NǏ99 OYSkXQ 2 ^_kXy"# 7' kXQf[u[^1YNNSpe 'YN0 NNSpe NǏ99 OYSkXQ 2 ^_kXy!" 7'kXQf[u[^a{QNSpe 'YN0 NNSpe NǏ99 OYSkXQ 4 ^_kXy 7*kXQt^~[a Q[ NǏ33*NW[&{ OY [^`Qc^\[ ~N[ ^_kXy 7PyYgkXQ R [V~+R Ty 0 [e _N_{ TekXQN TeǏ!h0kXQv[SV Q[ NǏ30*NW[&{ OY [^NSOY RRR\ ^_kXy 7*kXQs~[a Q[ NǏ33*NW[&{ OY [^`Qc^\[ ~N[ ^_kXy 7checkSpLen0,1,100 7 4135012711 checkInt0,2,0 ( _{:NIlW[SNS+T ^'YNI{N1 N NǏ20*NIlW[ OY _ N _kXy% 7 checkName 7DyYgkXQ R [V~+R Ty 0 [SV _N_{ TekXQN TeǏ!h0kXQVI{~[veg m?1@A&CF D \E| F G HsIbJKLnNuO3RSU@X`;Z[ [5!)\I"ccB~-z4nA_)k:~yw T8 r  dMbP?_*+%{&ffffff?'ffffff?(?)?MvMicrosoft XPS Document Writer 4dXXA4GIS4DINU" |r  SMTJ{0F4130DD-19C7-7ab6-99A1-980F03B2EE4E}InputBinFORMSOURCERESDLLUniresDLLInterleavingOFFImageTypeJPEGMedOrientationPORTRAITCollateOFFResolutionOption1PaperSizeLETTERColorMode24bppV4DM" d333333?333333?&<3cAU} S} s} S} `S} @S} S} `S} S} S} S} S} S} S} S}  S} S} S}  S} `!S} S} S} S} S} S}  k} k} S} S} !!@S} ""`S} ##S} $$ S} %'S} ((S} ))`S} **`S} +M S} N S} S}  S$OOYO$OO$R&` n p M M N a N N N \X N N N N N N, \Z N N N N N, N a a a a N S S S X: o !Vj "V5 #V^ @qr Zs P s P O O O O O O  [  O  O  O  O O O [ O O O P P P O O O O O O.  O !O "O #O Qt Q  i O OV O Q Q Q O O O O _m O W7  S8 !S9 "U1 #U2gi iO ki li mj nj oj pj qj rj sj tj uj vjwT xj yjzT {j|TTTTTTTT T TT O c- u w d@ dA dB dC dD dE  dT  dF  dG  dH  dI eJ dK dU dL dM dN dO dP dQ dR el en dS d l l l f6  f/ !f0 "f3 #f4 h v x h gk h h h+ h+  h  h+  h+  h+  h+ h+ h hW h+ h h+ h h h h h h h h m+ m+ m h?  h !h "h #h-TTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS  nav(   vj N0a݋X?S(t]4v6@ /nB 3r3( <kXQf[uvY T<~~  <a݅CC@],@Ƒ9 $< _Yhg<~~ i < a݅CC@8],5@§Ƒ9 $<_ Y h g<v6admin>@dinjn7 Sheet1ggDh8hj:SW2_1 T8 T܁֊  dMbP?_*+%&ffffff?'ffffff?(?)?MFoxit Reader PDF Printer_ 4dXXA4" dXX333333?333333?&<3U} K} E} #E} !E}  J}  J}  JT@ , , , , , ,,,,, I C C I L DDDD JDDDD J DD? F D DD D DDDGD DD@ F D DD? F D!DDDD DDGH D  D? F; H D  D5@ F< H D  D6@ F= H D  D@ G> H DDGHDDGHDDGHDDGH D D#D D D D$D? D D D%D@ D D DD@ D D DD@ D D D&D@ D D D'D@ D D D(D@ D D D)D @ D D D"D"@ D D D*D$@ DDDDD DD D# D DD? D$ DDlF <<<<<<<<<<<<<<<<<<<< !"#$%&'()*+,-. @/0:1:2:3:4Y@5679:;<=>?@ D D@ D% D !D!D@ !D !D "D"D@ "D "D #D#D@ #D& #D $D$D@ $D' $D %D%D@ %D( %D &D&D @ &D) &D 'D'D"@ 'D" 'D (D(D$@ (D* (D)D *\X*D? *E[ *D_ +\X+D@ +E\ +D_ ,\X,D@ ,E] ,D_ -\X-D"@ -E^ -D_.D /KY/D? /E` /Dh 0KY0D@ 0]a 0Dh 1KY1D@ 1]b 1Dh 2KY2D@ 2]c 2Dh 3KY3D@ 3]d 3Dh 4KY4D@ 4Ee 4Dh 5KY5D@ 5Ef 5Dh 6KY6D @ 6Eg 6Dh7D9DbDD:DbDD;DbDD<DbDD =Di =bo =bp =Dq >Di >br >bs >Dq ?Di ?bt ?bu ?Dq @Di @bv @bw @DqDl<<<<<<<<< <<<< <<<<<<<< 888ABCDEFGH,I,J,K,L,M,N,O,P,Q,R,S, ADi Abx Aby ADq BDi Bbz Bb{ BDq CDi Cb| Cb} CDq DD Db~ Db DDq ED Eb Eb EDq FD Fb Fb FDqGDbDD HDHD? HF HH IDID@ IF IH JDJD@ JG JH KDKD@ KG KH LDLD@ LG LH MDMD@ MG MH NDND@ NG NH ODOD @ OG OH PDPD"@ PG PH QD QD QG QH RD RD RG RH SD SD SG SH*h888888<<<<<<<<<88PH  0(   >?@GGG 7 Sheet5ggD T8   dMbP?_*+%&ffffff?'ffffff?(?)?"333333?333333?&<3UPH00(  >@   7 Sheet6ggD K*   rU@@~~~~~~~~~4~~ ~~~~ ~ ~ ~~H"Q_GF<  a!,a!a !aq 0Q1q1aA!aQ q .../Q////0A0q000111Q1111212a2222!3Q33334qaq  A a !Q!  VBAProject ThisWorkbookSheet1Sheet6ӡԤߺУ麯ShowFormSheet5 PrintFormF1C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA7.1\VBE7.DLLVBA A qPF  E:\office2013\Office15\EXCEL.EXEExcel 1p0FC:\Windows\System32\stdole2.tlbstdole aL-[DR?C:\Program Files\Common Files\Microsoft Shared\OFFICE15\MSO.DLLOfficeMSForms A.E .`M C:\WINDOWS\system32\FM20.DLL e*'@|G2:2C:\Users\lenovo\AppData\Local\Temp\VBE\MSForms.exd  У򲢴ӡϢ checkTheSame FF &m F&m  0]\Ohpev Ncknx N}ge!jgT QۏLdk!hVBE7.DLLUnprotectS @(~ 1qaz. PasswordProtect Oo` Nxh f , JJ  8Phpx CellsClearContentsF&t ! A65530 RangeEndRowcheckedRequiredStartwriteLoggetCellValueCountXQ writeLogRedaddCommentXQStartclearCommentsXQStartbeginCheck_commentcallFunctionXQStart regCheckFunccheckTheSameXQNewGetRowOrColIndexcheckDMB deleteRowsetCellValueCountXQdeleteRowNoProsetCellValueXQ setDMBCode removeSpaceXQ IV5FUӿN}Mx; F7۬Hl\DF Worksheet 'Worksheet_BeforeDoubleClickaaaaaaaaaaaaFF x a &TRS[penc"N1Ybhg1Y% )nc:y:q FAILURE 4`nx[_YhgT hgǏ z-N RsQexcel ` aTabColorIndex "l gg~b0Rf[uOo` elۏL!hName -NOo`Y N  value - q%(~ : ; Locked ,{ Lvpency -N\ gN*NkXQcknxhg ,Rows Delete 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 P=q|{KpB}$Xm oI f$FQTzD:(F$eEF_D+&/F+^Q BWhGIDFWorkbookWorkbook_BeforeSave .`/f&Tnx\OX[excel YOX[ pQ nx[ &|~\ۏLhg!h Y NOX[ pQ Sm ? checkRequired checkStuName checkBirthdaycheckBirthdayNecessary IsIDNumber checkSFZJLX checkSchCode checkFamType checkRXDate checkYear checkMonthcheckXJH checkPhoneNum checkBankcheckXn checkOptioncompare compareDeccheckLencheckInt checkNum1checkValcheckNum checkIsInt checkIsNumber checkMoney checkMoneyTJcheckPersonNumcheckIdNumLink checkSpLencheckSz  &xRRME(@f0B6 < fhZ0hhl`Hp@ʀ @8 @ꀘ h @@Px @%Ϣ%ꀰ  @  @ꀬ @ @B•p@ʀ @@ꀲ @H0B\`hB!ʘB#%@˵%hj0BhHpHnxHʘBʀ @ʀP @r8ph @ꀪ @0 @&  @t  @v BxP@ꀚ @j@z@ʘB|@ @ʘ~pB"ʘB$&@pH Pp` 0x08@@`Pd'=ՊZ*\R1*#278$*\Rffff*0=5b1ba24b(*\Rffff*0=5b1ba24b\077    08  @ ` Dp 8 0 P0pD084P. ..(8(`>"$(@>`R^FX `*0$`  $  ^(^^^0p@һṹҳ]$H=Public Const sheetNameValueTJ As String = "2ʵͳ"]$Ϣ02Public Const IntroSheetName As String = "˵"]$H]$˵`] x ¼ܵУ]$¼ͷ] "ִ һǿУ ĵԪĿ] 6ִ һǿУ ĵԪΪϹĿ] ÿһкϼеֵ] "һǿУʱ¼Ԫ] Ϣ]  %---ģУ¼ĸԪ] 8---ģУ¼ĵԪ] P Уʱ洢ַ] ¼ʱرհť]  ¼ܵУǷвϹ]  ¼ܵУǷظ] #¼ܵУǷظ] %/¼ЧǰǷдϢ ״̬] #У鷽ķֵ]$)¼ʼк]$ )ѧ֤ſʼλ]D@¼ΪյĿ]P"/ǷΪЧ ͳ 5ֶΪյĸ] p"C¼ȥոִнȥ˿ո򷵻true򷵻false] PcellԭʼĵݣϵͳûнԶûĴ֮ǰcell] 7ϴдϢʱڵ,ӦĿʼʱʼֵһ] ] ] RڸݱʶòͬķʱжǷforѭ Cell_SelectionChangeҪõñ]$¼ʡصȼ¼ڵ]$+sheet±Ƿ] 0]$h@)е]$`,϶]$p#϶ʱ]$%϶ԭ] -Oʶ϶ǷͨУ 0-δͨУ 1-ͨУֵΪ 2-ͨУֵΪ] $Oʶ϶ʱǷͨУ 0-δͨУ 1-ͨУֵΪ 2-ͨУֵΪAAttribute 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!xcardID"J8= 3 'ѧ֤aλ Dim isy)!Ϊեne&򌿴?Ϊ a 5ֶ c f'removeSpaceFlam:ȥո@zHaˡ+truefalse]g4eAc ԭa*tûнԶûo@<֮Cc ur@*)Long 'ϴдEGa!9,ӦĿʼʱֵ҈F rna eB',cq^isFPOi.ڸݱʶò8ͬp)B ;for@ѭ C_SeleFChNҪÀñ^,headI2(+ʡصȱ& Sqs9= 2 '2r±P! nottinueQ$AqPJPlubS7104 'd?sysDifficultyGr8adeq729 '@ wtsintif yDGs30 '1ʱ?6@ReasonT1Sԭ\sO ?W6$1 ͨJ 0-δ 1-"A< 2:Q6*_'_% __SrU@@@@~xKa Q "$AQ1* 1A!1"qA#a##$A$$P $$&&'1'Q''(A(q((A)))*Q*ggD08Z8`0l@8g@\gLpI(pg\h8Z8h8hg{gg\h8Z8h8hg\h8Z8h8hg\h8Z8h8hg^h8Zp8h8hgg pg4p 8Z888g pg pg^h8Zp8h8hgh8Z8h 8hgJ @p(pg8!"Z# 8V$hh%8hgV&Ipp8( p8g g'?>Jgg 8(Ipp)O*O(? p8Dgg\h8Z8h8hg{gggdh8Z8h+,8hg x>gLp-I(pg p'g\h8Z8h8hg{gg pgh8Z8h./O`  8hg xg(  kg0g1g2g34g35gg6g p7g(%kXgz @h8Z8h88hg p9g3\gV:Ia (gV;Ia (@g"qnPgFqml(qnl gv( @;Ia (g$gK gv<Ia (g>qmlqnl gj @E 0g& gg( g9p> gv<Ia (g>qmlqnlp gj @E 0gp gg"@qnPg$@gKgv@<Ia (g>qmlqnl@gj @E 0g@*gggv<Ia (g>qmlqnlgj @E 0gpgggx @ @h8Z8h=8hgX g61T10C7ljgZ>O?O5O@Op`4pgg4 g gg2ggg `Ag   g>llgxlh8Zp8hAB8hg,g"lg6ggZgg2 h"g`!gKg4@ ggNkp pggh>g g^8pC ODO( p8gggLpEI(pgdh8Z8h+,8hgNh8Zp8hF8hgg pGg& gG gLpHI(pgdh8Z8h+,8hgVIIpp8( p8gh8Z8h 8hgJ @p(pggLpJI(pgdh8Z8h+,8hgNh8Zp8hF8hggg\h8Z8h8hg\h8Z8h8hg\h8Z8h8hg{L(#pXpX@(h@(@ `P 8hp8Hi@ aS Sa *\G{000204EF-0000-0000-C000-000000000046}#4.2#9#C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA7.1\VBE7.DLL#Visual Basic For Applications*\G{00020813-0000-0000-C000-000000000046}#1.8#0#E:\office2013\Office15\EXCEL.EXE#Microsoft Excel 15.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\System32\stdole2.tlb#OLE Automation(*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.7#0#C:\Program Files\Common Files\Microsoft Shared\OFFICE15\MSO.DLL#Microsoft Office 15.0 Object Library*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\system32\FM20.DLL#Microsoft Forms 2.0 Object Library *\G{122AF265-4027-477C-B7E4-C100DD323ADC}#2.0#0#C:\Users\lenovo\AppData\Local\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Library.E .`M ՊZ   ThisWorkbook0B5b1ba27b'ThisWorkbookzLx Sheet10?5b1ba24b= Sheet1H Sheet60A5b1ba24bI Sheet60SbpSȉ045b1ba1efJSbpSȉH]wQQpe0>5b1ba24bT]wQQpe`mXf0=5b1ba24bdXf&x!hQpe0C5b1ba27d!hQpe~c;N z^0<5b1ba1ef;N z^Ux`*.ShowForm095b1ba1efShowFormnw Sheet50@5b1ba24b) Sheet5hPrintForm0;5b1ba1ef+PrintFormʘH`0xg AHN߈p址Iuo%vuE+E JD:L_)H FZk:KBz{4|Y!zJnּ%yup!@gpN5Ԏ!Et(w :A?Bz ZK`>kHK% lZ!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_BeforeDoubleClickaaaaaaaaaaaar`(TargetF`Range `vbYesNo`vbYesa?` Sheet6` ӡԤX` (Browse_Prints` Worksheets`Visible` PrintPreview` ߺ`(checkedRequiredStartR`rowIndex6d` columnIndexP` cellValue@` ActiveSheet%N`Cells`(writeLog{u`contentl`Sheets ` (msgSheetName'` (curMsgRow/`(getCellValueCountXQc` sheetIndex `colIndex`valueK` (writeLogRedm`nLene,` Charactersrg`FontU` ColorIndex`(addCommentXQStartS` errorInfo` AddComment`Interior;`Color2F`CommentHs`(clearCommentsXQStart7` ClearCommentsf`sheet2RecordNum`ffTotalNumColumn`xlNone`(beginCheck_comment;D` checkMethodHd`(errorMsg'|`(removeSpaceFlag` (cellContent`(callFunctionXQStart `typeVal#`isValidateCount8`titleMsgh` (startTitlel` (headIndex` (functionArgs8M` (checkMethodXQ` (checkRequiredb`(hasErrorf`(isFord` (removeSpaceXQ` (checkStuNamec`(checkLeng`functionArgsArr`Split)` (checkSpLen`(checkNumh`(checkValK` (checkNum1%`resZjlx0` (IsIDNumber-*` (checkSFZJLX*`(checkDMB` (setDMBCoded`(checkS)` (checkBankUw`(checkXn` (checkMonth` (checkBirthday`(checkBirthdayNecessary` (checkPhoneNum` (checkOption,`(sysDifficultyGradeNameFlag`Trim@`(indentifyDateFlag ` (hasErrorIdNum`(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``cardID1[?` (cardIDColumn-h`ja`cardID2\?` (hasTheSame`(GetRowOrColIndexf`keyWordF`kbn1`cZ`Findn`WhatC`LookInP`xlValueso`LookAtO`xlWhole`Columni`value1`flag`rowData1`Count0v`rowNummR`(AreasheetIndexH` (deleteRow` Unprotect?`Password`RowsU`Deletex`(setCellValueCountXQ]`(deleteRowNoPro`(setCellValueXQ` codeValue` (columnPlus`length1S`length2T`Replacef` i`(!ValueColumType` columnNamew`(sheetIndexValue1` (AreaSheetName`(readmeSheetName` (totalCount-`(rgold`(hasErrorInValidateU` (dataRowStart` isNullRowNum8`(cna`(notContinueBoolt`(sysDifficultyGradeNameColr`(indentifyDateCol&`(indentifyReasonCol*9` У麯&`IDNumber4 `Wm`UCase5 `sj`Tk` babyIDColumn` IsNumeric$*`Right ` (checkSchCode` (checkFamType` (checkRXDate*` (checkYear6`(checkXJHF`years`value2` (compareDecN`(checkInt` 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` genderColumn~`birthdayColumn0` ` rowDataNumn` typeValue`bsTypet` valEntity܏`val`typeRow` isNullRowArr/` sheetCountB`Protectf` Application*`ScreenUpdating! `xlToLeftWY`rowType`md`ne`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`BeforeDoubleClickaaaaaaaaaaaa\`_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_totalMoneySumY`_B_var_p`_B_var_q` BeforeSave` "$'=IK) + Ue"@ p0(P'q`XX HH   (| $.UxMEx6 LL L "L<H :@`@hkP@ @ @ @ @X ` @@ ` ` ` `. `  @8%@(((p(H@( N2hfj@8 @0 @X @p @ @ @ @ @ @0p @h T<zX@P @x8 @x 0846b@ @ @ @ 2@X p2`t@ @" @p X;@X ;@@ @( @ C@@ XC@ @h @I@ hI@ @ hKM@ Q@@p 0QXS@hX @Z@@ hZh\@( `@@ `bXf@ @ @h @t@ hthvz@ @  |@h 0 |J&@ՊZ$*\Rffff*0<5b1ba1ef*\R1*#3c7*\R1*#12d*\R1*#121*\R0*#17$*\Rffff*0=5b1ba24b*\R1*#11c*\R1*#42$*\Rffff*0>5b1ba24b$*\Rffff*0?5b1ba24b*\R1*#129*\R1*#278*\R0*#2*\R0*#f*\R0*#1 h"hp:x.6" "H.p D  :L \8@\H\h\>^":  4P, `$ >^,J( @$X ~PV Pp    0\8X `h.dp ,L \ * *P(%0%D%(%0%08%h%,%&  (#6z$J 0 $" (,V (PV (`"( (,LF 4Jv <($( <? P D6v` D0> HBj D @ ,  ,0 0 48v@ 40>x 8 j 4 0 )"( <($ <<0( H6vX H0> PBj H<(" ,8v@,0>x0 j,($$x  < 6P(LZh(&( (   )$ 0 >8,x,  (,>40x, ," ,0 8 @P(2X *4 +$N  `^x 4LdN   &4 $@LhdPV,J  04L8dpN  \ \ \ x"2$@6P * :   0H,` a--------------------------------------------ʼУ-----------------------------------------]X]p+ijһ͵ıʶкź͸ʽ3:1;2] ʶ(ĬϱʶԶʶ)](ijһ͵ıʶ飨кź͸ʽ] ijһͱʶľֵ]Զʶ]%Ѽ¼ΪյкŷŽ]( N!D'"ȡĿ 0ĿȷģٽдУA@21qazN$NB@|k1qazN$NB@L1qazN$NB@L1qazN$NB@L h$f!`B@-$ÿοʼʱѴϢsheet,'jϢ¼ʼ'.ôУУ¼Ƿд֣׶ϢУ ('#Ĭ϶ѼδͨУ'Ĭ϶δͨУ h$f!`B@-$ÿοʼʱѴϢsheet, A65530$N%B%!' A@T ȡ IV5 <%B%!<'zxcna = Worksheets(1).Range("1:1").Find(What:="*", After:=[a1], SearchOrder:=xlByRows, SearchDirection:=xlPrevious).ColumnFAILUREA@X&+ȡǷУɹ־Ԫ񣬲ֵʼΪ0'xռ¼ʼΪ0 0 8" ʱִd ʼУ鰴ť¼ʱִ.ȷʼ Уرexcel $4ܵݶʧʧ 6ܰʾ$2 8d1qazN$NB@|kk.$N!b(|)ҳǩΪɫ   "ûвҵѧϢ޷У飡A@2'01qazN$NB@|k'ôУУ¼Ƿд$N!дϢ£A@b      '<"ִ һǿУ ĵԪĿ';6ִ һǿУ ĵԪΪϹĿ'''5"һǿУʱ¼Ԫ'9ǷΪЧ¼ 'tC¼УǰǷд';¼ԱǷд " z "$N%`!r'Oһбʶֵ'2=жforѭǷcallFunctionXQStart ûִĬϷ <ʶΪ -$'Gʽ14-3:25 :$'H6ʽ3:25ȡıʶвֳ֣кź͹ DJҪּϵҪУ飨ĬУ͵ԶУ   Y&+1ΪеһԪΪĬУ $:$'V*ȡıʶвֳ֣кź͹$'SԶʶ  $;$'cԶʶ͵ľֵ   gԱʶб $  " A@}ݱʶֵöӦķk  $;$'Pȡıʶв   WԱʶб $  " A@0k( eJ ʽ3:25$'QԶʶ  Pʶеڵǰ$;$'eԶʶ͵ľֵ   kԱʶб $  " A@ݱʶֵöӦķkd-ֻĬУʽ14$;$'Hȡıʶв   OԱʶб $  " A@0k(k   "$N%`( " 6ִ һǿУ ĵԪΪϹĿ     е һдȷ''8УʱдϢ A@b  'd   'Tÿһкϼеֵk  <,һؼֶȫ򽫸ɾ  x+ x 'x,"ϢеĸдϢɾ  j  j j  h$f%PB@Rr Ѹɾ  j  'j t'k k  x 6 ɾЧ $'  A@JB Ѹɾd8   A@JH Ѹɾk  x ˴Уɾ x:Чݣ֤У鶼ʧܼΪЧݣA@2k *дϢ鿴ϢA@2$N!b(| h$fB@Hd '&A@ &'%ִУظݷ,ûظǷҪɾЧ Уͨ!A@2.$N!b(|SUCCESSA@X:+ȡǷУɹ־Ԫ񣬲ֵʼΪ0 A65530$N%B%!' A@Td *ظݣ鿴ϢA@2$N!b(| h$fB@Hk` kX 1qazN$NB@1qazN$NB@1qazN$NB@o q-------------------------------------------------ظijһ------------------------------------------------@]] A65535 ^%B%!'2Scripting.Dictionary$. O8O  ^%B!r'>ȡѧ  %"ѧ໤֤ݽб   %-֤Ų  B@&#addһΪkeyڶΪvaluekk !'Sheet2$NG:G7BB@  !% !DG17B,qh.oXPAttribute 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).@1 s n;"jXQ 1, 2^, bm4h$c"1".D IV5 ToLeft`Golum$p'1:1`F*(Whath*", After:=[a1], SOchOrBdAxlBys1Dirp`>:=xlPrevio|us@8, "FAILU8RE"aL!<־Ԫ񣬲ֵʼ໯Ϊ0 ƞ 0FU `} isSaveB uttonvbOK ལʱִEE_c`ذť¼) ("`ȷr hexcel" & Chr(1`& "ܵݶʧʧ`1Can`@&ܰʾ") c"ŝ@ ? ST9TKTab@clor I:x -4142AiҳǩΪɫ d35startTitle +K d eûҵѧI޷模dQ%aQ!%gg`9QhXXXQ1writepLog + V`'"2\£?-> ׉}Fdi2 ToR atLeaOnefNэ= P>: һǿձ BOГH΀a?totalMoneyw&eyF "? %}"UR}ijs0ki`}eH[15/InE 'ǰQC0??9dcbԍԱ}-j 1,pu=9"b(j).@˵һc'%_is = $жfor@ѭ callFunc!XQSV S51/Zw 0p&QZ@ ' /T= St(o -o'14-3:25P޿ ":cQε#䄷AdP?IUBPd(S) 00s"ּϵQQ0͵U5O  "For m = LBound(bsType) + 1 To U *'+1ΪеһΪĬУ # %val@EntitySplit(m), ":") 'ȡıʶвкXź7HtRLowDJ(0? Զ=3v4"If iÀSXThen)'@>bGA1b;bBľn@F)H'ǀ8=callFunctionXQStar$t (n>1, i, j@sValidateCt 'C$ֵöӦķ&&NextEnd If!e! mi/aAYsA?= False YM5WCw"W? U U rSoSQ MKEG=?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().LockedJz 3= j}' !ŷǿq ĵԪΪ ϱpĿUatLeaOneNullsfA0|= 6?merrorMsgP@"" && "0\ݰArE"дȷ8"hasC= True@ 'eдϢOOwriteLo|g =S=^T+ /~!OntotalMo`neySu+ 'ÿһ@ϼO߿4?Q},c>1$ 'Aؼȫɾ isNullRowArr(`Num) = i $ |z + 1+'Ϣеĸɾ+PFor p@curMsg - isValidateCount To ,YSheets(msgName).8s(=).Delete '`Ѹq+pN`ext p$=J> F+hasErr[= InZEnd If :q0|Aʭ- 1 '_ ЧО+rowDataIDq)If D!hlen^ dŠ1 , )Elsehq V 3;qw&j6> 8>(~Box "˴Уbl" &ĠA8& "?ݣրСʧܼauΪ"[feTeF鿴AWorksc1).Tab.ColorIndex-`b672S`QctoJ `S` FaOcheckXQNew (1h'NotE `n 'ִA;7,ûք'ǷАҪဵą;3Cͨ!/!ı/-41427 setCellueXQ 2,A8, "SUCCESS" 'ȡAɹ־񣬲ֵʼ0Ϊ0V:rnap"Range("A65530").-(xlUpmI v pK Kna%FW2_2_2_2_2_2]2NAProtect Password:="1qaz '2).;A3 Sub '- !8ijһ  A(rADim myDic AsP Obj,KeyVarianIB4, var{|s/Active.Y/5]/ '*Set id0d = CreS ("Scripting.tionary"Me" = "O8"p>Oj@ ).valu>ѧaj aEach cara In 'Ա໤#nnSdP V<> ""> !W!Ye .EXxis@) 'XeԎ1Add, y 'add#һ@ΪkeyK4sSmy"=C$.srWith 54"!2W!G:G!ClearContentc0 &1Resiz  I  D `X  I> x I  0 `  I>  I   ` Ir  I  ` ` Ir @ I   ` ##Ir  I   `P Ir p I  (` &&Ir I  `  Ir @ 0`  Ir  `  Ir @ P`  Ir @ `  Ir @ `8 ""I XIX xIp ` ` ``````@ ` @ ` @ ` @ `@ ""Ir `I @ `  Ir @ P   h  0 0 @` `( 0% /(ՊZ$*\Rffff*0C5b1ba27d   B       (  B " 08@HP XB    p B 08@ n  B ,$" HH`   "  8P"h4  h  B   *          B    ( 8 @ H P X `   B   6( ` p x    |  8 B P X 0`       x @ `B x   ( x0  B  (08@ |H  B $8HPX`h |p  B (0f8 | X xB    B : 8 X` hpx  0 PB h p      .hB      .B    (B  & (D04x  ( 0B  & (0 8 X(` D4  (0Ppx B @H` h&x  "  $  "H p    >  P 4p         B X!`!x! !!!! !! "!! " <"H"P" X"`" h"B # #8# @#&P#x#### # #"# ## $# " $ H$ X$ `$ h$$$$$$ $>$ (%4H% % %% %% % 0& P&B h&p&x&&&&&&& & X' x'B '' ' ''' ' X( x(B (( ((((((( ( ) )B ))))**** * (* * *B *++(+8+@+H+P+X+ `+ , 0,B H, &P, $x, , ,&,*,"(-$P-x-(---. .0.8. P. 2h.."../  /(/@/8X/// /B (000H0&P0x0 0&00000D04 1X1h1p1x11 111111112222 2 (2 2 2B 2223(30383@3H3X3-----------------------------------------1 ,дϢʾ Ϣsheet--------------------------------------- ʱ0 Ϊʱ1 Ԫ] X Z n$N%`'\ \'d'ki-----------------------------------------2 Уѧ ҪΪ-------------------------------------------------------------ʽȷfalseʽȷtrue]H^[\u4e00-\ue863]{1,20}$'  r$'d'ki|-----------------------------------------3 УڸʽΪ2012-05-09(Ϊ)---------------------------------------` r$'zk]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]))))$"^((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]))))$'  r$'d'ki|-----------------------------------------3 УڸʽΪ2012-05-09(Ϊ)---------------------------------------]h^((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]))))$'  r$'d@'k0i(h-----------------------------------------4 У֤---------------------------------------Ϲ򷵻trueϹ򷵻false]790584216379058420Ȩ] 10X9876543200У $$''ȥո]H`x p  6)׶֤Ϊ,ΪͨУ'zk Gzj $$Gzj *[0-9X]Gzj   $' G 'j   $  '  ' $ .  $G'jiz-----------------------------------------У֤ -------------------------------------------------------------ʽȷfalseʽȷtrue]"^[\u4e00-\ue863a-z|A-Z|0-9]{1,18}$'  r$'d'kpih----------------------------------------5 -УѧУѧУʶ 42λһλΪֻx-------------------------------------------------------------ʽȷfalseʽȷtrue ]^[1-9]\d{40}[\dx]$'  r$'d8'k(i z----------------------------------------6 -У黧 -------------------------------------------------------------ʽȷfalseʽȷtrue](.^(\u519c\u6751)|(\u53bf\u9547)|(\u57ce\u5e02)$'  r$'d'kiu-----------------------------------------7 Уѧʱ-------------------------------------------------------------ʽȷfalseʽȷtrue@]'^(((19)|(20))\d{2})((0[0-9])|(1[0-2]))$'  r$'d'kiq-----------------------------------------7 У-------------------------------------------------------------ʽȷfalseʽȷtrue r ,ΪDZ'kzk]h^((19\d{2})|(2\d{3}))$'  r$'dh'kXiPq-----------------------------------------7 У·-------------------------------------------------------------ʽȷfalseʽȷtrue]^((0[0-9])|(1[0-2]))$'  r$'dP'k@i8v-----------------------------------------9 Уѧ-------------------------------------------------------------ʽȷfalseʽȷtrue]^\d{4}[0-7]\d{3}[0-3]\d{7}$'  r$'d'kiv-----------------------------------------10 У绰-------------------------------------------------------------ʽȷfalseʽȷtrue]^\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$'d@'k0i(v-----------------------------------------11 Уп-------------------------------------------------------------ʽȷfalseʽȷtrue0]^[1-9]\d{14,20}$'  r$'d( 'k i -----------------------------------------checkXn Уѧ磨2012-2013-------------------------------------------------------------ʽȷfalseʽȷtrue]8 ]P 1^(20\d{2}-20\d{2})|(19\d{2}-19\d{2})|(1999-2000)$'  r$ r-$'$$ 'd 'k d 'kp ih -----------------------------------------checkOption У鱸ע磨Сvalue2-------------------------------------------------------------ȲС200false 򷵻trueh >'zp kh >  'dH 'k8 i0 ------------------------------------------------------ȽϴС(Сڵڷtrue)----------------------------------------------------------------'value1value2false 򷵻true >X'> X' >  'Dd 'Dk i ------------------------------------------------------ȽϴС(Сڵڷtrue)-dec---------------------------------------------------------------'value1value2false 򷵻true >$4'> $4' >  'd'ki}------------------------------------------------------У鳤---------------------------------------------------------------0 ,$'' r$/ΪDZ'kzk ,-±0ʼֵΪָάõ± r$$4 r$$4'z@k8d ˵У̶ r$$4'zkki}------------------------------------------------------У--------------------------------------------------------------- ,$'' r$/ΪDZ'kzk r$& Ϊz r.e+Сzpkh ,-±0ʼֵΪָάõ± r$$4 r$$4'zkd ˵У̶ r$$4'zkxkpih------------------------------------------------------Уֳ(Number,ΪС0)---------------------------------------------------------------` ,$'' r$/ΪDZ'kPzHk@ r$% Ϊz r$4e% С0zk$'+󳤶$'.Сλ r.''' "˵ûС r$4' $$4'zkd С r r. $'DԪֵλ r r. $' $$4 $$4'zHk@k8i0------------------------------------------------------УֵΧ--------------------------------------------------------------- ,$'' r'z` kX r$) Ϊz0 r$4e) С0z k r$4$$4 r$4$$4'zki------------------------------------------------------Уֳ(Number,ΪҲΪСС0)--------------------------------------------------------------- ,$'' r$/ΪDZ'kxzpkh r$% Ϊz@ r$4e% С0zk$'+󳤶$'.Сλ r.''' "˵ûС r$4' $$4'z8k0d С r r. $'DԪֵλ r r. $' $$4 $$4'zpkhk`iX-----------------------------------------checkIsInt У鲻С0-------------------------------------------------------------ʽȷfalseʽȷtrue(] ^0|[1-9]\d*$'  r$'dP'k@i8-----------------------------------------checkIsNumber УΪNumber-------------------------------------------------------------ʽȷfalseʽȷtrue' r$'k@i8-----------------------------------------checkMoney У0-9999-------------------------------------------------------------ʽȷfalseʽȷtrue0]^(([1-9](\d{0,3})|0)|0)$'  r$'d 'ki-----------------------------------------checkMoneyTJ У0-9999Сһλ-------------------------------------------------------------ʽȷfalseʽȷtrue]8^([1-9]\d{0,7})$'  r$'d'ki-----------------------------------------checkPersonNum У׶԰һ------------------------------------------------------------ʽȷfalseʽȷtrueP]^(([1-9]\d{0,3}))$'  r$'d'ki-----------------------------------------checkIdNumLink У֤ԱͳûдǷһ------------------------------------------------------------ʽȷfalseʽȷtrue If colIndex = jhrIDColumn Then checkIdNumLink = True Exit Function End If]%Ա֤ǷӦ]$ں֤ǷӦ]ڵһγֵ±]"Ա,Ԫ֮ڵ]$ݺŽȡ]!,Ԫ֮ڵ]("ݺŽȡ]@X#]p%·]] $' $'  (ڶλΪΪ X  j$f,`dڶλΪżΪŮŮ X  j$f,`k $' $' $' -  -  X  j$f,`'i`}------------------------------------------------------У鳤--------------------------------------------------------------- ,$']^[\u4e00-\ue863]{1,100}$'' r$/ΪDZ'k8z0k( ,-±0ʼֵΪָάõ± r$$4 r$$4  r$'d'kxzpkhd ˵У̶ r$$4  r$'d'kzkki-----------------------------------------У鿼šѧšѧ -------------------------------------------------------------ʽȷfalseʽȷtrue]^[a-z|A-Z|0-9]{1,40}$'  r$'d'kiAttribute 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(vgDplreh @"^[\u4e00-\ue863]{1,20}$5@_@ CA(, aBW Wa kAl4Sa `׶e:,Ϊͨ1  c c! Len( <> 18"0 0 Notp er@ic(Mid, 1 7@ f%Like d"*AgX]_  For= 1 To 17CTqW۠0 1P1sps + ; Bi! * TNexts Mpod 1RPight)c, TEϥ: "?@OQO7SFZJLXʏ` =a-z|A-Z|18ϥckqGϥbw VXX/5!e3-ѧP0ʶ 42λһ0Qx?؏ckSchCodeO!40}[\dx]OC_fooo--6( _Xȷtrue Function checkFamType(valu e) Di`m reg0 = "^(\u519c\u6751)|3bf\ u95477ceFe02)$"ivIfCu( K, i Then%r nTxEls  &FaEnd If  '-%7 Уѧʱ;ʽjfS' RXDat((1920))\d{2})((0[P0-9] 12])5 `F `FP`QU_Year, fDArgsArrDG""Ũ @ 0 'ΪDZǿ" IExit G ?j{s {II|(23}G, ?0xG>$dGGz GMontht*D-o?-"9Jaৼ8-1-XJH-Y4}Y7]BZ 3!7})Q[.C-&$10ӵ఺8i_PPhoneNum?l\bi`(([38h4[57Ai55jk8}00p2[\dj-[2\d*[3mg)\boNoRq*I Ap11п2O?BaLnk=[1c14,20_2Т_^4oo3Xn@I磨2012-@3_pXn_kUxy sc2r0J2}p r01N9t990>0o_L2Split , "-"4q30R(1)H - 0)01= ۊh/olkp= ?"" OpCR9ע#СR~2_#P#b2001إx?٣} 122 1@4h ELe-@">c2!VL ?#Q5  qg`OȽ@ϴС() &! !ompa6r! #!CI n=1a#? value2 = CInt(h)  If" L1 > 2 0ThenPco mpareFahlse@E \T$ru -nds EFunctiol'-2ȽϴС(Сڵڷto)-deFc) 'ڂ2/f~@ 6 d Dec1,* 2-lC m_У鳤#]heckLen], faDArgsNArrESplit(, "," cQEb@""Tͣ (0) 0 'ΪDZ?O݁H eIfExit l`UBound #Á '±0ʼֵΪָά F4) > Mm(1)) AH(= 4'. '@˵\̶\s! Hs!? * @2aLGJRy#% c&b+@ v,Zb onj5((Not IsNumerikB)8JΪ>,InStrY".") <> OСoK.) KsKKKNk @p:Kg1K_=K|KKIKsK5- > K/G_qKQ0q](2ber,BL0~)}M14FI@MM .$ Q @ MeMfןM 2 CB> LLL max0Fp1) 'a&ցυDoubleqg2Vλ{ intqgth[Vq0doupEûЏ`RBpE`P (%_Xex?Jeu*_)?-c% xMid%A0v- ?1) 'Ԫλ douValue = Mid(v,, InStr"."@) + 1) If Len(int) <= CDec(functionArgsArr(1)) And-x-2-ThenvcheckNum1FalseExit FOEUIf '-2УʀֵΧ  F CbpaqLgNSplitJm, "," Z@"" mHTruPiTe\ɯNot Is}eric;)B 'ΪOwE@3§0СӼ0P>0̌#oח^/[b+ ^Y-^@ֳ(8ber,aҲcСʠ".) :cc[c,@  >c`:0)@ OΪDZZa8(tlQt?mo`nn? mm_bmapxInt(/f 'MQ*Douhble2@Tλ gthNN (,@1) DˀûГ kupE`P }}{x*O *Q\C`o h؏1) -hS be|:  6g O_^ Is> edcӯ?@ʽȷf#'Q5t+t5Dim reg>"^0|[1-9]\d*$n"pCQ(9, Ԉ+~H= ^/Jhiu;tn{Bª_/???ckj = 8/N t? --Money 0-9i?___ ++((+(\d{0,3})|0!_,k_,*H_,DJ_,owTJ=#tһλTJDD{0,7})$"  If regCheckFunc(`, value) ThencMoneyTJ = True8Els LFa:End 0If kti2o^'-%PersonNum У׶԰һ&P 'ʽȷ෵f_ t}a K(xDim"^(([1-9]\d{0,3})5Ň MIdbLinkc֤ԱͳûдǷһ.¿ii+(B, rowIndex, colB)Ck'njhrIDColumn'A‚ Ƀ Exit 9 @ !isGe(rRight As Boolean &'Y]ρV ӦF0Birt&h3]le ngth2Integer ':һγֵ±5 gV!String,Ԫ֮@61Žȡb |B;year, Variant 'amonth, day, i %arrE-1@OMid\17, 1[ g= H 8%A Mod 2` 1b@XλΪΪ[Sheepts(sBoB71).Cells(GsC#o) "ЛA E ,ż%PŮ?x?mn"Ů)$ ?'AC +H-1, 42BB5, 2A5+, " 0 + "-" +*ppw NBq}o^}𳤶ȏ V#zSpLebny, fArgsiArrSplit(y, ","8J~ ~[\u4e00-\ue863]{1,100} z7""\g4| (0*0C9'DZ7q:Kkeivl UBound@ 2 Ad0ʼֵΪָPάõfqpv) >= CDec=(1)) VA;<s (2Yϸ N$N?.~bY'˵=̶Q= {apCB& B@70/f^jquQR!šȧsŁ_///ckSegR^[a-z|A-Z|0րW4wW_"gB k6_gxME(6 LL V` X IX xIZ `\ b(`  id l`  In IX Ip  tX` 8  id ~0`   In IX IZ I  `   'In IX IZ  ` @ 2In `I IX IZ I  ` 8 GI XIn xIX IZ I  ` 0 EI PIr `  `  SI +( ` X jIn xI* i,`.  ` ( {Ir HI> hI@ @B J8 `  In  IF  T `HHk In  IX  Ip  Ir (  V ` h In  IF  X `Hk In  IX @ Ip ` Ir (   ` Ir  In  IX 8 Ip @B @Z @\ ` In  IX 8 Ip `>`^`` (X8  0 T@% 8P @T N@ @h @ @ @ @x @` @H @ ` @X N@0 @ @H @ @` @xx @` @H P  ՊZ$*\Rffff*0>5b1ba24b*\R1*#3c7*\R1*#12d*\R1*#121 B       B  B h p B ( 0@2` p  B 8 8@ $x 8 " pB x 8  $ $  HP xXB 4(0*X$ 8BP0h!  ( 0 8 @  B   4 $H  "p   "   .  0 0@ p  *   .  8 .H  x  0   6  0@6X 8 6 P`(x  0(0  f8  >&8 ` Xp h `*x j&P x ` (8P X Hp(x H0(x H(p` H(  &  `    H( H( H( H(  &  n `p  8( H(  &  b h       &X! ! ,!!!! f! X" x""" " 8"(" 6#(# x$ &$ $$$$ f$ P%(h% % T% &% &0&8& $P& &x&$X&$&&$ '$0' @'H' P' `'$th'$&'$ ( ( $ ((( 0(P( ^X( ("((@)&@) h)x) )))) b) 8*H*h* zp* &* + (+0+P+ fX+ +++ t+ &`, , ,,, b, 0- P-h-x--&. 0. @.H.P.p. ^x.. ./@/&X/ // //// ^/ H0 h0x00X0&0 1  1(101P1 ^X1 1 112T2&`2 2 2222 n2 @3 `3x3"33&@4 h4 x4444 j4  5 @5`5"p55&(6 P6`6h66 n6 7  7@7"P7x7&8 08 @8H8h8 Pp88888&9 9 9999 R9H:`:x:X:&: ; ;; ;@; bH; ;$;;@;&8<`< h<x<$<,<<<<<<= = j(= =="==&x> >>>H> ?L? `?h? p? &@ @@ H@ X@`@h@p@@ Z@ @A(A@0A&pA AAAAAA jB "pBBBB dB &0C XChCbpC hC ,@D pD &E 0E @EHE PE &F 8F HFPFXF`FF ^F F&G(G@0G&pG GG&GGGH ZH hH&HH@H&H I(I&0IXI`II ZI I,J8J@@J&J JJ,JJJK | K K$KK(K@L&PL xL L"LLLL |L hM MM@M&M N N (NHNPNpN |xN N$O8O@@O&O OO$OOOP dP P P@P&P Q0Q28QpQ xxQ Q6R.HRxRR( R2R( R1R( R2R( R1SSSJ0SSSSSS fSB  T (T<0TpT TT$T$TU U (U \U B 0V,PV 0V@V"V ^W 6xWWWWX0(XHXXXXXXXX X "Y Y .YB Z Z$ZB@Z Z Z Z Z Z ZZZ Z [ [ [ [B ["[ \0\8\ @\H\P\ X\8x\\2\\ ] (]8] @]H] P]`] F]]] ] ] *] ^ (^ ^ ^B ^_* _ 4P__ _B  `^(` vH` h` p` a (aB @a*Haxa aB b^b v8b Xb `bB c c "0c Xc8xc2cc d d 0d8d @d HdXd"xd0d d(de e(e L h8e&@ehepe xee eB  f(fVHff 8f f g:(g4hg$gg"ghhhxh-----------------------------------------УУдϢʾ ע----------------------------------------------------------- Ԫ] X Z ^%`'\ \'Vd('Vki--------------------------------------------д־ ¼ϢʾһϢ-------------------------------------------- d j h$f,` j 'jiX------------------------------------------------------ ȡָcellֵ-------------------------------------------------------------( X p n$N%`!r'li--------------------------------------------д־ ¼ϢúɫʾϢ-------------------------------------------- d'v d j h$f,` v j h$f%`%x!z(| j 'jii--------------------------------------------עʼУ飩-------------------------------------errorInfoעX 1Worksheets(sheetIndex).Unprotect Password:="1qaz"  X Z n$N%`B@ X Z n$N%`!(W ӻɫ X Z n$N%`!(Pii--------------------------------------------ɾעʼУ飩-------------------------------------01Worksheets(sheetIndex).Unprotect Password:="1qaz" X Z n$N%`B@ X  Z  X Z n$N%`!(|d  X Z n$N%`!(|kpihr---------------------------------------------ʼУ Ƿӻɾעõķ----------------------------  Уʧ X Z n$N%`!d жעΪ n X Z A@~V עd"Ϊգȥǰע n X ZA@N ע n X Z A@~k1 MsgBox "" & rowIndex & "" & errorMsgd :УɹжǷעУʧʱעȥ n X ZA@ ,#ȥո,ʾ XУ ZУַ"$4 "$4"а˿ոϵͳԶΪA@bd`kXkPiH----------------------------------------------------------------------------------------------------------------------------------y--------------------------------------------ݱʶöӦķ(ʼУ)-----------------------------------------------------------------------------------------------------------------------------------------------------------------------ѴϢдб X Z n$N%`'r  Z n$N%`'Iȡбͷ Ϊϲеıͷ  Z n$N%`' X e  Z n$N%`'k0'  checkLen*)ΪУ  $'checkLen'  checkNum*e-ΪNumberУ  $'checkNum'  checkVal*e-ΪֵУ  $'checkVal'  checkInt*e-ΪֵУ  $'checkInt'  checkTerm1e-"ǡ"Ϊ1' checkTerm'  checkYesNo1e/"ǡ"Ϊ1' checkYesNo' checkDiffName1e2ѼΪ1' checkDiffName' checkDiffCode1e2ѼΪ1' checkDiffCode' checkIDCardType1e4֤Ϊ1'checkIDCardType' checkSqyyName1e2ԭΪ1' checkSqyyName'  checkYear1e. У1' checkYear'  checkSpLen*e0ΪУ  $' checkSpLen'kP _=================================1 ִеķǿУ==========================================ѴϢдб checkNullKT n X Z$'  X е Ϊգ'')УʱдϢ A@bRMsgBox "" & rgold.Row & "е" & Chr(10) & titleMsg & "Ϊգ"k0 n  X Z A@'a=================================2 ִѧУ========================================== checkNameKT n X ZA@@ȥոķ X Z n$N%`!r'r r$'  X е ;дȷΪ֣ȴ1ܳ20ַ''%УʱдϢ A@b  'k` n  X Z A@'Z================================= ִеijУ==========================================checkLenKT r $'  ,$'$ ` ΪDZΪ̶ȹ X е .дȷΪաд򳤶ȱΪ$ λ'$ ed ΪDZΪȷΧ X е 4дȷΪաд򳤶ȱڵ$ λҲ$ λ'$ ed ΪDZΪ̶ȹ X е &дȷΪգҳȱΪ$ λ'$ ed ΪDZΪȷΧ X е ,дȷΪգҳȱڵ$ λҲ$ λ'kH '0УʱдϢ A@bk n  X Z A@'Z================================= ִеijУ========================================== checkSpLenKT r $'  ,$'$ ` ΪDZΪ̶ȹ X е .дȷΪաд򳤶ȱΪ$&λֻΪַ֣'$ ed ΪDZΪȷΧ X е 4дȷΪաд򳤶ȱڵ$ λҲ$&λֻΪַ֣'$ ed ΪDZΪ̶ȹ X е &дȷΪգҳȱΪ$&λֻΪַ֣'$ ed ΪDZΪȷΧ X е ,дȷΪգҳȱڵ$ λҲ$&λֻΪַ֣'kx'0УʱдϢ A@bk8 n  X Z A@'h================================= ִеijУ飨Numberͣ==========================================checkNumKT r $'  ,$'$@ ΪDZΪ̶ȹ X е GдȷΪգдΪ֣0λȲ$λСλ$ λ'$ ed ΪDZΪ̶ȹ X е ?дȷΪգұΪ֣0λȲ$λСλ$ λ'kh'0УʱдϢ A@bk( n  X Z A@'[=================================ִֵΧУ==========================================ѴϢдбcheckValKT r $'  ,$' X е $дȷΪ֣ڵ$ Ҳ$''-УʱдϢ A@b& isValidateCount = isValidateCount + 1k8 n  X Z A@'_=================================ִеΪֵУ==========================================ѴϢдбcheckIntKT r $'  ,$'$@ ΪDZΪ̶ȹ X е 8дȷΪգдΪڵ$ҳȲ$ λ'$eEΪΪ̶ X е 0дȷΪգұΪڵ$ҳȲ$ λ'k!'0УʱдϢ A@bk@! n  X Z A@'`================================= ִе֤У========================================== checkSfzjhKT n X$l'S ȡд  X е &дȷ֤Ϊգ''0УʱдϢ A@bd  ֤ r Z$'O ֤У :֤У X е *дȷΪѧ֤ţ''4УʱдϢ A@b  'kd r$'  X е EдȷΪգҳȱڵ1λҲ18λ''4УʱдϢ A@bkkk n  X Z A@'X================================= ִ֤У================================== checkZjlxKT checkZjlx r1$'  X е дȷ''(УʱдϢ A@bd checkZjlx n X ZA@kX n  X Z A@'\================================= ִѧŵУ==========================================checkXJHKT r0, 1, 50$'  X е KдȷΪգΪճȱڵ1λҲ50λ''0УʱдϢ A@bk n  X Z A@'`================================= ִѧϢIDУ==========================================checkXJHKT r$'  X е EдȷΪգҳȱڵ1λҲ50λ''0УʱдϢ A@bk` n  X Z A@'[=================================ִпУ==========================================ѴϢдб checkBankKT r$'  X е $дȷΪ֣ڵ$ Ҳ$''-УʱдϢ A@bk n  X Z A@'W=================================ִ꼶У========================================== checkYearKT checkYear r$'  X е дȷ''(УʱдϢ A@bdh checkYear n X ZA@k@ n  X Z A@'W=================================ִѧУ==========================================ѴϢдбcheckXnKT r$'  X е )дȷʽ2012-2013ȣ''-УʱдϢ A@bk n  X Z A@'W=================================ִ·У==========================================ѴϢдб checkMonthKT r$'  X е &дȷʽ0112ȣ''-УʱдϢ A@bkX n  X Z A@'g=================================3 ִеУ(DZ)==========================================ѴϢдб checkDateKT r$' 2Уʧ X е дȷдʽΪ"$4 xxxx-xx-xx"$4 2013-02-21''-УʱдϢ A@bkx n  X Z A@'c=================================ִеУ飨==========================================ѴϢдбcheckDateNecessaryKT& r$' 2Уʧ X е дȷдʽΪ"$4 xxxx-xx-xx"$4 2013-12-21''-УʱдϢ A@bk n  X Z A@'g=================================ִеijУ飨==========================================ѴϢдб checkBirthdayKT! r$' 2Уʧ X е дȷдʽΪ"$4 xxxx-xx-xx"$4 2013-12-21''-УʱдϢ A@bk n  X Z A@'J=================================10 У绰====================== checkPhoneKT r$'  X е дȷдʽΪ"$4-̶绰 ֻ"$4 ''%УʱдϢ A@bk8 n  X Z A@'L=================================checkOption У鱸ע ====================== checkOptionKT rB$'  X е )дȷȲܳ200ַ''%УʱдϢ A@bk n  X Z A@'\================================= ִ϶ѼУ================================== checkDiffNameKT checkDiffName r $'  X е дȷ''(УʱдϢ' A@bd checkDiffName n X ZA@ r$1ͨУֵΪ'd 'k k n  X Z A@'d================================= ִ϶У(DZ)==========================================checkIdentityDateKT% r$' 2Уʧ X е дȷдʽΪ"$4xxxxxxxx"$4 20130221''-УʱдϢ A@b'd@  r$X$϶ȼΪգ϶Ϊլ'  r$e](϶ȼƲΪգ϶ڲΪ'd X е vдȷ롰Ѽ϶ơͬʱΪգͬʱΪͬʱͨУ飬顰Ѽ϶ơǷͨУ''0УʱдϢ' A@b'kk n  X Z A@'T================================= ִУ==================================checkMZKTcheckMZ r$'  X е дȷ''(УʱдϢ A@bdPcheckMZ n X ZA@k( n  X Z A@'d================================= ִ϶ԭУ(DZ)==========================================checkIdentityReasonKT'0,1,30' r $'  X е 5дȷȱڵ1λҲ30λ''0УʱдϢ A@bd   r$r1϶ȼΪգ϶Ϊ,϶ԭΪ   r$ew8϶ȼƲΪգ϶ڲΪգ϶ԭΪ   r$e X е dдȷ롰Ѽ϶ơ϶ʱ䡱ͬʱΪգͬʱΪͬʱͨУ飬''0УʱдϢ A@b'd X е дȷ롰Ѽ϶ơ϶ʱ䡱ͬʱΪգͬʱΪͬʱͨУ飬顰Ѽ϶ơ϶ʱ䡱ǷͨУ''0УʱдϢ A@b'kEkE n  X Z A@'X================================= ִ֤У==================================checkIDCardTypeKTcheckIDCardType r $'  X е дȷ''(УʱдϢ A@bdPDcheckIDCardType n X ZA@k D n  X Z A@'T================================= ִвмУ==================================checkDisableTypeKTcheckDisableType r $'  X е дȷ''(УʱдϢ A@bdBcheckDisableType n X ZA@kB n  X Z A@'T================================= ִвмУ==================================checkFamilyIncomeTypeKTcheckFamilyIncomeType r $'  X е дȷ''(УʱдϢ A@bd@AcheckFamilyIncomeType n X ZA@kA n  X Z A@'v=================================14 checkGender ִǷΪСŮУ--================================== checkGenderKT checkGender r1$' '-ԱдУ֤Ź X е дȷ''(УʱдϢ A@bdp? checkGender n X ZA@k@? n  X Z A@'u=================================14 checkYesNo ִǷΪǡУ--================================== checkYesNoKT checkYesNo r $'  X е дȷ''(УʱдϢ A@bd= checkYesNo n X ZA@k= n  X Z A@'u=================================14 checkYesNo ִǷΪǡУ--================================== checkSqyyNameKT checkSqyyName r $'  X е дȷ''(УʱдϢ A@bd@< checkSqyyName n X ZA@k< n  X Z A@']=================================checkTerm ִѧУ--================================== checkTermKT checkTerm r $ X е дȷ''(УʱдϢ A@bk: n checkTerm r $ X Z A@'r=================================checkAtLeastOneNNull ִһΪǿ--==================================checkAtLeastOneNNullKT  'A"ִ һǿУ ĵԪĿ r$ r=Ϲ  r ' Z KTF  r ' KTF  r ' KTF  r ' KTF  r 'n8dϹ  'F6ִ һǿУ ĵԪΪϹĿ    'k`8'nP8iH8_--------------------------------------------ʽ-------------------------------------]pVBSCRIPT.REGEXP$.7RegExΪʽ (4 ȫֿvba\ת  ( .ʽ ( 5ǷִСд r %'3 ִ.i6-----------------------------------------------------------° Уظ˵Ѿûиʽ------------------------------------------------------------V-----------------------------------------------------------1ѧ׶ڱڲ(sheetѧ׶ A65535 $f%B%!'*cna = getTotalColumnCount(sheetIndexValue) h$f!`B@1&ÿУظʱʱѴϢsheet,'jϢ¼ʼX==============================ѧ׶ڱڲ==================================0ðÿԪغ֮ǰнбȽ      $f%`' "   "  $f%`'$  $.ѧͬ˵ظݹ " еݺ͵ ֤ظ!!!!' A@b*ѴϢ'&k03(3 3i3-----------------------------------------------------------һ ֵȡֵ------------------------------------------------------------ֵҵֵڵлkeyWord ҵĹؼ'kbn л ֵΪ rowrow'(]the find result object *2 64 :8 A1:A65535 n$N%B%0.. . ,row .!'(d@1 .!<'(k(1k 1i1------------------------------------------------------ ִڹУ(Ϊ)-------------------------------------------------------------value value1 cellУ鲻ȷfalseУȷtrue @0˵ΪDZ >$'z/k/k/]'Dijһļ¼ A65535 H$f%B%!'FB' H rrow$('B=ȡ  B F  H$f%` r D 'Dd.y.k.  " B B D  " H$f%`X >X LжϹǷcell'y(.k . "#ʱcountĿΪùеĿi------------------------------------------------------- ִɾijһвexcelܱģ-------------------------------------------------------------sheetIndex rowNum к1qazN n$NB@L F n$N%PB@R/ Ѹɾ- Worksheets(sheetIndex).Protect Password:=123ip,------------------------------------------------------ ָcellֵ-------------------------------------------------------------8 1qazN n$NB@L r X p n$N%`(ri+------------------------------------------------------ ִɾijһвexcelûб-------------------------------------------------------------sheetIndex rowNum к F n$N%PB@R/ Ѹɾi*------------------------------------------------------ ָcellֵ------------------------------------------------------------- 1qazN n$NB@L r X p n$N%`(ri)------------------------------------------------------ ݴеֵǰʱѾͨУ飩------------------------------------------------------------- ]X p  X p n$f%`!rX '\'Dijһļ¼ A65535 H$f%B%!'FF H rrow$('BAȡ  B F  H$f%` r D 'Dd'y'k'  " B B D  " H$f%`!rX '> > \X 1жϹǷcell " H$f%`!r'Z ZX X p \ n$f%`(ryd& >d& X p \ n$f%`(rkh&k`& "iH&------------------------------------------------------ ȥcellеĿո------------------------------------------------------------- ]X Ԫ]p  3Blength1ʾcellԭijȣlength2ʾִȥոַ'ĬΪûȥո2 Worksheets(sheetIndex).Unprotect Password:="1qaz" X p n$N%`!r'> >'^ ^Gzj*"ԪΪգȥո > '`%length2Ϊոһγֵλ `ַո > $b'> >X X p n$N%`(r'k#i#ESheets(sheetIndex).Cells(rowIndex, colIndex + columnPlus).value = "0"#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 ȡ AֵLJpHDgetBCountXQ(sADʴ A?WorksHEQy.vA`%2GúɫCG3 GRedVHnLen EKzKRcR.Characters(1, ).F].Color73?VJxx&!ʼs+#` errafoåaddCommwXQCVUů,  0™'TUnprotect Password:="1qa>z e\N.A ( I0rior#=<65 535 '1ɫ>% d/.Visi1 6K YesNo -k2 ? DiffNameѼa?%D~ CodslA! 'HBIDC0ardTpM֤ xo(/  kSqyyԭ _ _ "] e? ? kYearZ?MA_ _ ]  :iSpiiBE\ V11j BLvSelect Case =Q)1 ִǿ1?OC 3~N8ulldxMethodXQ7Required Nod3"@"" &Ǝ"xtitleдȷ"ΪաB"`ΪA<1)λ0+El4seuO2]OA+ΧOex!'''ڵ3v(Ҳ謹1-2?-%,?-= 1T`jT?-TTTT &S "SeS&SSf{F{&R`'R?,IiahasE!@ 'BaʱдPOρ d͏| || c| } }-{}g|Sp} G{/?   beginC_comme]sheetDNi(, isForh '= ִЃcA=Case ~"BTJ@DHMB((, "1"4mk>55?y& ?y2y1}/1ww\o0O!LsetCodz, )'w8&,U-ZZ-/qO-*B-ѧ஺ŵ- -XJH-EJ-Len"0, 1, 50O-% O..O/I!c#ccc50c 22222%]_._._._.O.*.ID..d\. .S9[л.\....??0- ---/-------:֟+-)п'pϢдб Case "checkBank" thMethodXQ = T(value)`If Not`@Then2;errorMsgk"" & rowIndex "еtitle-& "дȷ֣@ڵӂ'functionArgsArr(0),Ҳ+1ÆzhasEcaTrue 'Уʱ writ`eLog 'End If@beginCA_comment sheet\,o,columnD 'isForB '=ִ꼶K À5Yearhҳ0DMB(B, ¶, 1H@B?XN\ ElseIc set*Codd+KE{IS W _Xc~kE_X XY==YѧY\9 хXnO]\Xn"[cʽ@2012-3ȣ^"__C__JUU8‡_'*·ݟ*?{*0hYMonth**P-*EtX@?\X9?& ?7*0112*}**KI*V*UR]*O'3 UA+(DZ)+++Date" CPo,`,Birthday,v, , 'ʧYoOO/H.!Chr(34rx-xx  ᭁ[-0\10 000 j0000000?,ٛ00ѩ_00 0NecessaryO1r CO1H1&1(11@1 _V_?_$1113-1 111L writeLog error`Msg 0E nd If|beginCheck_comment sheetIn@dex, c2MethodXQ, rowolu mn ~isFor = True '=ִеijУ<4ѴϢдб@Case "qBirthday"| ' jNecessary(value)#@If Not Then '焹 ~ʧ$%^#"" &i"AS Otitleдȷ@ʽΪA C@hr(34) x1-xx  2013-12-21@"+h8asE+ 'yʱn\(J10 %绰pSb'(\Pphone3ZNumvYvX,TTT-̶# $VTSSRQP???LEOptionBQ౸ע P&CQ㣣P, 66?Ъ_Q_Q_QȲ200ַKK % %c, c ^ %!_# a϶ѼqO&GODiffxNam/PSoP DMB(, }@, funcA0A8rgs_)B)XQ~ORC |x|||?Nt(_x# sysaicultyGradBeFlag 0uR_ElsG E}setCod p c TriuoQ"!ͨa(ֵΪi 1Y{2/@ A /B/B/B/B??Foh>&Bu(ǁ)o{BId`ityDatexOC@CĿAACsomsgQE"q1S02?> GGG D DyiPntifJ-808i>< A/EQnܼn!E 1a-/F ? indentifyDateFlag = 1  DElseIf sysDifficultyGradeNam2 And Trim(value) <> "" Then '϶ƲΪգ 2,errorMs"" & rowIx"еʀ title& "дȷ롰`Ѽoxͬ2|zͨУт!PǷ"ihasEA5@xTrue 'ʱdдϢcheckMet hodXQ@Fa@ writeLog W x0 2EIfbeginCA6_comm sheet}, <,`olumnD W6isForD_ '= ִÀj^ = lK[~]ck]:|]Y]_kH]FamilyIn@y^zo^_-_o2_߼߼ ߼߼ ߼_ʼP._R|ۿ_Y14%iGerǷС Ů`--01t3P =Z=`0"1"_/0XQ _D)IdNumC9sԱ𱇣֤;4____Y4__4O-46bF5ex5'eeJ5  ϔ05YesN&o@555~5g"5 5aH5f@_6_6t11111f* f//y/e///G////oreTe/*/?//?/eSqyyName/ e/0/0@Ofr/0/0/0/0/0?j/0/0/0*,0,rMsg 0ElsesetDMBCode "checkSqyyName", sheetIndex, rowcolumnnd If@beginCg_comment eMethodXQt, erroisFor = Tru{'=!9TermִѧУP--= rC,as'"If` Not ;(, value, functionArgs) Then%<"" &j"е@t0itleдȷÔ,hasE]DV@ 'Iд*writeLogpE|UAtLeastOneNNullTһΪpǿ: 9a#ACou@p= + 1 ' !A> ĵԪ=\"\Money(Z) A:B <> 0Z 'aG Ϲ GPtotanl Q+CgSelect tޘ m"baojiaoC:1 Sum-, huoshic _ Bzhusu?L# others?l# _ ATsJ 'e?f =pG>6>>>Ϊe@A7c+ h+ " J"`~u Ft '-ʽo-  reg[B(})8DimaEX As0 ObjISet= Create("VBSCRIPT.RE@GEXP")q'RegExΪ8G EX.GlobalpF~'ȫֿ''vba\תPattern RIgnoreB8= FaǷִСд3TestgGB.phin#$O  ° 4˵Ѿûpt 1ѧڲ -B}SameXQNew(Wp2) 'w(n*aS!s:.Range("A65535").P(xlUp).R$ow'cge)U>`Exit 2@e%7ifLData Count 0 'ijһa(ļ¼CNum`Szs(AreagfA (xlUp@jow 'E HF/ -Ul $0,#e) '>CFor i % To @ 1C`Fs(i,> 3b>r'+ (p#5o2a4 i'j.5 +Z c -i DC(j, 3)MB#Y) 'ж(dǷf'&A eSbS)Aj 'ʱcAQĿΪЃw ]OEbHɾ.вexܱF1` ' кňsdeleteP\h,*Ejv).UnprotaoPassw`|:="1qaz"obs().D 'Ѱ!'rA}).P123_ c'ֵ?(setgo$Z/fow, ,?B (/((((Q(et@@?,t).(#(pW/BδA֐]0ư>Σǰʱ1Ѿͨ˱)?Code%bW8T<, c 2QL2p|y,HC=  S]___@a[B=? {9Q?~as* Count = 8+ 1! ElseEx@it For Vnd If&Next i` jjrowData To  +- value1Str(Sheets(Areas Index).Cells(j, 3).0)xIf %cV.) Then 'жϹǷെȏ'+code#ۀQO2O& !nv, col +umnPlus,JA.qB}AIP""M2'2"0"S)""Ej Function '-2 ȥâĿո D  removeSpaceXQ(gN,asMIDimeiAs ring 'Ah'7length1 Int@eger, c2 h 'ʾ#ԭij`ȣ"!ַ' cFa`[ 'ĬΪûF' Wor k!s!).Unprotect Password:="1qazDƋtxd Lxen( /p'0yM '1Ϊգ@%X$c 2 Ina , " " )12һγλÇf2 <> 3A5'%g ReplQ"E+L ETru%|+zRoot EntryDcuWorkbookCompObj2h_VBA_PROJECT_CUR"1+PrintForm*f&CompObjaoVBFrameVBA__SRP_0(JXfY__SRP_1 __SRP_4~__SRP_5 PrintForm __SRP_2 h`!__SRP_33__SRP_87D__SRP_9'A__SRP_6E! _VBA_PROJECTy"__SRP_7vdir ]SbpSȉ  ;N z^S@ShowFormThisWorkbooke !hQpe B|__SRP_10w__SRP_11__SRP_fA]wQQpe __SRP_b"Dj__SRP_c$FSheet1Mi__SRP_d%kj__SRP_emSheet5#__SRP_a!Sheet6&PROJECT PROJECTwmShowForm)-f&CompObj./ao,VBFrameDocumentSummaryInformation8SummaryInformation(0Ole  FMicrosoft Excel 2003 Biff8Excel.Sheet.89q }t  Microsoft Forms 2.0 Embedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} PrintForm Caption = "UserForm1" ClientHeight = 3180 ClientLeft = 45 ClientTop = 375 ClientWidth = 4710 StartUpPosition = 1 ' End rU@@@~~~r   rowIndex columnIndexcontent sheetIndexcolIndex errorInfo checkMethoderrorMsgtypeValisValidateCountregvalue sheetIndex2keyWordkbnvalue1flagrowNum Q1 Q0TargetCancel Qq,PSaveAsUIIDNumberfunctionArgsArrvalue2 functionArgsIdNumNrU@@@@~xbrU@@@'b^LeʘxME(SPSSS0{1680EE36-33AD-4AFE-87D0-4FE373507221}{5E5E3BDC-9005-439F-8638-E65246908664}x8 0%h8%8pՊZxAttribute VB_Name = "PrintForm" " Bas0{1680EE36-33AD-4AFE-87D0-4FE373507221}{5E5E3BDC-9005-439F-8638-E65246908664} dGlobalSpaco False Cr@eatablPredeclaDIdTru BE`xpose0TemplateDerivCus tomizDrU@@@8`8a`brU@@@8 `q`1aHi$hrU@@@xX`1CbrU@@@~x a * $HiHiHi( HiHiX(Hi0 Hi0Hi0HiHiHi8Hi HiJgg^Zgv(x ZHHg0@&HHi Jgg^Zgv(x ZHHg0@&HHi (Hi  a$h  "a &o "a  *~  &o  .  . $h   "a  0   &o  $h  *~ $h  *~ !*~ $ &oVrU@@@P`OO@`PX1` 1aOOO@`P`1 `1OOOOX ` 1OOOhQ `1OOOOOhA`!1AOOOOOP`qOO@1 `OX1 ` 1X1 ` !AOOOPQ `1aOO` `1aOOOOPq`1aOO``1aOOOO`q!`1aOOOOXA#` 1aOOObY0* pHd VBAProject4@j = r ՊZ J< rstdole>stdole h%^*\G{00020430-C 0046}#2.0#0#C:\Windows\Syst em32\e2.tlb#OLE Automation`EOffDicEOficEE2DF8D04C-5BFA-101B-BDE5EAAC42Egram Files\CommonMicrosoft Shared\OFFICE15\MSO.0DLL#M 1@5.0 Ob LibraryKMSForms>SFrms3D452EE1-E08F`A-8-02608C@4D0BB4 SINDOWS\sSFM20L'B _&/;"1jIqAHq00}#:0Bq# 50 A122AF265-4027-477C-B7E4-C100DD323ADC6Users\lenovo\AppData\Local\Tem`p\VBEb7.xexdc` X )@x%i.  % %<H %xՊZ*\R1*#278$*\Rffff*0?5b1ba24b`  " &  HX`p xڵԪʱ Continue? DHi$2 F1A@2k 123A@4oxAttribute VB_Name = "She@et1" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2'ڵԪʱ P$( Sub Works_BeforeDoueClicka(ByVal Target As Range, @CancelBoolean)  If MsgBox("Continue?", vbYesNo, "Hi") Then3  " End If CDec23n@48CrU@@@ xbrU@@80 "--'-1.a.+,A,+/`q,Q, `ihggZ""p ""PxOOpOX@O(OOOOhPO8 O( $xpX(hP8g ?g gggg8pX(hP8x`$h $h XZh#p=q|{KpB} F$Xm oI f$FQx$Xm oI f$FQ=q|{KpB}ME(SLSS6"N0{00020820-0000-0000-C000-000000000046} 0%@p%(%Hx@x8ՊZ$*\Rffff*0@5b1ba24b` xAttribute VB_Name = "She@et5" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2 rU@@@8 p*!+q`1aDZ#pTzD:( FF$eExF$eETzD:(ME(SLSS6"N0{00020820-0000-0000-C000-000000000046} 0%@p%H%Hx@x8ՊZ$*\Rffff*0A5b1ba24b`xAttribute VB_Name = "She@et6" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2ID="{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="EBE9477E3682368232863286" DPB="D6D47A6B8EBD64DA64DA9B2665DAB4BB6492A90016BC2D43B63C85EF470A765CFCCC2028CCA573" GC="C1C36D6E6E6E6E91" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisWorkbook=0, 0, 0, 0, C Sheet1=0, 0, 0, 0, C ߺ=26, 26, 794, 450, Z =0, 0, 0, 0, C У麯=0, 0, 0, 0, C =0, 0, 0, 0, C ShowForm=0, 0, 0, 0, C, 25, 25, 1146, 486, C ӡԤ=0, 0, 0, 0, C PrintForm=0, 0, 0, 0, C, 50, 50, 1171, 511, C Sheet5=0, 0, 0, 0, C Sheet6=0, 0, 0, 0, C ThisWorkbookThisWorkbookSheet1Sheet1ߺ]wQQpeXfУ麯!hQpe;N z^ShowFormShowFormӡԤSbpSȉPrintFormPrintFormSheet5Sheet5Sheet6Sheet6 }t  Microsoft Forms 2.0 Embedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} ShowForm Caption = "UserForm1" ClientHeight = 3180 ClientLeft = 45 ClientTop = 375 ClientWidth = 4710 StartUpPosition = 1 ' End ՜.+,0HP X`hp x  УרƼͥϢ¼ Ϣ  Oh+'0@HTd | lenovoMicrosoft Excel@&@0 !"#$%&'()*+,-./01245689:;<=>?@BCDFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuwxyz{|}~      !"#$%&'()*+,-./0123456789:;<=>?@BCEGHIJKLNOPQRSTUVWXYZ[\]^_`abcdefghijlnopqrstuvwxyz{|}~  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIKLMNOPQRSTUVWXZ[\]^_`abcdefgijklmnopqrstuvwxz{|}~      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUWXYZ[\]^_`abdefghijklmnopqrstuvwxyz{|}~