ࡱ> 6wn:  !"#$%&'()*+,-./012345<89Jv<=>?@ABCDEFGHIKMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstu)yz{|}~Root Entry F N"7@fWorkbookgETExtData._VBA_PROJECT_CUR""?_?_  \php Ba= ThisWorkbook=[ #8X@"1[SO1[SO1[SO1[SO1[SO1[SO1[SO1[SO1Arial1@[SO1[SO1 [SO1 [SO1[SO10[SO1@[SO1[SO1>[SO14[SO1[SO1?[SO1>[SO1 [SO1[SO1 [SO1h>[SO1[SO1,>[SO1>[SO1<[SO14[SO1 [SO1Arial1[SO1 [SO1[SO1[SO+""#,##0;""\-#,##05""#,##0;[Red]""\-#,##07""#,##0.00;""\-#,##0.00A""#,##0.00;[Red]""\-#,##0.00i*2_ ""* #,##0_ ;_ ""* \-#,##0_ ;_ ""* "-"_ ;_ @_ W))_ * #,##0_ ;_ * \-#,##0_ ;_ * "-"_ ;_ @_ y,:_ ""* #,##0.00_ ;_ ""* \-#,##0.00_ ;_ ""* "-"??_ ;_ @_ g+1_ * #,##0.00_ ;_ * \-#,##0.00_ ;_ * "-"??_ ;_ @_ /\$#,##0_);\(\$#,##0\)9\$#,##0_);[Red]\(\$#,##0\);\$#,##0.00_);\(\$#,##0.00\)E \$#,##0.00_);[Red]\(\$#,##0.00\)e0_-""* #,##0_-;\-""* #,##0_-;_-""* "-"_-;_-@_-u8_-""* #,##0.00_-;\-""* #,##0.00_-;_-""* "-"??_-;_-@_-S'_-* #,##0_-;\-* #,##0_-;_-* "-"_-;_-@_-c/_-* #,##0.00_-;\-* #,##0.00_-;_-* "-"??_-;_-@_-                 *  /    -                  P P  1    $     ff7 ! /   ` "a * +   1   -   9  6 .   1 ,  1  5 /  4  @ @  ""@ @ ""@ @  @ @  @ @  !@ @ 1@ @ @ @ 1 1@   1  1! 1 1 1 1@ @ 1 1@ @  1  1  1@  1|@  1@  1 1 1 1  x@ @ 7 1|@ @ 7  1|7  x@ @ ,  1!@ @  1<@ @  1@ @ 1 1 1 1@ @ 1 1 1 1d@   @ @ ,  ,  1!<@ @ 1!@ @ 1! 1!  1!@ @ 1 1 1 8^ĉ!20% - :_eW[r 32&20% - :_eW[r 3 eQeQ!40% - :_eW[r 32'40% - :_eW[r 3]]!60% - :_eW[r 32(60% - :_eW[r 3  lʑ lʑ!60% - :_eW[r 22$60% - :_eW[r 2 h 4h 4 fJTe,g fJTe,g hh!8^ĉ 12"ʑ'`e,g 5ʑ'`e,g #h 1h 1 $h 2h 2!%60% - :_eW[r 12 60% - :_eW[r 1 &h 3h 3!'60% - :_eW[r 42,60% - :_eW[r 4 (QQ ){{*hgUSCQ60% - :_eW[r 52060% - :_eW[r 5?:_eW[r 6&1:_eW[r 6!@40% - :_eW[r 62340% - :_eW[r 6!A60% - :_eW[r 62460% - :_eW[r 6 B8^ĉ 2ccXTableStyleMedium9PivotStyleLight16`; ؚ!h[^~NmOo`U_eQQNxheOo`VV4XP($MOtC A@-KmՋ@b g!hĉRv^SbpSOo`!  =g checkName checkZjlx checkSfzjh checkYesNocheckDisableType checkNum0,6,2checkFamilyIncomeTypecheckLen0,1,100checkLen0,1,60 checkInt0,2,0checkSpLen0,1,100checkLen0,1,40 checkDiffNamecheckIdentityDatecheckIdentityReason checkLen0,1,33laRte!jgv#1SkXQ /f  &T ^_kXy f[!h*g8h[nZi gsQ`Qe N؞kXQ &T ^:Nzz

SkX ƉRku 0 ,TRku 0 zfRku 0 vQNku -NvNy0^_kXy0 ,gN/f&Tku ykX /f Ry:N_kX00kXQ /f  &T ^_kXy f[!h*g8h[nZi gsQ`Qe N؞kXQ &T ^:Nzz

k ^_kXy" kXQf[u[^NSpe 'YN0 NNSpe NǏ99 OY 6 ^_kXy  % kXQf[u[^RRRNSpe 'YN0 NNSpe NǏ99 OY 2 ^_kXy " kXQf[u[^NSpe 'YN0 NNSpe NǏ99 OY 2 ^_kXy  $kXQf[u[^a{QNSpe 'YN0 NNSpe NǏ99 OY 2 ^_kXy&kXQvQ[NNq_T͑'YFO*g(WRv[^~NmOo` ^ NǏ100*NW[&{0^_kXy(kXQQQgyrVO{Q0QQgNOO7b0^chzaSvsQOo` Q[ NǏ40*NW[&{0^_kXykXQ[^mSu`wQSO`Qc Q[ NǏ40*NW[&{0^_kXyTyYgkXQ R [e 0 [SV _N_{ TekXQN TeǏ!h0kXQ[vVI{~ S/f yr+RV  V  N,V  NV -NvvQ-NN*N ^_kXyDyYgkXQ R [V~+R Ty 0 [SV _N_{ TekXQN TeǏ!h0kXQVI{~[veg kS)Ro` gN8RS~)R0hy0ZSi_6eeQ~FU0RSNSNNy iN0{QkN0R]Ncbd_b,gTv6eeQ a{Q90b(vb){Q9 LN6eeQ vQN^S_eQ[^v6eeQ checkZjlxE\lNQ[XuQeLr^yO /nyr:Sbgq/Nf oyr:Sbgq/Nf S~nE\leg_'YFLXY8lENE\OOAbgqB7bSZ #    %NM  dMbP?_*+%z&ffffff?'ffffff?(?)?" d333333?333333?& cAU} UQ} UR} Q} 7Q} Q} UQ} Q} Q} Q} Q} Q} Q} `"Q} Q} Q} Q} Q} Q} U!Q} qQ} Q} Q} Q} Q} S} *S} !!qQ} ""Q} ##UQ} $$UQ} %%Q} &&Q} ')qQ} **Q} ++UQ} ,,UQ} -e Q} fq Q} rr Q} sv`Q} ww` Q} x| Q} }}Q} ~~UQ}  Q} Q} Q} Q} 7Q} Q} Q}  Q MMNMMMOrPz@ z@ T U K V K V V V K V V V V V V V V K V V V V V V K K K V j k k l l !r "r #r $r %r~ W @X mm YZ [ [ nn \ mm ] \ ] M M M M M g  M  M  M  h  h M M M g M M M ] ] ] M M M M m  m !M "M #M $M %M ^_ ^ g  ii M M M ^ ^ ^ M M M M g! M"m  m# !s$ "k% #k& $t' %t( iM) kg* lw+ mw, nw- ow. pw/ qw0 rw1 sw2 tw3 uw4 vw5 ww6xv yw7 zw8{v |w9}vvvvvvvv v:v v;v M< `= a> b? c@ cA cB cC cD cE  cF  cG  cH  cI  cJ cK cL cM cN cO cP cQ cR cS cT cU cV cW cX oY pZ o[ c\  c] !u^ "u_ #u` $ua %ub dc ed fe df df dg dh df di  dh  dh  df  dj  dj df dh dk dl dh dm dh dn do dp dq dr ds dt du df dv qh  qw !dx "dy #dz $d{ %d|/vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkQQQQQ  Q QQQQ  &BN!v6(   vj  Ԕ5%Ԕ5%((?Comment 13942 ]4v6`  <kXQf[uvY T<$  P 9CCButton 19],@A9 $< _Yhg< !v V 9CCButton 15905W],!>@A9 $<_ Y h g<%v6admin>@<d ggDh4hk:SW2Sheet1   B%/[#dd  dMbP?_*+%&ffffff?'ffffff?(?)?" dXX333333?333333?& U} 7C} C} #C} !C}  D}  D}  DB@,,, , , , , ,,, E} F~ F E G D D C~ C? H C C~ C C CI IJ C ~ C? H J^ C ~ C5@ H J^ C ~ C6@ H J^ C ~ C@ I J^ IJ IJ IJ IJ C C~ C C C C~ C? C C C~ C@ C C C~ C@ C C C~ C@ C C CL~ C@ C C C~ C@ C C C~ C@ C C C~ C @ C C C[~ C"@ C C C~ C$@ C C~ C C C C~ C? C C C~ C@ C C C~ C@ C C@DF88 888888888888888888 !"#$%&()*+, @-.:/:0:1:2Y@346,7,8,9,:,;,<,=,>,?, C~ C@ C C !C~ !C@ !CL !C "C~ "C@ "C "C #C~ #C@ #C #C $C~ $C @ $C $C %C~ %C"@ %C[ %C &C~ &C$@ &C &C (K~ (C? (C (CE )K~ )C@ )C )CE *K~ *C@ *C *CE +K~ +C"@ +C +CE -C~ -C? -C -C .C~ .C@ .L .C /C~ /C@ /L /C 0C~ 0C@ 0L 0C 1C~ 1C@ 1L 1C 2C~ 2C@ 2C 2C 3C~ 3C@ 3C 3C 4C~ 4C @ 4C 4C 6C~ 6C? 6H 6J> 7C~ 7C@ 7H 7J> 8C~ 8C@ 8I 8J> 9C~ 9C@ 9I 9J> :C~ :C@ :I :J> ;C~ ;C@ ;I ;J> <C~ <C@ <I <J> =C~ =C @ =I =J> >C~ >C"@ >I >J> ?C ?C ?I ?J>@D8888888888888888888888888888@,A, @C @C @I @J> AC AC AI[ AJ>8>@<d ggDSheet5   %  dMbP?_*+%&ffffff?'ffffff?(?)?" d333333?333333?& U>@<d   ggDSheet6   !"$%&'()*+,-./012346789:;<=>?@ABCDEFGHIJKLMNOPQSTUVWXYZ[\]^_`acdefghijklmnopqstuvwxyz{|~ tNx A.  A.  A. M0* pHd VBAProject4@j = r )[ J< rstdole>stdole h%^*\G{00020430-C 0046}#2.0#0#C:\Windows\SysW OW64\e2.tlb#OLE Automation`EOffDicEOficEE2DF8D04C-5BFA-101B-BDE5ETAAC42E2EF:\`\WPS . 11.1.0.10 356\o>6\ksoapi.dll#Microsoft 16 .0 Ob LibraryJMSFo@rms>SFrmHs3D452EE1-E08F_A-8-02608C4 D0BVBA ?_?_Xf;dirQ;N z^L"$ B(`>R^@F `*x$   ($H p ^^xp^et^0p@һṹҳo]$H0d=Public Const sheetNameValueTJ As String = "2ʵͳ"]$ϢX2Public Const IntroSheetName As String = "˵"]$H]$˵] p ¼ܵУ]$¼ͷ] "ִ һǿУ ĵԪĿ] 6ִ һǿУ ĵԪΪϹĿ] ÿһкϼеֵ] "һǿУʱ¼Ԫ] Ϣ] %---ģУ¼ĸԪ] 8---ģУ¼ĵԪ]   Уʱ洢ַ] H¼ʱرհť]  ¼ܵУǷвϹ] p ¼ܵУǷظ] #¼ܵУǷظ] %/¼ЧǰǷдϢ ״̬] #У鷽ķֵ]$)¼ʼк<Public Const babyIDColumn As Integer = 2 'ѧѧſʼλ]$)ѧ֤ſʼλ]D0¼ΪյĿ]X"/ǷΪЧ ͳ 5ֶΪյĸ] "C¼ȥոִнȥ˿ո򷵻true򷵻false] PcellԭʼĵݣϵͳûнԶûĴ֮ǰcell] 7ϴдϢʱڵ,ӦĿʼʱʼֵһ] ] ] 8RڸݱʶòͬķʱжǷforѭ Cell_SelectionChangeҪõñ]$¼ʡصȼ¼ڵ]$`+sheet±Ƿ]  ]$hH)е]$) Ա]$p+]$,϶]$ #϶ʱ]$!%϶ԭ] -Oʶ϶ǷͨУ 0-δͨУ 1-ͨУֵΪ 2-ͨУֵΪ] $Oʶ϶ʱǷͨУ 0-δͨУ 1-ͨУֵΪ 2-ͨУֵΪ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!babyIDBj8= 2 'ѧɀѧ0λcard3 ֤)Dim isa1(ΪՅvE.AҔFΠЧA 5ֶc fremoveSpaceFlateBȥո `πa$ˡ2tr@uefalse ce!2A2ā`|ûнԶûwG֮aKsc ur@*)Long 'ϴxд%OAA,ӦĿʼʱsֵһ&rna%%'`w`cabisF@SY2ڸݱʶòͬ`-CE ж?forѭ C_Sele rJChRҪõb)headdI= 0(/ʀصȱ& Sus9r0"v±@ nottinu~eQ$Aq@NP luRW:104 @'gH.wge r := Ա w birthday= 5 ' ڿєysDifficultyGrade31 '@϶oi ntifyDStE1ʱO@6ReasonTQԭ\sO b%=+Q' ͨU 0-δ 1B-ֵaC 2:QV*_.Q_%__SB4RowRFM20.DL6LH'B @_&/;"1jpAAp00}#0p#G 50 AB657946E-EC3E-4B4D-BEF3-B86F81`A4A4CBfDUsers\48955\AppData\Local\Temp\VBE\DT.exd;!.E .`M  »ThisWorkbooPkGT@iEkWnkboPk 2 QHB1R-B,!zL*"B+qSheet1G Se_t1 u62 @ HU 6 6 6 6B -  ӡ@ԤGSbpSȉ[e2jo p !(e) ߺc ]wQQpec e'c eo ןk @G;Xf"a&2fo o &!У!h|eeo 2ao ~k !LGbQ;N zl^b2o a 9o U2Show1aG`6\onw3e2ro1)]nO( Ul5^5^5^5^E0Qh^ PrintCrin%j2odbʘxME ([9UxME6 LL L "L 4 ` kPzge@h qd@X x@H @8 @@( @ ` `  `  `( ` % X X8`PH,b`d@ @ @ @0 @H @` @x @ @ @t @p N6vR@` @P @t@ *2.0\@0 x8"@,``"@  '@`8'@ @ @ @H ` ;@ H; p@ @ @ D@8 PD@ @pt @`d x8L@T `L@D @4 R@$ hRp^D  @  @l  @ @8 x``b@ f@ ft@ ({@H 8{`@p H@ pp @ @p @ ` ( @p P 8  H  H@P@ @ 0 p @  ( )[$*\Rffff*1=62644bb5*\R1*#3cb*\R1*#30d*\R1*#268*\R0*#17$*\Rffff*1;62644bb5*\R1*#118*\R1*#31$*\Rffff*1:62644bb5$*\Rffff*1@62644c78*\R1*#1be*\R1*#119*\R0*#2*\R1*#0*\R0*#f*\R0*#1 h"hp:x.6" "H.p )  :+ ;8@;H;h;>;" : "P,`$>;,],( @$UX ~P1 Pp>L   8CH"P x W ;( 08.=@  p,+; **R  Ph%0 %D % % %0  % 8 %,X %&   #6M $J $"P (,3x (P3 (` (,L,X 4JI <( <? D6H0 D0&h HB< HE " G( H 8 M4D@ NKx N&N8[(N ` ,pI D @,  ,0 48H40&8 <@8E` "GH M4DNKN&N8[N  ,I  4 (00)"8<(` <<0 H6HH0&PB< PEh "GH M4DNKN&N8[N  ,I( H 0<8("@,8Hh,0&0 <0E "G8H HM4DPNKN&N8[8N p ,I , ($$M  < "@(L7X(&( ( )$   >(,h,x (,&40M, ,,  ( 0@(Hp *+$,  `7h p4+x=1 4  $0+X=pP1,],  4+(=`1x  ; ; ; x" x2$@6@ x* :    8,P a--------------------------------------------ʼУ-----------------------------------------]@]X+ijһ͵ıʶкź͸ʽ3:1;2]p ʶ(ĬϱʶԶʶ)](ijһ͵ıʶ飨кź͸ʽ] ijһͱʶľֵ]Զʶ]%Ѽ¼ΪյкŷŽ] H!>'"ȡĿ 0ĿȷģٽдУA@,1qazH$HB@|k1qazH$HB@F1qazH$HB@F1qazH$HB@F b$`!ZB@-$ÿοʼʱѴϢsheet,'dϢ¼ʼ'.ôУУ¼Ƿд֣׶ϢУ ('#Ĭ϶ѼδͨУ'Ĭ϶δͨУ b$`!ZB@-$ÿοʼʱѴϢsheet, A65530$H%<%!' A@N ȡ IV5 6%<%!6'vxcna = Worksheets(1).Range("1:1").Find(What:="*", After:=[a1], SearchOrder:=xlByRows, SearchDirection:=xlPrevious).ColumnFAILUREA@R&+ȡǷУɹ־Ԫ񣬲ֵʼΪ0'tռ¼ʼΪ0 * 2" ʱִd ʼУ鰴ť¼ʱִ A9:IV65536$H%<!t2ͺ9 9q A9:IV65536$H%<, 9@9"ıʽq.ȷʼ Уرexcel $.ܵݶʧʧ 0ܰʾ$, 2d1qazH$HB@|kk.$H!b(v)ҳǩΪɫ   "ûвҵѧϢ޷У飡A@,'*1qazH$HB@|k'ôУУ¼Ƿд$H!дϢ£A@\     '<"ִ һǿУ ĵԪĿ';6ִ һǿУ ĵԪΪϹĿ'''5"һǿУʱ¼Ԫ'9ǷΪЧ¼ 'pC¼УǰǷд';¼ԱǷд  v $H%Z!l'Oһбʶֵ'2=жforѭǷcallFunctionXQStart ûִĬϷ <ʶΪ -$'Gʽ14-3:25 :$'H6ʽ3:25ȡıʶвֳ֣кź͹ DJҪּϵҪУ飨ĬУ͵ԶУ   Y&+1ΪеһԪΪĬУ $:$'V*ȡıʶвֳ֣кź͹$'SԶʶ  $;$'cԶʶ͵ľֵ   gԱʶб $   A@}ݱʶֵöӦķ  $H%Z'lHȥַķ l$^'   $H%Z'{ȡбͷ   е Fַ^ , ; ' <> " ? ո س뷨Ϊȫͣ飡''^УʱдϢ  $H%Z!~( ӻɫ A@\N%isValidateCount = isValidateCount + 1kXPkH  $;$'Pȡıʶв   WԱʶб $   A@  $H%Z'lHȥַķ l$^'   $H%Z'{ȡбͷ   е Fַ^ , ; ' <> " ? ո س뷨Ϊȫͣ飡''^УʱдϢ  $H%Z!~( ӻɫ A@\N%isValidateCount = isValidateCount + 1kk eJ ʽ3:25$'QԶʶ  Pʶеڵǰ$;$'eԶʶ͵ľֵ   kԱʶб $   A@ݱʶֵöӦķ  $H%Z'lHȥַķ l$^'   $H%Z'{ȡбͷ   е Fַ^ , ; ' <> " ? ո س뷨Ϊȫͣ飡''^УʱдϢ  $H%Z!~( ӻɫ A@\N%isValidateCount = isValidateCount + 1k k d-ֻĬУʽ14$;$'Hȡıʶв   OԱʶб $   A@  $H%Z'lHȥַķ l$^'   $H%Z'{ȡбͷ   е Fַ^ , ; ' <> " ? ո س뷨Ϊȫͣ飡''^УʱдϢ  $H%Z!~( ӻɫ A@\N%isValidateCount = isValidateCount + 1kH @ k8 k0  $H%Z(  6ִ һǿУ ĵԪΪϹĿ     е һдȷ''8УʱдϢ A@\  'd   'Tÿһкϼеֵk  <,һؼֶȫ򽫸ɾ  t+ t 't,"ϢеĸдϢɾ  d  d d  b$`%JB@Lr Ѹɾ  d  'd p'k k  t 6 ɾЧ $'  A@DB ѸɾdH   A@DH Ѹɾk  t ˴Уɾ t:Чݣ֤У鶼ʧܼΪЧݣA@,k *дϢ鿴ϢA@,$H!b(v b$`B@Hd ' A@  '%ִУظݷ,ûظǷҪɾЧ Уͨ!A@,.$H!b(vSUCCESSA@R:+ȡǷУɹ־Ԫ񣬲ֵʼΪ0 A65530$H%<%!' A@Nd*ظݣ鿴ϢA@,$H!b(v b$`B@Hkpkh1qazH$HB@1qazH$HB@1qazH$HB@oq-------------------------------------------------ظijһ------------------------------------------------ ]`x] A65535 X%<%!'2Scripting.Dictionary$.O8O  X%<!l'>ȡѧ  %"ѧ໤֤ݽб   %-֤Ų  B@&#addһΪkeyڶΪvaluekk !' Sheet2$HG:G7<B@  !%  !>G17<,qx. oh`3Attribute 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`ذť¼) With S>9:IV>6A* v ͺa._A".Siz11cAo&3k .Horiz alA`lignmP5 xlA$hPberFormatLoc$alQ @"uc> Xb`("ȷL QGرexcel" & Chr(1n& "ܵݶʧ0ʧ,1Canp&ܰʾ")`  q  [ggb g3 gKTabvlorI Nx -4142!|ҳǩq$Ϊpɫ PHstartTitle + _ ِ5 i2 To1f 9eaOneN!= QM һ@ǿձ VgO \Ϊrϱ?totalMoney&eP.} "? u"@iі1fais~ieHnΪϧ1s5/InE R'ȰQC0?;?9du$}-j ~1,'=9r(j).Aߵһ֞гu_is = $жforѭ! nlFuncqXQSV S5/Zw <> p&QZ ' /#= St(+o-o'14-3:25 rowType = Split(t0Value, ":") 'ʽ3:25ȡıʶЀв֣ кź  If UBound(bs) <> 0 Then 'ҪּϵУ飨Ĭ x͵Զr'HcFPor mLa+ 1 Tol'+1ΪеԪa@valE`ntity(|m)oRow"%(0e3;{@i)E,'@>kGA1b;Bľֵn@)Q'gx? callFunctionXQStart `(n`1, Pi, jsidateCt#ֵöӦķ #uWorksheets(1).Cells()_ _ #'!ȥַ? (removeSpecial@>Character(_$f+g ,`leMsg5sKTitl@jAбͷ9A)error"" & i`("AjA F& "څ@^ , ; '"" ? ո س뷨Ϊa뀼飡"ÿhasE `Tr1'̂sʱxдϢ?oT8.InP+ior.Colv= 65535 'ӻɫwriteLog u''iLO= p_End If /Next5 _ mss= False2ooV4T0_S~~~ }}} RkBzz?z;s= zzozʕzȡzzzzzzzzz zzz BWorksheets(1).Cells(i, j).Interior.Color = 65535 'ɫ CEwriteLog err orMsgM`'isValidateCountk+ 1:End If 3)NextfElse If UBDd(rowType) <> 0 Then 'ʽ3:252#tRow^(0) 'ʶ{@Ci(+!A(еڵǰG;jvalS0plitc, ";"Jľpֵ) yF5}nLA) ToC' б+callFunctionXQStart `(n), 1, Ay'$4Ӧķ<+ue %v__#'!ȥַ? (removeSpeciBPCharac`()#m+m (title5sLTaa 'ȡбͷ)%"" & i`"AjA F& "E ^ , ; '!["" ? ո س뷨@ΪȫU|"_ _ hasE{P Tr1'У ʱSϢo_8_ ߍ 'ֻĬq)Í14?)pPsp.szbs1ezB1Dħr//xxxvv% ?bc::// rrKk= rr rrrrrrsgtrrrr_ rrrL ;Worksheets(1).Cells(i, j).Interior.Color = 65535 'ɫ < >writeLog err orMsgM`'isValidateCountk+ 1:End If +)Nex>tb ׆LockedOFalLse_*3 j 'ִ һǿУ ԪΪϹ@ĿIf atLeaO@neNull~<`> 0 Ah=Ç ThenEa@I"" &D i",`EA?Ё?дȷ숲"ghas = True ')ʱдϢ Es%n+ 5 ?EMItotalMoneySu&m1+  'ÿһкȼ@4ֵicO> 1 I$ '!2ؼȫɾ_isAWRowArr(Num) !i r E ) `'eO<-%+i Fpcu#a  - -.To^  fSCmsg"Name).s(x).DeletpѸ_9/p" =OhE|Inu3 ~ )?; q9 0 i/@!1 '%Ч  rowData,/4q)@?T_cd"A,1,)'#oROs- q ~ qURtK!zw; Box "P˴AnRfRwJ& xݣրʧܼ:Ϊwvn?p 2 y鿴EQ`+TabӻIndezx016MMS}(c%0SP0/#checkdXQNew Not (0n ظA,asD0,Ҫ}rfͰ! -41421setTue XQ 2,!8, "SUCCESS" 'ȡ! ɹ־ֵʼ0Ϊ0f rnap Range("AA0").-(xlUpmI R pK Kna%FW2_2_2z_2_2_2NAProtect Password:="1qaz '2).ect Password:="1qaz" Worksheets(3).ProtEnd S@ub '--ظijһ-? x checkTheSame()Dim myDic As (Obj,KeyVariant( , va rDatarna = ActiveS.Range("A655 35").(xlUp).Row '1 Set idNumH= C reateJ("Scripting.tionary"bI@O8", "O" & R).value 'ѧ@ӀF݃GFor Ea@ch car% In''໤퀷֤Bб!C IfF<> "" anNoG?.Exis )B 'G@AA.AddE, Null 'addһΪkeyCAIfINexIƒ Cmy=5.sWith H"B2GmG:G@ClearConten.t41@Re size(B.C ount)AppPlica.FFunon.Transpos '?D4'*= eah@  ]wQQpe  xBSbpSȉ #v!hQpe  /{Sheet15;%)џxME(6 LL P` @ IR `YOIT X`V \` i^ f` 8 Ih XIR xIj  n`   i^ x` 8  Ih XIR xIT Iz  X`   'Ih IR 8IT  8`  2Ih I IR IT I  ` x GI Ih IR IT I  ` X EI xIl `   `  SI  +" ` P jIh pI$ i&`(  `  {Il (I8 HI: @< D `  Ih I@  N ` k@ Ih  `IR Ij Il@  P@ ` Ih  I@  R `k Ih  IR  Ij  Il    ` @ Il ` Ih  IR  Ij @< @T @V  ` H Ih h IR  Ij `8`X`Z ^` 0  Il @  8 X@ N %`  @Nl  H@Ph @8X @hH @D @4 @$ @ @ h`h@Rl hH@h @X @H @D @04 @H$ @ @  h )[$*\Rffff*1:62644bb5*\R1*#3cb*\R1*#30d*\R1*#268 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#(# p$ &x$ $$$$ f$ H%(`% % T% &% &(&0& $H& &p&$|&$&'$ @'$P' `'h' p' '$t'$&($ (( 8( $@(H( P(p( ^x( ("()@ )&`) )) )))) b) X*h*x* t* &* + 0+8+X+ f`+ +++ t+ &h, , ,,, b, 8- X-p---&. 8. H.P.X.x. ^.. ./@ /&`/ // //// ^/ P0 p000X0&0 1 (10181X1 ^`1 1 112T2&h2 2 2222 n2 H3 h33"33&H4 p4 4444 j4 (5 H5h5"x55&06 X6h6p66 n6 7 (7H7"X77&8 88 H8P8p8 Px88888&9 9 9999 R9P:h::X:&: ; ; ;(;H; bP; ;$;;@<&@<h< p<<$<,<<<<<==(= j0= =="==&> >>>H> ?L? h?p? x? & @ H@ P@ `@h@p@x@@ Z@ AA0A@8A&xA AAAAAB jB "xBBBB dB &8C `CpCbxC hC ,HD xD &E 8E HEPE XE &F @F PFXF`FhFF ^F F&G0G@8G&xG GG&GGGH ZH pH&HH@H&H I0I&8I`IhII ZI I,J@J@HJ&J JJ,JJK K |(K K$KK(K@L&XL L L"LLLL |L pM MM@M&M N(N 0NPNXNxN |N O$O@O@HO&O OO$OOOP d P P P@P&Q (Q8Q2@QxQ xQ Q6R.PRRR( R2R( R1R( R2R( R1SS SJ8SSSSSS fSB  (T 0T<8TxT TT$T$T U(U 0U \U B  8V,XV 0V@V"V ^ W 6WWWWX00XH`XXXXXXX X "Y Y .YB  Z Z$ ZBHZ Z Z Z Z Z ZZZ Z [ [ [ [B  ["[  \8\@\ H\P\X\ `\8\\2\\ ] 0]@] H]P] X]h] F]]] ] ] *](^ 0^ ^ ^B  __*(_ 4X__ _B (`<0` JP`p` x` a 0aB  Ha*Paa aB b< b J@b`b hbB  c  c "8c `c8c2cc d(d 8d@d Hd Pd`d"d0d d(d e(e0e L@ee&eee ee eB  xffVff 8g Pg pg:g4g$g h"8h`hhhph xhB  ii 6i HiXi`ihipixii-----------------------------------------УУдϢʾ ע----------------------------------------------------------- Ԫ] R T X%Z'V V'Pd('Pki--------------------------------------------д־ ¼ϢʾһϢ-------------------------------------------- ^ d b$`,Z d 'diX------------------------------------------------------ ȡָcellֵ------------------------------------------------------------- R j h$H%Z!l'fi--------------------------------------------д־ ¼ϢúɫʾϢ-------------------------------------------- ^'p ^ d b$`,Z p d b$`%Z%r!t(v d 'dii--------------------------------------------עʼУ飩-------------------------------------errorInfoע 1Worksheets(sheetIndex).Unprotect Password:="1qaz" z R T h$H%ZB@| R T h$H%Z!~(W ӻɫ R T h$H%Z!(Jii--------------------------------------------ɾעʼУ飩-------------------------------------1Worksheets(sheetIndex).Unprotect Password:="1qaz" R T h$H%ZB@ R  T  R T h$H%Z!~(vd  R T h$H%Z!~(vkpihr---------------------------------------------ʼУ Ƿӻɾעõķ----------------------------X  Уʧ R T h$H%Z!d жעΪ h R T A@xV עd"Ϊգȥǰע h R TA@N ע h R T A@xk1 MsgBox "" & rowIndex & "" & errorMsgd :УɹжǷעУʧʱעȥ h R TA@ ,#ȥո,ʾ RУ TУַ"$. "$."а˿ոϵͳԶΪA@\d`kXkPiH----------------------------------------------------------------------------------------------------------------------------------y--------------------------------------------ݱʶöӦķ(ʼУ)-----------------------------------------------------------------------------------------------------------------------------------------------------------------------ѴϢдб8 R T h$H%Z'l  T h$H%Z'Iȡбͷ Ϊϲеıͷ  T h$H%Z' R e  T h$H%Z'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 h R T$'  R е Ϊգ'')УʱдϢ A@\RMsgBox "" & rgold.Row & "е" & Chr(10) & titleMsg & "Ϊգ"k0 h  R T A@'a=================================2 ִѧУ========================================== checkNameKT h R TA@@ȥոķ R T h$H%Z!l'l l$'  R е ;дȷΪ֣ȴ1ܳ20ַ''%УʱдϢ A@\  'k` h  R T A@'Z================================= ִеijУ==========================================checkLenKT l $'  ,$'$ ` ΪDZΪ̶ȶ R е .дȷΪաд򳤶ȱΪ$ λ'$ ed ΪDZΪȷΧ R е 4дȷΪաд򳤶ȱڵ$ λҲ$ λ'$ ed ΪDZΪ̶ȶ R е &дȷΪգҳȱΪ$ λ'$ ed ΪDZΪȷΧ R е ,дȷΪգҳȱڵ$ λҲ$ λ'kH '0УʱдϢ A@\k h  R T A@'Z================================= ִеijУ========================================== checkSpLenKT l $'  ,$'$ ` ΪDZΪ̶ȶ R е .дȷΪաд򳤶ȱΪ$&λֻΪַ֣'$ ed ΪDZΪȷΧ R е 4дȷΪաд򳤶ȱڵ$ λҲ$&λֻΪַ֣'$ ed ΪDZΪ̶ȶ R е &дȷΪգҳȱΪ$&λֻΪַ֣'$ ed ΪDZΪȷΧ R е ,дȷΪգҳȱڵ$ λҲ$&λֻΪַ֣'kx'0УʱдϢ A@\k8 h  R T A@'h================================= ִеijУ飨Numberͣ==========================================checkNumKT l $'  ,$'$@ ΪDZΪ̶ȶ R е GдȷΪգдΪ֣0λȲ$λСλ$ λ'$ ed ΪDZΪ̶ȶ R е ?дȷΪգұΪ֣0λȲ$λСλ$ λ'kh'0УʱдϢ A@\k( h  R T A@'[=================================ִֵΧУ==========================================ѴϢдбcheckValKT l $'  ,$' R е $дȷΪ֣ڵ$ Ҳ$''-УʱдϢ A@\& isValidateCount = isValidateCount + 1k8 h  R T A@'_=================================ִеΪֵУ==========================================ѴϢдбcheckIntKT l $'  ,$'$@ ΪDZΪ̶ȶ R е 4дȷΪգдΪ$ҳȲ$ λ'$eEΪΪ̶ R е 0дȷΪգұΪڵ$ҳȲ$ λ'k!'0УʱдϢ A@\kH! h  R T A@'`================================= ִе֤У========================================== checkSfzjhKT h R$f'S ȡд  R е &дȷ֤Ϊգ''0УʱдϢ A@\d  ֤ l T$'O ֤У :֤У R е MдȷΪѧ֤ţһλΪĸXıд''4УʱдϢ A@\  'kd l$'  R е EдȷΪգҳȱڵ1λҲ18λ''4УʱдϢ A@\kkk h  R T A@'X================================= ִ֤У================================== checkZjlxKT checkZjlx l1$'  R е дȷ''(УʱдϢ A@\d` checkZjlx h R TA@k8 h  R T A@'\================================= ִѧŵУ==========================================checkXJHKT l$'  R е EдȷΪգҳȱڵ1λҲ50λ''0УʱдϢ A@\k h  R T A@'`================================= ִѧϢIDУ==========================================checkXJHKT l$'  R е EдȷΪգҳȱڵ1λҲ50λ''0УʱдϢ A@\kX h  R T A@'[=================================ִпУ==========================================ѴϢдб checkBankKT l$'  R е $дȷΪ֣ڵ$ Ҳ$''-УʱдϢ A@\k h  R T A@'W=================================ִ꼶У========================================== checkYearKT checkYear l$'  R е дȷ''(УʱдϢ A@\d` checkYear h R TA@k8 h  R T A@'W=================================ִѧУ==========================================ѴϢдбcheckXnKT l$'  R е )дȷʽ2012-2013ȣ''-УʱдϢ A@\k h  R T A@'W=================================ִ·У==========================================ѴϢдб checkMonthKT l$'  R е &дȷʽ0112ȣ''-УʱдϢ A@\kP h  R T A@'g=================================3 ִеУ(DZ)==========================================ѴϢдб checkDateKT l$' 2Уʧ R е дȷдʽΪ"$. xxxx-xx-xx"$. 2013-02-21''-УʱдϢ A@\kp h  R T A@'c=================================ִеУ飨==========================================ѴϢдбcheckDateNecessaryKT& l$' 2Уʧ R е дȷдʽΪ"$. xxxx-xx-xx"$. 2013-12-21''-УʱдϢ A@\k h  R T A@'g=================================ִеijУ飨==========================================ѴϢдб checkBirthdayKT! l$' 2Уʧ R е дȷдʽΪ"$. xxxx-xx-xx"$. 2013-12-21''-УʱдϢ A@\k h  R T A@'J=================================10 У绰====================== checkPhoneKT l$'  R е дȷдʽΪ"$.-̶绰 ֻ"$. ''%УʱдϢ A@\k0 h  R T A@'L=================================checkOption У鱸ע ====================== checkOptionKT lB$'  R е )дȷȲܳ200ַ''%УʱдϢ A@\k h  R T A@'\================================= ִ϶ѼУ================================== checkDiffNameKT checkDiffName l $'  R е дȷ''(УʱдϢ' A@\dx checkDiffName h R TA@ l$1ͨУֵΪ'd 'k k h  R T A@'d================================= ִ϶У(DZ)==========================================checkIdentityDateKT% l$' 2Уʧ R е дȷдʽΪ"$.xxxxxxxx"$. 20130221''-УʱдϢ A@\'d8  l$X$϶ȼΪգ϶Ϊլ'  l$e](϶ȼƲΪգ϶ڲΪ'd R е vдȷ롰Ѽ϶ơͬʱΪգͬʱΪͬʱͨУ飬顰Ѽ϶ơǷͨУ''0УʱдϢ' A@\'kk h  R T A@'T================================= ִУ==================================checkMZKTcheckMZ l$'  R е дȷ''(УʱдϢ A@\dHcheckMZ h R TA@k  h  R T A@'d================================= ִ϶ԭУ(DZ)==========================================checkIdentityReasonKT'0,1,30' l $'  R е 5дȷȱڵ1λҲ30λ''0УʱдϢ A@\d   l$r1϶ȼΪգ϶Ϊ,϶ԭΪ   l$ew8϶ȼƲΪգ϶ڲΪգ϶ԭΪ   l$e R е dдȷ롰Ѽ϶ơ϶ʱ䡱ͬʱΪգͬʱΪͬʱͨУ飬''0УʱдϢ A@\'d R е дȷ롰Ѽ϶ơ϶ʱ䡱ͬʱΪգͬʱΪͬʱͨУ飬顰Ѽ϶ơ϶ʱ䡱ǷͨУ''0УʱдϢ A@\'kEkE h  R T A@'X================================= ִ֤У==================================checkIDCardTypeKTcheckIDCardType l $'  R е дȷ''(УʱдϢ A@\dHDcheckIDCardType h R TA@kD h  R T A@'T================================= ִвмУ==================================checkDisableTypeKTcheckDisableType l $'  R е дȷ''(УʱдϢ A@\dBcheckDisableType h R TA@kB h  R T A@'T================================= ִвмУ==================================checkFamilyIncomeTypeKTcheckFamilyIncomeType l $'  R е дȷ''(УʱдϢ A@\d8AcheckFamilyIncomeType h R TA@kA h  R T A@'v=================================14 checkGender ִǷΪСŮУ--================================== checkGenderKT checkGender l1$' '-ԱдУ֤Ŷ R е дȷ''(УʱдϢ A@\dh? checkGender h R TA@k8? h  R T A@'u=================================14 checkYesNo ִǷΪǡУ--================================== checkYesNoKT checkYesNo l $'  R е дȷ''(УʱдϢ A@\d= checkYesNo h R TA@k= h  R T A@'u=================================14 checkYesNo ִǷΪǡУ--================================== checkSqyyNameKT checkSqyyName l $'  R е дȷ''(УʱдϢ A@\d8< checkSqyyName h R TA@k< h  R T A@']=================================checkTerm ִѧУ--================================== checkTermKT checkTerm l $ R е дȷ''(УʱдϢ A@\k: h checkTerm l $ R T A@'r=================================checkAtLeastOneNNull ִһΪǿ--==================================checkAtLeastOneNNullKT  'A"ִ һǿУ ĵԪĿ l$ l=Ϲ  l ' T KTF  l ' KTF  l ' KTF  l ' KTF  l 'n8dϹ  'F6ִ һǿУ ĵԪΪϹĿ    'kX8'nH8i@8_--------------------------------------------ʽ-------------------------------------]VBSCRIPT.REGEXP$.7RegExΪʽ (4 ȫֿvba\ת  (.ʽ (5ǷִСд l %'3 ִ.i6-----------------------------------------------------------° Уظ˵Ѿûиʽ------------------------------------------------------------V-----------------------------------------------------------1ѧ׶ڱڲ(sheetѧ׶ A65535 $`%<%!'*cna = getTotalColumnCount(sheetIndexValue) b$`!ZB@1&ÿУظʱʱѴϢsheet,'dϢ¼ʼX==============================ѧ׶ڱڲ==================================0ðÿԪغ֮ǰнбȽ      $`%Z'      $`%Z'  .ѧͬ˵ظݶ  еݺ͵ ֤ظ!!!!' A@\*ѴϢ' k(3 33i3-----------------------------------------------------------һ ֵȡֵ------------------------------------------------------------ֵҵֵڵлkeyWord ҵĹؼ'kbn л ֵΪ rowrow'"]the find result object $, 0. 42 A1:A65535 h$H%<%*.( ( &row (!'"d81 (!6'"k 1k1i1------------------------------------------------------ ִڹУ(Ϊ)-------------------------------------------------------------value value1 cellУ鲻ȷfalseУȷtrue :0˵ΪDZ 8$'z/k/k/]h'>ijһļ¼ A65535 B$`%<%!'@B' B lrow$"'<=ȡ  < @  B$`%Z l > '>d.y.k.   < < >   B$`%ZX 8X LжϹǷcell'y .k. #ʱcountĿΪùеĿi------------------------------------------------------- ִɾijһвexcelܱģ-------------------------------------------------------------sheetIndex rowNum к1qazH h$HB@F @ h$H%JB@L/ Ѹɾ- Worksheets(sheetIndex).Protect Password:=123ih,------------------------------------------------------ ָcellֵ-------------------------------------------------------------1qazH h$HB@F l R j h$H%Z(li+------------------------------------------------------ ִɾijһвexcelûб-------------------------------------------------------------sheetIndex rowNum к @ h$H%JB@L/ Ѹɾix*------------------------------------------------------ ָcellֵ-------------------------------------------------------------@ 1qazH h$HB@F l R j h$H%Z(li)------------------------------------------------------ ݴеֵǰʱѾͨУ飩------------------------------------------------------------- ]   R j h$`%Z!lX 'V'>ijһļ¼ A65535 B$`%<%!'@F B lrow$"'<Aȡ  < @  B$`%Z l > '>d'y'k'   < < >   B$`%Z!lX '8 8 VX 1жϹǷcell  B$`%Z!l'T TX R j V h$`%Z(ly&d& 8ESheets(sheetIndex).Cells(rowIndex, colIndex + columnPlus).value = "0"dh& R j V h$`%Z(lk8&k0& i&------------------------------------------------------ ȥcellеĿո------------------------------------------------------------- ] Ԫ]  3Blength1ʾcellԭijȣlength2ʾִȥոַ'ĬΪûȥո2 Worksheets(sheetIndex).Unprotect Password:="1qaz" R j h$H%Z!l'8 8'X XGzj*"ԪΪգȥո 8 'Z%length2Ϊոһγֵλ Zַո 8 $\'8 8X R j h$H%Z(l'k#i#~------------------------------------------------------ ȥַ------------------------------------------------------------- ]P -[\uFF00-\uFF06][\uFF09-\uFFFF]|[\s,;'<> "?^]+'  l$'^d"'^k"i"x"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| }w~|~Ih~Sp~9 ~ B~~Pb~~ P 3sΪlֵ6666Int657p17Ep7XQnX77]`2p$??_w>& ?!"_r(?ߐ?ov }sBY?ȟ?a='/TgB Qooo_ I?W?W?Wߊ dSSSSo~rߊ?P֤>/)RSfzjhR r@esZjlx0EgetCellValueCountXQ(sheetIndex , rowH2) 'ȡд  If resZjlx = "" ThenbLerrorMsg3" & "е title-& "ȷ֤Ϊգ"hasEBATrue 'УʱдϢ&write0Log lEl se*vcheckMethodXQrIsIDNumber(vA, column}|C,@' @'NoLt  'O`σ8Ϊѧ6λ)Ϊ ĸX дhA+Al Eis@idatG{M+ 1`End ;WO@SFZJLXO)?vL_A!!I‹ ҳȃE1λ18e?H ?H>G{/? $  beginCa_comment N ڈ,ߴ isF orha '= ִ =Case "B!J@DMB((, d"1"4m5`b{ f@"o{o{o{`{1)/1yy\o0!LsetCodz,*'8&,U--|-R|-O-*B-ѧŵ---XJH-f -@Sc,,,_b&> _b_bVb50_b 000o1o1,\/-/-/-/-+o-)d-ID---O =-----_a/Y֯---OO -----------bo-)Qп= 'ѴϢ,б Case "checkBpank" :P4MethodXQ = T(valu e)0\If N ot0@Then2;errorMsgk"" & rowIndex "еAtitle& "дȷΪ֣ ڵӂ'functionArgsArr(0),ҲX+1zahasEcaTrue 'Уʱ writeLXog 'E nd IfbeginCA_comment sheet\,o,columnD 'isForBִ>K 5Ye arhҳDMB(B, ¶, 1H@B?O?OßN]ElseI set*Codd+KE{IS W _XckE_X X Y==YѧOY\ ]XnO]\Xn"[cʽ2012-3ȣ^"__C__JUU8/W&*·ݟ**І*Month**Ј߲*l? ?\X?& ?7*0112*}*PJ*K *V*U?R *O'3 !+A+(DZ)+++Date"> CPo,Airthday,v'/එ, 'ʧYOO/H .Ϊ!Chr(34rx-xx  ᭁ[-0\10 000 j0000000g?,00ѩ_00 0NecessaryO1r CO1H1&1(11@1 _V__$1113-1 11;д writeLog er@rorMsg^E nd If>beginCheck_comment sheetIn@dex, cMethodXQ, rowolu mn ~isFor = True '=ִеijУN4хб큋Case "qBirthday" ' jNecessary(value)#If Not Then 'A ?ʧ%^#"" &i"ASOtitleд ȷʽΪA ChrP(34) x-,xx  2013-12-21"+hasE+ 'y~?&@10 %绰Sb'(\Phone3ZNumvYvX,TTT-̶# ֻ$VTS}vP??nd?LEOptionBQע P&CQ㣣P, 66Ъ_Q⤆_Q_QȲܳ200ַK% %OO%> %, c % " a϶ѼqOGODiffNam/PSoP DMB( , }, funcA0Args_)sB)XQ~ORC |x|||?Nt(_x/LsysaicultyGradeFlag 0??,?,8Els E}setCod p  Tri uoQ"ͨa(ֵΪi 1ߏY2/@ A /B/B/B/B?Foh>&Bu(ǁ)o'{BId`ityDatexOC@CĿAAComsgQE;"q1Q02?> GGsG DDyiPntifJ-808i> A/EQnȼnAգ϶ indentifyDateFlag = 1lElseIf sysDifficultyGradeNamB2 And Trim(value) <> "" Then 'ȼƲ  32_,errorMs"" & rowIx"еʀ title& "дȷ롰`Ѽzxͬ2|zͨУт!PǷ"ihasEA5@xTrue 'ʱdдϢcheckMet hodXQ@Fa@ writeLog W Q0 2EIfbeginCA6_comm sheet}, <,`olumnD W6isForD_ '= ִÀj^ =kCase z"Z4DDHMB(, Bx, 1)S*Not#"}!$k kBcX__^_^ VGc7set*Cod(2,KI \XwXY+UY!aԭY(DZ)Z% [ItyReason" '3&A4functio nArgsO0,01,30GrcLenc, tccrdУgڵ@1λv304/5_d_d5&5f`{?812dފ=ϊŊ,-(?  d =  aC`: ? 4 (` 00 OrO 0)/% _4ϜϜϜʱ䯝SﯝH O7O7O7nO7O7Pߞ  m?ocQ:OO/ /_, oo[ /"֤>,iDCardType; wIyL paA  errorMsg = "" & rowIndex("6titleZ& "дȷ"  hasEifTrue 'УдDwriteLog *ElseEsetDMBCode "checkIDCardType", sheet,, column ,End If beginC4_comment2AMethodXQ:,yisFor '= ִвм`a^ =6CasODisableO@J8@)`(_ , value, functionArgs)If Not KThen  l-]Rz]]]S9]Y]_ ]FamilyIn@y^zo^_>_+D_߼߼߼߼ ߼_ʼP.__c ĵԪ=\"\Money(Z) A:B <> 0Z 'aG Ϲ GPtotanl Q+CgSelect tޘ m"baojiaoC:1 Sum-, huoshic _ Bzhusu?L# others?l# _ E@d'TsJ| '23 =pG>6>>>Ϊe@Kc + h+ " Jb~3  Ft '-ʽo-  regB(E})8DimaEX As Obj#ISet= @Create("VBSCRIPT.REGEXP")q'RegExΪG EX.GloxbalpF~'ȫ''vba\תPatptern !RʽIgnoreB8= FaǷִд3TestgGB.hin#$O ° 4ظ˵ѾPûpt 1ѧ׶ڱ -B}SameXQNew(W2) 'w(naS!s:.Range("A65535").P(xlU@p).Row'cgetT1wsMVah6m sg).Cells.Clea rCont@s 'ÿʱAB ,cu! P 1 '¼ʼ/oc'ðԪغ֮нбȽϧi0 startT + 2 To rnag4cardID1WIA2(i, c3YOdAjO@i - 1oq32exj$iv eQӨ+ͬ䣬q:1;Qԏ e_j!׺ͣiC֤Ų@!_p  writeLog errorMsg 'ѴϢ`  hasTheSame = TrueTEnd If6pNext +Function  '-7һ ֵȡֵ8W-K) ҵ*@лkeyWord Ĺؼ bn A Ϊ row  GetRowOrColIndex(ByVal sheety, 84As String) Integer +@o-1Gb Dim c Object 'the fi@qres`ult o Set = =k&s(().Range("A1:A65535").F@(What:=.LookIn:=xl8ues, AAxlW hole)GIfH NoIsh9 ɩ@ k@B= "U" Cc.@]A ElsPkumL" ִڹУ(ʀΪ)yA]value 0͠X1 cell `Aȷfam%'et[checkDMB( , , fl`Exit 2@e%7ifLDataACount 0 'ijһa(ļ¼FCNum`Szs(Areagf (xlUp@jow 'E HF/ -Ul $0,#e) '>CFor i % To @1C`Fs(i|, 3b>r'+ (p#5o2ia i'j.5 + c -i DC(j, 3)M B#Y) ' (dǷf'&A eSbS)Aj 'ʱcAQĿΪЃwQ ._wODB-bHɾ.вexܱģoF1 A' кňsd`eleteP\h,*Ejv).UnprotaoPassw`|:="1qxaz"obsb().Dq!'rA}).P123_ ָc'ֵ?(setΣǰʱ1Ѿͨ˱)?Code?%bW8T<, c 2QL2p|y,HC=  S]___@a[B=? {9Q~aheetIndex).Cells(i, 1) = value T@hen C0ount+ B1 DElsehExit For V nd IfNe0xt i0 jjrowData To  + .- 1Str(Ss(Areasj, 34).)<yIf%cV) 'жϹȏ'+codne#QO2O& !n, col +umnPlus,JF%PB?A.qB}AIP"\" '2"<0"JSE?Q "Ej Functio '-2 ȥâĿո  removeSpaceXQ(gN,asMIDimeiAs ring 'ԪAh'7len gth1 Integer, c2h '#ԭȣ0ִ"!ַO cFa`[ 'ĬΪ F' Work!s!).Unprotect Password:="1qazDFtxd Len( /p'0yM '1Ϊգ%$c 2 Ina , " ")12һγπֵλÇf2 <> 3A5'%g ReplQ"E+礏L ETru%|?zs- za#8pyecialCharac8terq8reg2B"[\@uFF00-b6 ]9FF]|@[\s,;'`""?^]+/~DgCheckE(,sAuSA '] "<!V(6 << <x F` Dp%H@)[$*\Rffff*1>62644bb5"   ( HhxѧϢӡģ$H(JѧϢӡģ$HB@LѧϢӡģ$H(JoAttribute VB_Name = "Ԥ" Sub Browse_Print () Worksheets("ѧϢlģ").VisiblaTrue"d^P@review2cEnd 87EH#<"NL`2 F(4rLH(|x(      !"#$&'(*;+,-:/0123456789=C]>?@ABDZEFGHIJK[MNOPQRSTUVWXY_\^`gabcdefhijklmpqrstuvwxyz{|}~a~xME(6 << <P ` @ Ih `yoIR XIT `V 0`  Il @ ` p Il @  `   *Il @ +` ` 7iij`H`(H``` ` X  PIl @ `   \Il @  ` H  hIl @ `   tIl @  ` 8 Il XI @  `  Il @  ` H Il @  `  Il @ p ` 8 Il @ `  Il @ @ ` @ I8 `I  D `   I8 I   ` @  I8 ` I   ` Il  I   ` @  Il ` I   ` (Il  I   ` @ --:Il ` I @  ` &&gIl  I   ` X  Il @  `  Il  h ` 0  Il @  `  Il @ X`   Il @ H`  ""I IR Ij ` ` `Z````@ ` @ ` @ ` @ `  ""Il I @ `   Il @ H    X  p 0h  @% /X)[$*\Rffff*1<62644bb5  B       (  B  H@PX`hp xB     (08 @ B  PX` (0 n8  B  ,$@`Hx   " 8Ph"4   B   4     ( 0 8   B    ( H X ` h p x   B  8 @ 6H       | 8 X B  p x 0       x ` B    (08@H xP  B  0@HPX` |h  B  ($0Xhpx |  0B  HPfX | x B     B  :0@X x   P pB         .B       .B    (08@ HB   &08@HDP4 (08@H PB   &8@HP X x( D48 @HPp B  @H` hx  "  <08 @H PB     ( &8 ` h p x  0          !"! 8!@! $H! "p! ! ! ! !!!"""  ">8" x"4" " "" "" "B  ### #&#$$$$ $ @$"H$ p$x$ $$ "$ $ $ $ $% %@%H%P% X%>p% %4% & &&  &(& 0& & &B  &&''('0'8'@'H' P' ' (B  ( ( (( 8(@(H( P( ( )B  ) ) ()H)X)`)h)p)x) ) * 8*B  P*X*`*x****** * H+ h+B  +++++++++ + , ,B  , &, $- (- H-&X-*-"-$-.( .H.h..... . 2.(/"H/p//  ///8/0 0 (0B  000&01 1&1@1H1P1X1D`14111122 22 2@2`2p2x2222222 2 83 X3B  p3x333333333-----------------------------------------1 ,дϢʾ Ϣsheet--------------------------------------- ʱ0 Ϊʱ1 Ԫ] R T h$H%Z'V V'd'ki-----------------------------------------2 Уѧ ҪΪ-------------------------------------------------------------ʽȷfalseʽȷtrue]%^([\u2E80-\uFE4Fo]|[a-zA-Z]){1,20}$'4޸ģУƧ  l$'d'ki|-----------------------------------------3 УڸʽΪ2012-05-09(Ϊ)---------------------------------------0 l$'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]))))$'  l$'d'kix|-----------------------------------------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]))))$'  l$'d 'kih-----------------------------------------4 У֤---------------------------------------Ϲ򷵻trueϹ򷵻false ]790584216379058420Ȩ] 10X987654320У $' ȥո] j  6)׶֤Ϊ,ΪͨУ'zpkh Gzj $$Gzj *[0-9X]Gzj   $' G 'j   $  '  ' $ (  $G'jiz-----------------------------------------У֤ -------------------------------------------------------------ʽȷfalseʽȷtrue]x,^[\u4e00-\ue863a-z|A-Z|0-9|()|]{1,18}$'  l$'d`'kPiH----------------------------------------5 -УѧУѧУʶ 42λһλΪֻx-------------------------------------------------------------ʽȷfalseʽȷtrue]^[1-9]\d{40}[\dx]$'  l$'d'kiz----------------------------------------6 -У黧 -------------------------------------------------------------ʽȷfalseʽȷtrue]h.^(\u519c\u6751)|(\u53bf\u9547)|(\u57ce\u5e02)$'  l$'d'kiu-----------------------------------------7 Уѧʱ-------------------------------------------------------------ʽȷfalseʽȷtrue]'^(((19)|(20))\d{2})((0[0-9])|(1[0-2]))$'  l$'d'kiq-----------------------------------------7 У-------------------------------------------------------------ʽȷfalseʽȷtrue l ,ΪDZ'kzk]x^((19\d{2})|(2\d{3}))$'  l$'dH'k8i0q-----------------------------------------7 У·-------------------------------------------------------------ʽȷfalseʽȷtrue]^((0[0-9])|(1[0-2]))$'  l$'d0'k iv-----------------------------------------9 Уѧ-------------------------------------------------------------ʽȷfalseʽȷtrue]h^\d{4}[0-7]\d{3}[0-3]\d{7}$'  l$'d'kxipv-----------------------------------------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'  l$'d 'kiv-----------------------------------------11 Уп-------------------------------------------------------------ʽȷfalseʽȷtrue]X^[1-9]\d{14,20}$'  l$'d 'k i -----------------------------------------checkXn Уѧ磨2012-2013-------------------------------------------------------------ʽȷfalseʽȷtruep]]1^(20\d{2}-20\d{2})|(19\d{2}-19\d{2})|(1999-2000)$'  l$ l-$'$$ 'dx 'kh d` 'kP iH -----------------------------------------checkOption У鱸ע磨Сvalue2-------------------------------------------------------------ȲС200false 򷵻true 8'zP kH 8  'd( 'k i ------------------------------------------------------ȽϴС(Сڵڷtrue)----------------------------------------------------------------'value1value2false 򷵻true 8X'8 X' 8  'Dd 'Dki------------------------------------------------------ȽϴС(Сڵڷtrue)-dec---------------------------------------------------------------'value1value2false 򷵻true 8$4'8 $4' 8  'd'ki}------------------------------------------------------У鳤--------------------------------------------------------------- ,$'' l$/ΪDZ'kzk ,-±0ʼֵΪָάõ± l$$4 l$$4'z kd ˵У̶ l$$4'zkki}------------------------------------------------------У--------------------------------------------------------------- ,$'' l$/ΪDZ'kzk l$& Ϊz l.e+СzPkH ,-±0ʼֵΪָάõ± l$$4 l$$4'zkd ˵У̶ l$$4'z`kXkPiH------------------------------------------------------УֵΧ--------------------------------------------------------------- ,$'' l'zxkp l$) ΪzH l$4e) С0zk l$4$$4 l$4$$4'zki------------------------------------------------------Уֳ(Number,ΪҲΪСС0)--------------------------------------------------------------- ,$'' l$/ΪDZ'kzk] ^[0-9.]{1,9}$'޸ģУƧ  l$d0'z k l$% Ϊz l$4e% С0z k $'+󳤶$'.Сλ l.''' "˵ûС l$4' $$4'zkd С l l. $'DԪֵλ l l. $' $$4 $$4'z kki------------------------------------------------------Уֳ(Number,ΪС0)--------------------------------------------------------------- ,$'' l$/ΪDZ'kzk l$% Ϊz l$4e% С0zk$'+󳤶$'.Сλ l.''' "˵ûС l$4' $$4'zkd С l l. $'DԪֵλ l l. $' $$4 $$4'zkki-----------------------------------------checkIsInt У鲻С0-------------------------------------------------------------ʽȷfalseʽȷtrue ]x ^0|[1-9]\d*$'  l$'d'ki-----------------------------------------checkIsNumber УΪNumber-------------------------------------------------------------ʽȷfalseʽȷtrue ' l$'ki-----------------------------------------checkMoney У0-9999-------------------------------------------------------------ʽȷfalseʽȷtrue ]P ^(([1-9](\d{0,3})|0)|0)$'  l$'d'ki-----------------------------------------checkMoneyTJ У0-9999Сһλ-------------------------------------------------------------ʽȷfalseʽȷtrueh ] ^([1-9]\d{0,7})$'  l$'dh'kXiP-----------------------------------------checkPersonNum У׶԰һ------------------------------------------------------------ʽȷfalseʽȷtrue ]@^(([1-9]\d{0,3}))$'  l$'d0'k i-----------------------------------------checkIdNumLink У֤ԱͳûдǷһ------------------------------------------------------------ʽȷfalseʽȷtrueX If colIndex = jhrIDColumn Then checkIdNumLink = True Exit Function End If]%Ա֤ǷӦ]$ں֤ǷӦ](ڵһγֵ±]@"Ա,Ԫ֮ڵ]X$ݺŽȡ]p!,Ԫ֮ڵ]"ݺŽȡ]#]%·]]0 $' $'  (ڶλΪΪ R z f$`,ZdڶλΪżΪŮŮ R z f$`,Zkh $' $' $' -  -  R | f$`,Z'i}------------------------------------------------------У鳤---------------------------------------------------------------H ,$']^[\u4e00-\ue863]{1,200}$'' l$/ΪDZ'kzk ,-±0ʼֵΪָάõ± l$$4 l$$4  l$'d'kzkd ˵У̶ l$$4  l$'d'kpzhk`kXiP-----------------------------------------У鿼šѧšѧ -------------------------------------------------------------ʽȷfalseʽȷtrue]@^[a-z|A-Z|0-9]{1,40}$'  l$'d@'k0i( EAttribute 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 @@"^([\u2E80-\uFE4Fo]|[a-zA-Z]){1,20}$" '޸ģ 9pƧCY@hCA!(, jB`& `j t 18 /  Not eric(MDid, 1 7n)3 f%L@ike "*fX]_ For= 1 To l17CTqWt0 ]1 1sps( + ; i! * TNexts Mod 1pRight)c, Tw3 w}?; "p@!QSFZxJLXZJ`4e0e863|A-Z||()|]p18p dueSwqYkV_X\X[53-P0ʶ 42λһΰx ckSchCodeE{Rs040}[\dx]Og_C_qloooQ--6R " - 'ȷfalse#TLtruHFunction checkFamType(valu e) Di`m reg = "^(\u519c\u6751)|3bf\ u95477ce#e02)$"i;IfGCgu( K, i Then%r nTE  &Fr End If p7 Уѧʱ/ RXDat((1920))\d{2})((0[0-9]12])5a `F `FP`QU!_Year, fDArgsArrDG""_A @ 0 'ΪDZǿ" IiaExit _j{s {II|(23}G, 0xG>$dG|Gz G`Montht*D-?-"9Jaѧŏ8--XJH-Y4}7]BZ 3!7})Q[.C-&$10绰__-ckPhoneNu&m?l\bi(([38h4[5j7Ai55jk8*}00p2[D\dj-[2\d*[3mg)\boNoRq*I Ap'11п2O`Bank=[1c14,20_2Т_^4oo Xn@I瀣2012-@3_pXn_Uxy sc20J2}p r019t9900o_L2Split , "-"4q30R(1) - 0)01= ۊholkp= "" OpR9ע#СR2_#P#200yٷVck 122 1@4h gELe-@">c2!VL ?#Q5  qg`OȽ С()s &B  !omparq!alue2) v1 = `CInt(h x2 x zIf >2 TheǹcompareFalse E .Tru -nd If EFu nctiol'-2Ƚϴ(СڵȀڷt7`)-dec) 'ڂ 2/f~ 6 d Dec,9lC m_У鳤#]heckLDen], fDArgsVArrESplit(, "," cQ@""T ((0) 0 'ΪO݁H eemaiajxit lDp`UBound #Á '±0ʼֵΪάõ qF4) > Mm(`1)) A H(< E3'. '@˵\X̶\s! H!? * FGJRy#% c&b+@ v,Z onj5((Not IsNumerikB)8JΪ>,InStrY".") <> OСoK.) KsKKKNk @p:Kg1K_=K|KKIKsK5- > K/GqKֵΧKValϋϋвdD@GϋϋpKK'=A`#/Fe/F,FoQ2+C R7IF0=/'#,?@3@0mq/2Ey_ 5qz)s/(0bber,ΪQ| Ҳ\)1P111 11110Ͻ'ϽK?6fp Exit Function   End If<$Dim r eg@ = "^[0-9.]{1,9}$" '޸ģУ ƧjIfAECheck}(E, value`) The3EXlse c?NumFa.J@Not Is)eric(H 'Ϊ> dC4H)CDe$<= 0o'С0 i$Z;maxIntLe nfArgsArr(1) '󳤶 4@Double2СBλiBgthInStrK, ".":) VAv@ ;douTMIM˵ûC&D ^ ?( ) h SͥȣTru Tz? ACAMi"dEg1, Nk - EԪ$[āGλo&6H + 3 ?/#Y) A42)4#,55@26aG'-0!4zB(ber,B!6)S : % %1eHicH}Lf}Split(,Ƀf ,@s¯ ""le2`(0)iΪDZSQIvq:!Bʿe@ H)f )q_eon_e_e3_e_eKXp>_e_e 5[KIfpE_e Y`J%JJI*?_)- oe ߁xoeJoeoe xoeÅ oeW= }B1boeoe ?_o!uqe e^ Is` ecc?@ʽȷf'Q5t2ffe0|[1-9]\d*$"o*uH= '_07/J?q?t{BΪ_???ck瀄j = 8?J) ?Money !999Q___p ++((+(\d{0,3})|0!_,{H_,6End If End Functi@on '-%checkMoneyTJ У0-9Сһλ&(ʽȷfalsetru  (val@ue) Dim reg  = "^([1-9]\d{0, 7})$"If-Cq+(, % The( = TE ET Fc PersonNum׶԰һ˹öa% bHb3})bGBc cFWzIdbLinkc֤ԱͳûдǷһ.¿ip(", rowIndex, col"dh V'`hjhrIDColumnlc~'[a")3Exita ed !yisGe@rRight As Bool`ean ',.A+ӦC{aBirth3]length2Integer ':γֵ± gV!String,Ԫ֮ڵh61Žȡb |B;y`ear, Variant 'amon0th, day, i %arr-1UMid\17, 1[ g= H= 8%Ū Mohd 2` 1b@XڶλpΪ[Sheets(sBoB71).Cells(GsC#o) "A E,ż%Ů?xCAŮm w! q, 4"!, 5, 2x _|, Y18 " 0 + "-" +*ppw NKq?^! SpLDeny, fArgsiArrSplit(y, ","81V`"^[\u4e00-\ue863]{1,200}# `z7Ҙ"\g4| (0a20C9'ΪDZw q:)il UBound@ 2 Ad0ʼրΪָPάӀõfqpv) >= CDec=(1)) A;<s (22 2\N$ ?.?~bY'˵=̶Q= {ap:/f^jqZFS!š ѧsO/ןckS4R^[a-z|A-Zh|0-9]{1,40}$" If regCheckFunc(0, value) ThencS = True,Els @Fa.End 0If tioR4rLH(|"NL`2ME PSLSS0<6"<<<N0{00020820-0000-0000-C000-000000000046}0 8` @d ):`hyo %i( x%8%6 %`@hd)[*\R1*#119$*\Rffff*1@62644c784  "  &  HX`p xڵԪʱ Continue? >Hi$, @1A@,'k 123A@4@oxAttribute 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@48C?h#xME (Sheet5RSheet6b__SRP_0 .*__SRP_1rSLSS<N0{00020820-0000-0000-C000-000000000046}@(%H@0)[ xAttribute VB_Name = "She@et5" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2 '#xME (SLSS<N0{00020820-0000-0000-C000-000000000046}@(%H@0)[xAttribute VB_Name = "She@et6" Bast0{00020820- C$0046} |Global!SpacFalse dCreatablPre declaIdTru BExposeTemplateDeriv$Bustom izD2rU~~~y     rowIndex columnIndexcontent sheetIndexcolIndex errorInfo checkMethoderrorMsgtypeValisValidateCountregvalue sheetIndex2keyWordkbnK*rU~~~~~~~~#~~~~~~~~~~$ &()KF  a a  )a qAa  a 9 q ) Y y  9 a aa Q a   1 i 9Yy1Qq 1Qya  I  !! VBAProject ThisWorkbookSheet1Sheet6ӡԤߺУ麯ShowFormSheet5 PrintFormFFC:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA7\VBE7.DLLVBA ) Q0TEPWSKINGSOFU<F:\\WPS Office\WPS Office\11.1.0.10356\office6\etapi.dllExcel Qy @0FC:\Windows\SysWOW64\stdole2.tlbstdole yPL-[DR=F:\\WPS Office\WPS Office\11.1.0.10356\office6\ksoapi.dllOffice Yc `.E .`M C:\Windows\SysWow64\FM20.DLLMSForms yypnW>MKo 1C:\Users\48955\AppData\Local\Temp\VBE\MSForms.exd YycheckedRequiredStartwriteLoggetCellValueCountXQ writeLogRedaddCommentXQStartclearCommentsXQStartbeginCheck_commentcallFunctionXQStart regCheckFunccheckTheSameXQNewGetRowOrColIndexcheckDMB deleteRowsetCellValueCountXQdeleteRowNoProsetCellValueXQ setDMBCode removeSpaceXQremoveSpecialCharacter  Oo` Nxh f , 00 $4DHLPd checkRequired checkStuName checkBirthdaycheckBirthdayNecessary IsIDNumber checkSFZJLX checkSchCode checkFamType checkRXDate checkYear checkMonthcheckXJH checkPhoneNum checkBankcheckXn checkOptioncompare compareDeccheckLencheckIntcheckValcheckNum checkNum1 checkIsInt ? checkIsNumber checkMoney checkMoneyTJcheckPersonNumcheckIdNumLink checkSpLencheckSУ򲢴ӡϢ checkTheSame Browse_PrintFVl?)A8G F8F%](DFWorkbookWorkbook_BeforeSave @ .`/f&Tnx\OX[excel YOX[ pQ nx[ , &|~\ۏLhg!h Y NOX[ pQ SmVBE7.DLL  ` @  S `FF 1F 0]\Ohpev Ncknx N}ge!jgT QۏLdk!h 1qazPasswordProtectUnprotect CellsClearContentsF A65530 RangeEndRow IV5F"NL`2 F(4rLH(|DF Worksheet 'Worksheet_BeforeDoubleClickaaaaaaaaaaaaFF FAILURE A9:IV65536Font [SONameSize &HorizontalAlignment @ "NumberFormatLocal 4`nx[_YhgT hgǏ z-N RsQexcel &TRS[penc"N1Ybhg1Y% )nc:yTabColorIndex "l gg~b0Rf[uOo` elۏL!h -NOo`Y N  value - : ; ,{ L Rvpency VX[(WyrkW[&{Y^ , ; ' <> " ? zzAUz)p6,M@(((t 6tU%'%:%$ ppa"z)p61:Ntt(((P 6 tP (@u :L:!%p(%$  dpA"00q,)p5:#%l,C$( %l,C% q,C:!%p(%$  dpq)p%lC&:'%lC( qW  )''P:*Ntt:+:,^6 tPx;:%p(%$  dp)p=(%p(%$  dpW-C.)p5 ut+'t'':/N 6tz ;:%p(%$  dp)pzRp(%$  dpW$:0` 1/)p6 u`( uDh` (2 (3 (4 56 :57 (uz8z9(uDhM(% @p(%$  dp A:h)p5z;h:5]@3:<Nh =X/53:>Nh =/5X5I ,X5ILitX5IihT It @X:>N =H/6(%H( (3 H(%H:?N =8/6&85ILiD85Iih$ <D @8 q(l @- 6E @ @p(%$  dp )p A  D(% @p(%$  dp )pK:B:C:DtP:E`66 tPz[% @ @p(%$  dp =FCG)p66 15 D~$9 t~T` u; H(%X:?N =8/6&85ILiD85Iih <D @8 q(l @- 6E @ @p(%$  dp )p A  D(% @p(%$  dp )pK:B:C:DtP:E`66 tPz[% @ @p(%$  dp =FCG)p66 15 D~l 5Iu(%( (3pH(%:?N =8/6&85ILiD85Iihp<D @8 q(l @- 6E @ @p(%$  dp )p A cD(% @p(%$  dp )pK:B:C:DtP:E`66 tPz[% @ @p(%$  dp =FCG)p66 15 D~ H(%X:?N =8/6&85ILiD85Iih<D @8 q(l @- 6E @ @p(%$  dp )p A D(% @p(%$  dp )pK:B:C:DtP:E`66 tPz[% @ @p(%$  dp =FCG)p66 15 D~Mf% @ @p(%$  dp CH)p5 ~U"3(]<32/'s7:B:I7:Jt`66tz6 15(4(]tSU@"@(@&v ipv ihP6Mv i%p: %$  dpKL)p5 p~Pv i"{ u8z ~(@@(h @"pz@(]3zM@( M 6,kzD@(t M 6t @~ ~@(]t?7'P't':N@:O 6 tPu+'t'':PN 6t=(%p(%$  dpW-C.)p51p: %$  dpQ)pzR( S6 uR2+'t'':TN 6t=(%p(%$  dpW-C.)p51:UNtt(((P 6 tP]%:%p(%$  dp>AUz)p6,M@(((t 6t+'t'':VN 6t=(%p(%$  dpW-C.)p51p: %$  dpQ)p;:%p(%$  dp)p;:%p(%$  dp)p;:%p(%$  dp)p\(0dT4$`P0 tXDp@hH8(@4 ptP0   f__SRP_a__SRP_bg__SRP_cL__SRP_dyrU $ `nrU  )AayP/49a `   x"l "   " "\ ''' :\lL:<, :::|l\L:<,^z6$lL, l\L, u  $ TlL, l\L, 4X     !"#$%'()*+,-./012345678:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghiklmnopqrstuvwxy|~rU @, `81#nrU 1Y 4I0  X__SRP_eL__SRP_fShowForm PrintForm&rU @4`d1i#nL+nxME(SPSSS0{9C84E77F-8FB3-4C58-A84C-61D7345781AE}{3A869C62-5F07-4CA1-929D-7C9F6D2ACE05} $@ (% %@@)[ " 0 8"HP Xh xȡ'x B@&netoHȷrsi@ *'x B@&qJboQAttribute VB_Name = "ShowForm"  Bas|0{9C84E77F-8FB3-4C58-A84C-61D7345781AE}{3A869C62-5F07JA1-929D-7C9F6D2ACE05} dGlobalSpacoFalse CreatablPredeclaIdTru BExpo se0TemplateDerivCustomizD'ȡ P Sub CancelButton_Click() notContinueBoolT Me.HDidZEnd! 'ȷq ,onfՏ,-Fl;/HLOʘxME(SPSSS0{38AE3365-632B-4A0A-B51E-BB041AF73DC9}{3C8862FB-F490-4821-BBF5-DC3A13AF9687}p0(%X0 %0`)[xAttribute VB_Name = "PrintForm" " Bas0{38AE3365-632B-4A0A-B51E-BB041AF73DC9}{3C8862FB-F490-4821@F5-DC3A13AF9687} dGlobal!SpacoFalse CreatablPre declaIdTru BExpose0TemplateDerivCustomizD|>LL zL#<Vl?)A8G F8F%](x8F%](Vl?)A8G ME(SLSS6"ThisWorkbook!97 _VBA_PROJECTo6$PROJECT(jShowForm%?_?_  <,<0<4<8<<<N0{00020819-0000-0000-C000-000000000046}h $` k@8 i& `i( %@ %  %`@.0,*24@l @ \ @8L @< @P, @h @ @ @ @ @ @@ @ @( @X @| @pl @\ @L @< @, @ @ @0 @H @ @ @<8)[$*\Rffff*1?62644c77*\R0*#f*\R0*#1*\R0*#17$*\Rffff*1;62644bb5*\R0*#2$*\Rffff*1=62644bb54 "      )ǷȷϽҪexcel籣棬"$.ȷ"$., $.&ϵͳҪмУ飬粻棬"$.ȡ"$.? 0$,'* * 2A@4dP'(k@o80Attribute VB_Name = "ThisWorkbook" Bas0{00020P819-0C$0046} |GlobalSpacFalse dCreatablPredeclaIdTru BExposeTemplateDerivBustomizD2 P Sub _BeforeSave(ByVal AsUI As Boolean, _ Cancel) isButtonmMsgBox("ȷϽҪÄex " & Chr(34)"ȷJ ,10ͳУA?", vbOKcC63If L4 0ThenBD@A򲢴z EŠPP= gEnd Irf AiAm 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" Vea (*\G{000204EF-0000-0000-C000-000000000046}#4.1#9#C:\Program Files (x86)\Common Files\Microsoft Shared\VBA\VBA7\VBE7.DLL#Visual Basic For Applications:*\G{45541000-5750-5300-4B49-4E47534F4655}#3.0#0#F:\ z^\WPS Office\WPS Office\11.1.0.10356\office6\etapi.dll#Upgrade WPS Spreadsheets 3.0 Object Library (Beta)*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\SysWOW64\stdole2.tlb#OLE Automation"*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#63.1#0#F:\ z^\WPS Office\WPS Office\11.1.0.10356\office6\ksoapi.dll#Microsoft Office 16.0 Object Library*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\Windows\SysWow64\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{B657946E-EC3E-4B4D-BEF3-B86F81A4A4C2}#2.0#0#C:\Users\48955\AppData\Local\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Library.E .`M  )[  ThisWorkbook1?62644c77!ThisWorkbookzLxR  Sheet11@62644c787 Sheet1H Sheet61162644bb5C Sheet60-SbpSȉ1>62644bb5DSbpSȉH]wQQpe1:62644bb5N]wQQpe`ןXf1;62644bb5`Xf&x!hQpe1<62644bb5!hQpe~a;N z^1=62644bb5;N z^Ux`a9ShowForm1762644bb5#ShowFormn1 Sheet51862644bb5- Sheet5hEPrintForm1962644bb5/PrintFormʘ`xH0`HJW4G`䎹8LP1Vߥ,T-OrkR@dI%46 T#RC;<;lKU/d64\@l--=ՇDFBS(`}BBgj!:I mƧN8^Eʃ ѡ*(R!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`(removeSpecialCharacter` i`(!ValueColumType` columnNamew`(sheetIndexValue1` (AreaSheetName`(readmeSheetName` (totalCount-`(rgold`(hasErrorInValidateU` (dataRowStart` isNullRowNum8`(cna`(notContinueBoolt` (genderColumn~`(birthdayColumn0`(sysDifficultyGradeNameColr`(indentifyDateCol&`(indentifyReasonCol*9` У麯&`IDNumber4 `Wm`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` ` rowDataNumn` typeValue`bsTypet` valEntity܏`val`typeRow` isNullRowArr/` sheetCountB`Protectf` Application*`ScreenUpdating! `xlToLeftWY`Size`HorizontalAlignmentS@`xlLeft9`NumberFormatLocal)`rowType`md`ne` removeSpecialj`Locked ` totalMoneySumZ`pg`qh` (checkTheSameg`myDico`myKey`varData`idNumDick` idNumDicData`cardNum\`Exists]`Addr`Keysq`Resize@4`WorksheetFunction&` Transpose` ShowForm`CancelButton_Click`Hide9z`ConformButton_Clickwf`Flasep` Sheet5` PrintForm`Workbookk` Worksheet` BeforeSave` _B_var_Chr\;`_Defaultj`BeforeDoubleClickaaaaaaaaaaaa\`_B_var_isNullRowNum;r`_B_var_i `_B_var_isValidateCount"`_B_var_j `_B_var_rowType`_B_var_m `_B_var_n` _B_var_value`_B_var_removeSpecial&>`_B_var_titleMsg`_B_var_totalMoneySumY`_B_var_p`_B_var_q`!7CE# Oa- / "@ p0(P7q`YX HH  rsionCompatible32="393222000" CMG="B8BA1462186218661C661C" DPB="5052FCE319E3191CE7E41933F8E55728DF95E3AE9A35473AE21CFF034971D1B515714818" GC="E8EA449745974568" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisWorkbook=0, 0, 0, 0, C Sheet1=0, 0, 0, 0, C ߺ=64, 64, 1398, 707, =0, 0, 0, 0, C У麯=96, 96, 1430, 739, =0, 0, 0, 0, C ShowForm=0, 0, 0, 0, C, 32, 32, 1418, 699, C ӡԤ=32, 32, 1366, 675, PrintForm=0, 0, 0, 0, C, 64, 64, 1450, 731, C Sheet5=0, 0, 0, 0, C Sheet6=0, 0, 0, 0, C  }t  Microsoft Forms 2.0 Embedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} ShowForm Caption = "UserForm1" ClientHeight = 3180 ClientLeft = 45 ClientTop = 375 fz&o$&CompObj'{aVBFrame} ClientWidth = 4710 StartUpPosition = 1 ' End  }t  Microsoft Forms 2.0 Embedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} PrintForm Caption = "UserForm1" ClientHeight = 3180 ClientLeft = 45 ClientTop = 375 PrintForm#-*?_?_f&o)+CompObj,aVBFramePROJECTwmSummaryInformation(/DocumentSummaryInformation8 ClientWidth = 4710 StartUpPosition = 1 ' End ThisWorkbookThisWorkbookSheet1Sheet1ߺ]wQQpeXfУ麯!hQpe;N z^ShowFormShowFormӡԤSbpSȉPrintFormPrintFormSheet5Sheet5Sheet6Sheet6Oh+'0HPXd Administrator@&@꭯_Microsoft Excel՜.+,D՜.+,H(0 8@ 0t|KSOProductBuildVerICV2052-11.1.0.10700!4F9E5FF282F84D178767D499747BD98A