��ࡱ�;�� W��������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������� T8�������\p Administrator B�a�=�� ThisWorkbook���=�9�8X@�"��1����[SO1����[SO1����[SO1����[SO1�����[SO1����[SO1����[SO1���Arial1�����[SO1h>���[SO1,>���[SO1�>���[SO1@����[SO1����[SO10���[SO1�����[SO1����[SO1�����[SO1���Arial1�Q���[SO1����[SO1����[SO1����[SO1����[SO1� ���[SO1����[SO1� ���[SO1@����[SO1����[SO1����[SO1���[SO1@���[SO1����[SO1� ���[SO1>���[SO1����[SO1� ���[SO1����[SO1����[SO1�4���[SO1� ���[SO1����[SO1� ���[SO1�4���[SO1�<���[SO1�?���[SO1�>���[SO1����[SO1@���[SO1����[SO1@���[SO1����[SO1@���[SO1����[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.005�0_-"�"* #,##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� �587 �68� �787 �88� �987 �:8� �;87 �<8� �=87 �>8� ||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� 5�G�.� 20% - @wr� 5 ef���� �%� 20% - @wr� 6�G�2� 20% - @wr� 6  ef���� �%� 40% - @wr� 1�;�� 40% - @wr� 1 �%� 40% - @wr� 2�G�#� 40% - @wr� 2 �L渷� �%� 40% - @wr� 3�;�'� 40% - @wr� 3 �%� 40% - @wr� 4�;�+� 40% - @wr� 4 �%� 40% - @wr� 5�G�/� 40% - @wr� 5 �L���� �%� 40% - @wr� 6�;�3� 40% - @wr� 6 �%� 60% - @wr� 1�;� � 60% - @wr� 1 ����%� 60% - @wr� 2�G�$� 60% - @wr� 2 23ږ�� ����%� 60% - @wr� 3�;�(� 60% - @wr� 3 ����%� 60% - @wr� 4�;�,� 60% - @wr� 4 ����%� 60% - @wr� 5�G�0� 60% - @wr� 5 23���� ����%�! 60% - @wr� 6�;�4� 60% - @wr� 6 ����%�"�����~vR�k� #h�����h��� $h�� 1���h�� 1� %h�� 2�1��h�� 2%�?����� &h�� 3���h�� 3� 'h�� 4���h�� 4�(�]�5���] ����� ���%����+��8^ĉ �%�)8^ĉ 12�1���8^ĉ 12 �%� *8^ĉ 2�/���8^ĉ 2 �%�+ 8^ĉ_hQ�VL�?e:SR�Nx�,���(�������c  ���-}Y�5��}Y ����� �a�%� .Gl;`�+��Gl;` �%�/�����'�^�0��� ��'�^[0]� 1���{�c�����{ ��}�%������ ���2�h�gUSCQ@wr� 3�;�%�@wr� 3 ��Y� ����%� ?@wr� 4�/�)�@wr� 4 ����%� @@wr� 5�;�-�@wr� 5 K��� ����%� A@wr� 6�;�1�@wr� 6  ��F� ����%� B�lʑ�^� ��lʑ �������������������� ������X��TableStyleMedium9PivotStyleLight16��8�������������������������������3f������ff���f����������������������������������̙��̙3f�3���������fff����3f3�f333�3�3f33�333\���`�"�` ؚ!h,gN�y�[�^�~Nm�Oo`U_eQ��x�Nxh��ē���Oo`�����VV�����!  =- KmՋ@b g!h��ĉRv^SbpS���Oo`���f�f��@@���������F�>��x�MObS ���A�A�@�A@�  �� ��1 71 �xm 7sfzjh 7 familyMembers suortMembersfamilyYearIncomedisasterDescribe burstDescribe 7poorStudentEntryfamilyDebtAmountfamilyDebtReason checkDiffName���[�V���~+R T�y checkSqyyCode3u��t1ux�k�uNO�O checkSqyyName3u��t1u T�y checkYesNo 7 checkGender 7 checkYesNo checkSfzjh�e�l T 7�^�S/�f 7 T�y 7{|�W 7/f/f 7&T 7sY 77u 7'`+R7u 7vQ�N 7�e 7US�N 7d[?Q 7�p�XP[sY 7�QQg�N�O 7�V�u 7�V~p 7�m�QNN 7�S��kX /f b &T �^��_kXy� 7 checkNum0,6,2 ��Y T 71 7���[�e�����[�S�VclassIdentifyReasongradeIdentifyReason�s�~���[a��t^�~���[a��checkLen0,1,33���[�V���~+R T�y 7sysDifficultyGradeName 7 indentifyDate 7indentifyReason 7 checkDiffName 7yr+R�V�� 7�V�� 7N,��V�� 7 N�V�� 7T�y��Y�gkX�Q �R ���[�e�� 0 ���[�S�V _N�_{� T�ekX�QN T�e�Ǐ!h��0kX�Q���[�v�V��I{�~ ��S��/f yr+R�V�� � �V�� � N,��V�� � N�V�� -N�vvQ-NN*N �^��_kXy� 7/f&T�N�O7b 7/f&TNO�O 7/f&Td[?Q 7/f&TUS�N�[�^P[sY 7/f&T�k�u�NP[sY 7,g�N/f&T�k�u 7 /f&T6r�k'N1Y�R�R���R 7 /f&T�[-N g'Y�u�`� 7 /f&T�^ch�zaS�v+��V7b 7/f&TNO6eeQ�[�^ 7 /f&T�Q�p^\bO�bP[sY 7�[�^�NGWt^6eeQ 7 �[�^/f&Tm��S�6q~p�[ 7 �6q~p�[wQSO�`�Q�c�� 7 �[�^/f&Tm��S�z�SaY�N�N 7 �z�SaY�N�NwQSO�c�� 7�[�^ k:Pё�� 7�[�^ k:P�S�V 7�[�^�N�Spe 7a�{Q�N�Spe 7�k�u{|+R 7 �[�^;N��6eeQeg�n{|�WfamilyIncomeTypeNameJkX�Qf[u�[�^;N��6eeQeg�n{|�W ����S��Nxh�-N�v�[�^;N��6eeQeg�n{|�WۏL�kX�Q ��Y �]D�0VYё0%m4�0e�4��TvQ�N�R�R6eeQ 0 � �L�N6eeQ I{ �^��_kXy� 7checkDisableType 7checkFamilyIncomeTypecheckFamilyIncomeType 7Ɖ�R�k�u,T�R�k�uzf�R�k�uvQ�N�k�u�k�u{|+R 7�]D�0VYё0%m4�0e�4��TvQ�N�R�R6eeQ�y�Oё0�W,g{Q�ё0�W,gu;m9�01YN�Oi�ё�~b0�c�S`��N0�Q�yb�Q.U�[�^"��N���_�v6eeQX[>k�S)Ro` � g�N��8R�S�~)R0��hy0ZSi_6eeQ�~FU0�R�S�N�S�N�N�y iN0 {Q iN0�R�]Ncbd��_��b,gT�v6eeQ a�{Q9�0�b(vb){Q9�� �L�N6eeQ vQ�N�^S_��eQ�[�^�v6eeQ�[�^6eeQeg�n{|�W 7 checkYear 7checkIdentityReason 7�S��kX /f b &T �^��_kXy� 7�R�R�R�N�Spe 7 otherInfo 7�[�^bXT1YN�Npe 71 7Nt^�~ 7t^�~ 72 7�Nt^�~ 73 7 Nt^�~ 74 7 Nt^�~�S�N N 75 7�Vt^�~ 76 7�Vt^�~�S�N N 77 7�Nt^�~ 78 7�Nt^�~�S�N N 79 7mQt^�~ 710 7'`+RsY 7mQt^�~�S�N 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& kX�QvQ�[N�Nq_�T͑'YFO*g(WR�v�[�^�~Nm�Oo` ���^ N��Ǐ100*NW[&{0^��_kXy�! 7checkLen0,1,100 7  ؚ!h,gN�y�[�^�~Nm�Oo`U_eQ 7checkLen0,1,100 �checkLen0,1,60 7 checkYesNo 7checkLen0,1,40 71 7 otherMessage 7vQ�N 7/f&T�QQgyr�V�O{Q 7/f&T�QQgNO�O7b 7vQ�N�Oo` 7isCountryLowFamily 7isCountrySupport 7(kX�Q�QQgyr�V�O{Q0�QQgNO�O7b0�^ch�zaS�vsQ�Oo` ��Q�[ N����Ǐ40*NW[&{0^��_kXy� 7�S��kX /f b &T �^��_kXy� 70�S��kX /f b &T ���y�kX /f �R /f&TUS�N�[�^P[sY y��S��kX &T ����L��h�g0^��_kXy� 7,�S��kX /f b &T ���y�kX /f �R /f&Td[?Q y��S��kX &T ����L��h�g0^��_kXy� 7<�S��kX Ɖ�R�k�u 0 ,T�R�k�u 0 zf�R�k�u 0 vQ�N�k�u 0� ,g�N/f&T�k�u y�-NkX�Q &T �R�y� N��kX�Q0^��_kXy� 7#pek ^��_kXy� 7% kX�Qf[u�[�^�N�Spe �'Y�N0 �N�N�Spe N����Ǐ99 ��O�Y�SkX�Q 6 ^��_kXy�  7( kX�Qf[u�[�^�R�R�R�N�Spe �'Y�N0 �N�N�Spe N����Ǐ99 ��O�Y�SkX�Q 2 ^��_kXy�"# 7' kX�Qf[u�[�^1YN�N�Spe �'Y�N0 �N�N�Spe N����Ǐ99 ��O�Y�SkX�Q 2 ^��_kXy�!" 7'kX�Qf[u�[�^a�{Q�N�Spe �'Y�N0 �N�N�Spe N����Ǐ99 ��O�Y�SkX�Q 4 ^��_kXy� 7*kX�Qt^�~���[a�� ��Q�[ N����Ǐ33*NW[&{ ��O�Y �[�^�`�Q�c��^\�[ ��~�N���[ ^��_kXy� 7P�y��Y�gkX�Q �R ���[�V���~+R T�y 0 ���[�e�� _N�_{� T�ekX�QN T�e�Ǐ!h��0kX�Q�v���[�S�V ��Q�[ N����Ǐ30*NW[&{ ��O�Y �[�^�N�SOY ��R�R�R��\ ^��_kXy� 7*kX�Q�s�~���[a�� ��Q�[ N����Ǐ33*NW[&{ ��O�Y �[�^�`�Q�c��^\�[ ��~�N���[ ^��_kXy� 7checkSpLen0,1,100 7 4135012711 checkInt0,2,0 �( �_{�:NIlW[��S�NS+T� � ���^'Y�NI{�N1 �N N��Ǐ20*NIlW[ ��O�Y _ N �_kXy�% 7 checkName 7D�y��Y�gkX�Q �R ���[�V���~+R T�y 0 ���[�S�V _N�_{� T�ekX�QN T�e�Ǐ!h��0kX�Q�V��I{�~���[�v�eg ��A?�-@m�@1�B��C�EF �F� �@din��jn�7� Sheet1gg����Dh8hj�:S�W2_1 T8��� T��ϒ  d����MbP?_*+��%����&ffffff�?'ffffff�?(�?)�?M�Foxit Reader PDF Printer�_�� � 4dXXA4�" dXX333333�?333333�?�&�<3U} �K} �E} �#E} �!E}  J}  J}  JT�@ , , , , , ,,,,,� I� C� C� I� L �DDDD� J��DDDD� J�� DD�?� F� D� DD� D� D�DDGD� DD@� F� D�� DD�?� F � D!�DDDD� DDGH� D  D�?� F;� H � D  D5@� F<� H � D  D6@� F=� H � D  D@� G>� H �DDGH�DDGH�DDGH�DDGH� 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$@� D�DDDD� DD� D#� D� DD�?� D$� D�D�lF <<<<<<<<<<<<<<<<<<<< !"#$%&'()*+,-. @/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� 6Dh7D�9DbDD�:DbDD�;DbDD�<DbDD� =Di� =bo� =bp� =Dq� >Di� >br� >bs� >Dq� ?Di� ?bt� ?bu� ?Dq� @Di� @bv� @bw� @Dq�D�l<<<<<<<<< <<<< <<<<<<<< 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�� FDq�GDbDD� HD�HD�?� HF�� HH�� ID�ID@� IF�� IH�� JD�JD@� JG�� JH�� KD�KD@� KG�� KH�� LD�LD@� LG�� LH�� MD�MD@� MG�� MH�� ND�ND@� NG�� NH�� OD�OD @� OG�� OH�� PD�PD"@� PG�� PH�� QD�� QD�� QG�� QH�� RD�� RD�� RG�� RH�� SD�� SD�� SG�� SH��*�h888888<<<<<<<<<88�P�H � �0�( � � >�?@��GGG� 7� Sheet5gg����D T8��� ����  d����MbP?_*+��%����&ffffff�?'ffffff�?(�?)�?�"�333333�?333333�?�&�<3U�P�H0��0�( � �>�@��  � 7� Sheet6gg����D ����������������������������������������������������������������������������K*� ����  rU��@@~~~~~~~~~4~~ ~~~~ ~ ~ ~~H"Q��_�G���F��< ��������� ��a!���������,�����a!��������������a !�����������������������������������������������������aq ��������0��������Q��1q��1a��A�����!�a��������������������Q� q ������������������.�.�./Q/�/�/�/0A0q0�0�0111Q1�1�1�1212a2�2�2�2!3Q3�3�3�34��q�aq ����������������� A ������������������������������a !�����������������������������������Q�!  VBAProject ThisWorkbookSheet1Sheet6��ӡԤ�����ߺ�������У�麯��������ShowFormSheet5 PrintForm��F1C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA7.1\VBE7.DLLVBA A�������� q�P�F  E:\office2013\Office15\EXCEL.EXEExcel ����������1p0�FC:\Windows\System32\stdole2.tlbstdole ���������a�L��-�[���D�R?C:\Program Files\Common Files\Microsoft Shared\OFFICE15\MSO.DLLOfficeMSForms ��������A���.E ���.`�M �C:\WINDOWS\system32\FM20.DLL �����e�*'@|G����2:�2C:\Users\lenovo\AppData\Local\Temp\VBE\MSForms.exd � �� ����������У����򲢴�ӡ������Ϣ checkTheSame �F��F� � ��������&m� ��F&m�  0�]\Oh�pe�v Ncknx ��� N}�g�e!jgT ��QۏL�dk!h��VBE7.DLLUnprotect���������S �@(~ 1qaz.�� PasswordProtect ���Oo` �Nxh� �f , JJ�  8Phpx�� CellsClearContents��F&t ! A65530 RangeEndRowcheckedRequiredStartwriteLoggetCellValueCountXQ writeLogRedaddCommentXQStartclearCommentsXQStartbeginCheck_commentcallFunctionXQStart regCheckFunccheckTheSameXQNewGetRowOrColIndexcheckDMB deleteRowsetCellValueCountXQdeleteRowNoProsetCellValueXQ setDMBCode removeSpaceXQ IV5��FU�ӿN}M��x���;� �F��7�۬H�l�\���D�F Worksheet 'Worksheet_BeforeDoubleClickaaaaaaaaaaaaF�F x a &TR�S���[�penc"N1Yb�h�g1Y%� )n���c:y:�q FAILURE 4�`nx�[_�Y�h�gT� �h�gǏ z-N ����RsQ�excel ����������` a�TabColorIndex "�l g�g~b0Rf[u�Oo` ��e�lۏL�!h���Name -N���Oo`�Y N�  value -���������� q%(~ : ; Locked ,{ L��vpency�� -N�\ gN*N�kX�Qcknx����h�g ,Rows Delete dk!k!h��-N Rd��N :L��eHepenc��Y T0���N���N�SR!h����1Y%�sS9eL�:N�eHepenc � * g���Oo` ����g w ���Oo` h� �ۏL��Ock Select !h���Ǐ! SUCCESS * g͑ Ypenc ����g w ���Oo` h� �ۏL��Ock� P��=�q|{K�p�B}�$��Xm oI�� f$�FQT��zD��:���(�����F��$e�E��F���_�D�+���&/��F�+^�Q B���WhG�ID�FWorkbookWorkbook_BeforeSave .�`/f&Tnx��\���OX[�excel ��Y�OX[ ����p�Q nx�[ &�|�~\��ۏL��h�g!h�� ��Y N�OX[ ����p�Q �S�m ? checkRequired checkStuName checkBirthdaycheckBirthdayNecessary IsIDNumber checkSFZJLX checkSchCode checkFamType checkRXDate checkYear checkMonthcheckXJH checkPhoneNum checkBankcheckXn checkOptioncompare compareDeccheckLencheckInt checkNum1checkValcheckNum checkIsInt checkIsNumber checkMoney checkMoneyTJcheckPersonNumcheckIdNumLink checkSpLencheckSz����������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������� ������ ����&��������������������������x��RR��������������������ME�����������������������������������������������������������������������������������������������������������������������������������������(@��f0��B6 ����<������� f��������h�Z0��h�h�������l`�����H���������������p�������@��������ʀ������ ��@�����������8���� ��@��������ꀘ h������ @����������@Px����� @��������%������Ϣ�����������%ꀰ������ �� @���������������� �� @��������ꀬ����� ��@��������� @����B��������������•p�������@��������ʀ������� ��@�����������������@��������ꀲ����� ��@���������H0����B���������������\`h����B��!������������ʘ������B��#����������������������%@��������˵��%����h�������������j0����B���������������hHp����H���������������nx�����H��������������ʘ������B��������������ʀ�� ���� ��@��������ʀP���� �� @����������r8p����h @��������ꀪ�������� @���������0�������� @���������&������ �� @���������t������ �� @���������v ����B���������������xP�������@��������ꀚ������ ��@���������j��������@���������z��������@��������ʘ�����B���������������|@����� �� @��������ʘ~p����B��"������������ʘ������B��$�������������������������&@��������p��H Pp`���� ��0�����������������x�0���������������������������������8���������@@������`����������������������P��������d��������������������������������'�����������������������������������������������������������������������=�Պ�Z*\R1*#278$*\Rffff*0=5b1ba24b(*\Rffff*0=5b1ba24b\0�7��7� ������ ����� �� �0�8� ����� @� �����`� Dp��� 8��� �0� P�0p�D����0�8�4P�.�� �����.����.�(8�(`�>��"��$��(�@�>`�R��^��FX����� �����`��*0�$`� ���� ��$�� �� �^(�^����������������^����������^�0p��@�����һ���ṹ����������ҳ��]$��H�=Public Const sheetNameValueTJ As String = "����2������ʵͳ��"]$�������Ϣ�0�2Public 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-ͨ��У����ֵ��Ϊ����������A�Attribute VB_Name = "����" Public Typ�alueCo8lum8p '��������c@nIndex As I@ntegerTø��� P�'S��ngEndn _ '����һ���ṹ��������0��ҳ"�Const shee�t{V�1 ��p1 '/ATJ�D�����2�������`�ͳ�ƀ� m8sgS�8 b�������Ϣ��8 ��ro��� ˵� 3Area��3����K�dme�0tot�alCount�J�u��¼�ܵ�У����  �$startT�itl��7 ' ��ͷ������ atLea�OneNNulD 'ִ�� �����t�ǿ�A �ĵ�Ԫ�����Ŀ��\�������������Ϲ`����J�;Money�;Varia�>'ÿһ�кϼ�����ֵK Err or@� -ʱ��/A>A{C/� e� Ms>gAD���� rgold�Rang@e '---A�Ԁ�ģ���Є ��ĸ�����FTarge�n� �����V��qfuncti@onArgsh'0����">@���������������ַ���fisSav�eButton}CAʱ�ر���ť�has�(�}Boolean�{�'�L����0���Щ7 TheSa@�_������ĮIdN\um�]�n �idaै�_�����Ч��ǰ��������>�\״̬�checkMet�hodXQ�AA1�A0�ķ����R��aRowS�q���0= `r��+п�ʼ�x�!��x�cardID"�J8= 3 'ѧ�����֤����aλ�� Dim is�y�)�!Ϊ�եn�e&򌿴���?Ϊ��� �a� �� 5�������ֶ� c ��f'removeSpaceFlam�:�ȥ���ո����@z��������H��a�ˡ��+true����false]g4eA����c�� ���ԭa*�����t����û�н����Զ���������û����o@<֮�C�c� ur��@*�)Long �'�ϴ�дEGa���!9,Ӧ����Ŀ��ʼ��ʱ�ֵ҈���F rna� �eB'���,�c����q^�isFPOi.�ڸ��ݱ�ʶ���ò8�ͬp)B� �����;��for@ѭ�� C�_�Sele�FChN����Ҫ�À���ñ���^��,headI��2(�+ʡ���ص�ȱ�& S�qs��9= 2 '�2r����±�P�!� �����no�t�tinueQ$AqPJ��PlubS7104 '�����d����?sysDifficultyGr8adeq��7�29 '������@������� wtsi�ntif yD�Gs30 '�1ʱ��?�6@ReasonT1�Sԭ��\sO ?W6�$1 � �ͨ���J 0-δ� 1-����"�A< 2:���Q6*_�'�_% _�_S���������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������rU@@@@~xKa � Q� �"��$AQ1�* ������������1�A����!��1"qA#a#�#$A$����$P ���$��$�&�&'1'Q'�'(A(q(�(A)�)��)*Q*�ggD�0����8����Z���8����`�0���l����@����8���g�@��������\�gL�p������������������I��������(������������p���g\������h��������8����Z���8������h�����8���h���g{gg\������h��������8����Z���8������h�����8���h���g\������h��������8����Z���8������h�����8���h���g\������h��������8����Z���8������h�����8���h���g^�h��������8����Z�p�8������h�����������8���h��������g��g p�g4p� �8����Z�8�8������8���g p�g p�g^�h��������8����Z�p�8������h�����������8���h��������g����������������h��������8����Z���8������h������������������� �8���h���������������gJ� �����@���������������p���(������������p���g�����������8������������!�"Z#� �8��������V$�h����h������������%�8���h�����������gV�����&Ip����p������������������8���(� �����������p���8���g����� ���g�'��?�>�Jgg�� ����������8��������(Ip����p��������)����O���������*O�����(�?� �����������p���8���������Dgg\������h��������8����Z���8������h�����8���h���g{gggd��������h��������8����Z���8������h�������+�,�8���h�������g� x>��gL�p������������������-I��������(������������p���g p�'g\������h��������8����Z���8������h�����8���h���g{gg p�g��h��������8����Z���8������h�������.�����/O����` �������� �����8���h���������������g� x��g(����� ������ k���������g�����0g�����1g�����2g�34g����35g���������g��6g p�7g(�����������%k�����X����gz����������� @�h��������8����Z���8������h������������8������8���h�������g p�9g���������3�\��gV����������:I������������a��������� (������������������gV����������;I������������a��������� (������@�����������g"�������qn�P�gF�������qm��l�����(����������qnl���������� gv�(���� @��������������������;I�������������a��������� (����������������������g$������������������g����������K�� gv������������������������<I�������������a��������� (����������������������g>�������qml����������������qnl���������� gj������ @�����E������������������������������������������ 0�����������������g����������& gg�(��������� g�9p>� gv������������������������<I�������������a��������� (����������������������g>�������qml����������������qnl�����p��� gj������ @�����E������������������������������������������ 0�����������������g������p���� g��g"�@�����qn�P��g$�����@������������g����������K��gv�����@������������������<I�������������a��������� (����������������������g>�������qml����������������qnl�����@����gj������ @�����E������������������������������������������ 0�����������������g������@���*g��ggv������������������������<I�������������a��������� (����������������������g>�������qml����������������qnl���������gj������ @�����E������������������������������������������ 0�����������������g���������pgggx����������� @������ @�h��������8����Z���8������h��������=�8���h�������g������X��� g6�1�����T����1�0C����7����l�jgZ����>�����O��������?O�����5O���������@Op���`�4������������p���g����g�4���� ����g ��������������������gg������2���������gg�������������g������� �����`���Ag � ������������ ���g>�l��������������������l����������gx�l�������������h���������8����Z�p�8������h��������A��B�8���h��������g����������,g"�l��������������g�6�gg����������Zgg2����������� ������������h���"g�������`���!�����g����������K��g4����������@��������� ���������ggN�����k����������������������������p��� ���������p���gg������h���>g� �����������g^�8����p�������������C� ���O��������DO�����(� �����������p���8���gg���gL�p������������������EI��������(������������p���gd������h��������8����Z���8������h�������+�,�8���h�������gN�h��������8����Z�p�8������h����F�8���h�����gg p�Gg&��������� ��������g�G ��gL�p������������������HI��������(������������p���gd��������h��������8����Z���8������h�������+�,�8���h�������gV�����IIp����p������������������8���(� �����������p���8���g����������������h��������8����Z���8������h������������������� �8���h���������������gJ� �����@���������������p���(������������p�����ggL�p������������������JI��������(������������p���gd������h��������8����Z���8������h�������+�,�8���h�������gN�h��������8����Z�p�8������h����F�8���h���ggg\������h��������8����Z���8������h�����8���h���g\������h��������8����Z���8������h�����8���h���g\������h��������8����Z���8������h�����8���h���g{�L(#��������p���X����������������������p���X���@���(������������������h�����������@���(���������������@������������������������������� ���`�����P �������8���h��������������p���8������Hi@ aS �S�����������������������������������������������������������������������������������������������������������������������������������������������������������������a�� ��*\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��'ThisWorkbook��zLx���������� �� Sheet10?5b1ba24b��= Sheet1���H��� Sheet60A5b1ba24b��I Sheet6���0���SbpS��ȉ045b1ba1ef��JSbpS��ȉ���H����]wQ�Qpe0>5b1ba24b��T�]wQ�Qpe����`m����Xf0=5b1ba24b��d�Xf���&x���!h���Qpe0C5b1ba27d���!h���Qpe��~���c��;N z�^0<5b1ba1ef���;N z�^��Ux����`���������*.��ShowForm095b1ba1ef��ShowForm��n�w�� Sheet50@5b1ba24b��) Sheet5��h����PrintForm0;5b1ba1ef��+PrintForm��ʘ����������������������������������������������������������������������������������������������������������������������������������������������H������������������������������������������������������������������������������������������������������������������`��������������������������������������������������������������������������������������������������������������������������������������������0�����������������������������������������������������������������x���������������������g ��AH���N�߈�����p���址I����uo%v�����uE+E� J���D�:����L�_�)H� ���F�����Z�k:�K��B��z{�������4|Y!zJ�n�ּ%����yup!@gpN��5��������Ԏ!��E�t�(�w� �������:�A?B��z�������� Z���K���`>k���������H���K��������������% lZ!�8compare Excel�+` VBA��`Win16�~`Win32`Win64x`Mac��`VBA6�#`VBA7�#` VBAProject��`stdole�``Officeu`MSFormsC` ThisWorkbook|�` ��_Evaluate�`Workbook_BeforeSave l`SaveAsUI��`Cancel�` �(isSaveButtoná`MsgBox�R`ChrK~` vbOKCancelx?`vbOK�%`�(��������У����򲢴�ӡ������Ϣ��` Sheet1�`'Worksheet_BeforeDoubleClickaaaaaaaaaaaa�r`�(Target�F`Range� `vbYesNo�`vbYesa?` Sheet6�` ��ӡԤ���X` �(Browse_Prints�` Worksheets��`Visible��` PrintPreview��` ���ߺ����`�(checkedRequiredStart�R`rowIndex6d` columnIndex�P` cellValue@�` ActiveSheet%N`Cells�`�(writeLog{u`content�l`Sheets ` �(msgSheetName�'` �(curMsgRow�/`�(getCellValueCountXQc�` sheetIndex� `colIndex�`value�K` �(writeLogRedm`nLene,` Charactersrg`FontU` ColorIndex��`�(addCommentXQStart�S` errorInfo` AddComment��`Interior;�`Color2F`CommentHs`�(clearCommentsXQStart7�` ClearCommentsf�`sheet2RecordNum�`ffTotalNumColumn�`xlNone��`�(beginCheck_comment;D` checkMethodHd`�(errorMsg'|`�(removeSpaceFlag��` �(cellContent��`�(callFunctionXQStart �`typeVal#`isValidateCount�8`titleMsgh�` �(startTitle�l` �(headIndex�` �(functionArgs8M` �(checkMethodXQ��` �(checkRequired�b`�(hasErrorf�`�(isFord�` �(removeSpaceXQ�` �(checkStuNamec�`�(checkLeng�`functionArgsArr��`Split�)` �(checkSpLen��`�(checkNumh�`�(checkValK�` �(checkNum1�%`resZjlx0�` �(IsIDNumber-*` �(checkSFZJLX�*`�(checkDMB��` �(setDMBCode�d`�(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�`�(GetRowOrColIndex�f`keyWord�F`kbn1�`cZ`Findn�`What�C`LookIn�P`xlValueso�`LookAt�O`xlWhole��`Column�i`value1�`flag��`rowData�1`Count0v`rowNummR`�(AreasheetIndex�H` �(deleteRow�` Unprotect?`Password��`Rows�U`Delete�x`�(setCellValueCountXQ�]`�(deleteRowNoPro`�(setCellValueXQ��` codeValue�` �(columnPlus��`length1S`length2T`Replacef` �����i`�(!ValueColumType��` columnNamew�`�(sheetIndexValue1` �(AreaSheetName�`�(readmeSheetName��` �(totalCount�-`�(rgold�`�(hasErrorInValidateU�` �(dataRowStart��` isNullRowNum�8`�(cna`�(notContinueBoolt`�(sysDifficultyGradeNameCol�r`�(indentifyDateCol�&`�(indentifyReasonCol*9` У�麯��&�`IDNumber4 `Wm`UCase5 `sj`Tk` babyIDColumn�` IsNumeric$*`Right ` �(checkSchCode��` �(checkFamType��` �(checkRXDate�*` �(checkYear�6`�(checkXJHF�`years��`value2�` �(compareDecN�`�(checkInt��` maxIntLen1` maxDoubleLen��` intLength�`intValue�`douValue�` �(checkIsInt�R` �(checkIsNumberG` �(checkMoneyTJC�`�(checkPersonNum `�(checkIdNumLinkUz`IdNum�>` isGenderRight� ` isBirthRight��` genderValue�` genderValue1�1` birthValue��` birthValue1~`year6n`year1w�`month�`month1��`day��`day1;`arr u` genderColumn�~`birthdayColumn0` ������` rowDataNumn�` typeValue��`bsTypet�` valEntity܏`val��`typeRow�` isNullRowArr/�` sheetCountB�`Protect�f` Application�*`ScreenUpdating! `xlToLeftWY`rowType�`md`ne`Locked ` totalMoneySumZ�`pg`qh` �(checkTheSameg�`myDic�o`myKey��`varData��`idNumDick` idNumDicData��`cardNum�\`Exists�]`Add�r`Keysq�`Resize@4`WorksheetFunction�&` Transpose��` ShowForm��`CancelButton_Click�`Hide9z`ConformButton_Clickwf`Flase�p` 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_totalMoneySum�Y`����_B_var_p�`����_B_var_q�` ��BeforeSave��`��� ��"��$��'�������������������������������������������������������=�������������������IK) + ����������Ue����������������������������"�@�� p0(P'��q�`XX�� �HH �� ������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������� �(����| $.��U�������������������������x��ME�������������x���������������������������������������������������������������������������������������������������������������������������������6 ���������L����L��������� ����L��������� �����"����L��������������������<����������H :@`��������@h���k�������������P����������������@�������������� ��@�������������� ��@�������������� ��@�������������� ��@��X�������� �� ������`������� ��@������@������� �� ����`������������ ������������`������������� ��`������������� ��`�.������������ ��`� ������������ ����������@����������8��������������%�@(�����(����(�����p(��H���@����(������������������������������������������������������ �����N2hfj���@���8������� �� @������0��������� @��X������� �� @��p������� �� @����������� �� @����������� �� @����������� �� @����������� �� @���������� �� @��0p������� �� @������h������� �� ��T�<zX@������P������� �� @��x8������� �� @x� ������� ��0846�b��@������������� �� @��������������� @������������ ��@����������� �� �2@��X������� �� p�2`��t����@���������� ��@"������������ ��@���p������� �� �X;@���X������ �� ��;@�����@������� ��@��(������� ��@��������� �� �C@��@������� �� XC@������������� ��@��h�������� �� �@I@���������� �� �hI@���������������� @���������������� �hK�M@���������� �� �Q@��@p������ �� 0QXS@��hX������� �� �@Z@���@������ �� �hZ�h\@���(������� �� ��`@��@������ �� ��`�bX�f@������������� ��@��������� ��@��h�������� �� �@t@���������� �� �ht�hv��z@������������ ��@����������� ��  �|@������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"�h�p�:x�.��6��" �"H�.p��� D�� �� :L�� \�8�@�\H�\h�\��>^��"��: � 4P�, `�$ ��>^��,���J(� @�$�X� ~��PV� P�p� �� ����  0�\8�X� `�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>x�0 j��,��(��$��$x�� � <� 6P�(LZh�(&��( ��( ��  �)$� 0� >8�,x�, �� (��,>��40x��, �," �,0� 8� @�P�(2X��� ��*4�� ��+$N���� �� �`^�x� ��4L��d��N�� �� �� &��4� $@�Lh�d��PV��,���J� ����� 0�4L8�dp�N���� �� \�� \�� \��� x"�������2��$��@�6P� ��*�� :����� ����� � �����0�H�,`������� ����������a--------------------------------------------�����ʼУ��-----------------------------------------�]�X]�p�+ijһ���͵ı�ʶ�������кź����͸�ʽ��3:1;2��]��� ��ʶ����(Ĭ�ϱ�ʶ�����Զ����ʶ)]���(ijһ���͵ı�ʶ���飨�����кź����͸�ʽ��]��� ijһ���ͱ�ʶ�ľ���ֵ]����Զ����ʶ����������]������%�Ѽ�¼Ϊ�յ��кŷŽ�������]�( N!D'��"��ȡ��������Ŀ ����0��������Ŀ����ȷ������������ģ����ٽ��д�У��A@2�1qaz�N�$NB@�|���k����1qaz�N�$NB@L�1qaz�N�$NB@L�1qaz�N�$NB@L h$f!`B@�-$ÿ�ο�ʼ���ʱ���Ѵ�����Ϣsheet���,�'j�������Ϣ��¼��ʼ�����'��.�ô�У���У���¼�Ƿ��д�����֣��׶���Ϣ���У�� �(��'��#Ĭ���϶����Ѽ�������δͨ��У���'��Ĭ���϶�����δͨ��У�� h$f!`B@�-$ÿ�ο�ʼ���ʱ���Ѵ�����Ϣsheet���, �A65530�$N%B%�!'��� A@T� ��ȡ�������� ��IV5 <%B%�!<'z�xcna = Worksheets(1).Range("1:1").Find(What:="*", After:=[a1], SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Column����FAILUREA@X�&+��ȡ�Ƿ�У��ɹ���־��Ԫ�񣬲���ֵ��ʼ��Ϊ0�'x��ռ�¼����ʼ��Ϊ0 0 8��" ����ʱִ��d� ��ʼУ�鰴ť�¼�ʱִ���.��ȷ����ʼ����� �������У�����ر�excel��� $4�������ܵ������ݶ�ʧ����ʧ�� 6���ܰ��ʾ$2 8�d����1qaz�N�$NB@�|���k���k����.�$N!b(|�)��ҳǩ����Ϊ��ɫ  �� ��"û�в��ҵ�ѧ����Ϣ���޷�����У�飡A@2�'0�1qaz�N�$NB@�|���k����'���ô�У���У���¼�Ƿ��д�������$N!��д�����Ϣ���£�A@b  �� �  �� ��'��<"ִ�� ����һ���ǿ�У�� �ĵ�Ԫ����Ŀ�'��;6ִ�� ����һ���ǿ�У�� �ĵ�Ԫ��������Ϊ�����Ϲ������Ŀ�'��'��'�5"����һ���ǿ�У��ʱ����¼����Ԫ��'��9�Ƿ�Ϊ��Ч��¼ �'t�C��¼��У�����ǰ���Ƿ����д����'��;��¼�Ա����������Ƿ��д� "� z�� "�$N%`!r'��O��һ���б�ʶ��ֵ�'��2=�ж�forѭ�����Ƿ����callFunctionXQStart ��û����ִ��Ĭ�Ϸ��� ����<�����ʶ����Ϊ�� ��-$�'��G��ʽ��1��4-3:2��5 ��:$�'��H6��ʽ��3:2��5����ȡ���ı�ʶ�����в�֣���ֳ��кź͹��� �����DJ�����Ҫ���ּ������ϵ������ҪУ�飨��Ĭ��У�����͵������Զ���У����� � ��� ����Y&+1����Ϊ�����е�һ��Ԫ��ΪĬ��У����� �$��:$�'��V*����ȡ���ı�ʶ�����в�֣���ֳ��кź͹����$�'��S�Զ����ʶ����������  ���$��;$�'��c�Զ����ʶ���͵ľ���ֵ � �� ����g�Ա�ʶ�����б��� �$��  " �A@��}���ݱ�ʶ��ֵ�����ö�Ӧ�ķ�����k��� �� ����$��;$�'��P����ȡ���ı�ʶ�����в�� � �� ����W�Ա�ʶ�����б��� �$��  " �A@��0k��( ���e�J ��ʽ��3:2��5�$�'��Q�Զ����ʶ����������  ���P�����ʶ���е��������ڵ�ǰ�����$��;$�'��e�Զ����ʶ���͵ľ���ֵ � �� ����k�Ա�ʶ�����б��� �$��  " �A@������ݱ�ʶ��ֵ�����ö�Ӧ�ķ�����k���d�-ֻ��Ĭ��У������ʽ��1��4�$��;$�'��H����ȡ���ı�ʶ�����в�� � �� ����O�Ա�ʶ�����б��� �$��  " �A@��0k��(k�� �  "�$N%`(� "�� 6ִ�� ����һ���ǿ�У�� �ĵ�Ԫ��������Ϊ�����Ϲ������Ŀ �� � ����� � �е������ ���������һ������д��ȷ������'��'��8����У��ʱ������д�����Ϣ �A@b �� '�d��� � � '��Tÿһ�кϼ��е�ֵk��� �� ��<,һ�����������ؼ��ֶ�ȫ�������򽫸���ɾ��  x+� x� 'x�,"��������Ϣ���еĸ��д�����Ϣɾ����  j � j� � j � h$f%PB@R�r �Ѹ���ɾ�� � j � 'j t'�k��� �k��� � x� ��6 ɾ����Ч�� $�'� ��� �A@J�B �Ѹ���ɾ��d��8� �  A@J�H �Ѹ���ɾ��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��` k��X �1qaz�N�$NB@��1qaz�N�$NB@��1qaz�N�$NB@�o��� �q-------------------------------------------------���ظ�����ijһ��------------------------------------------------�@]����]���� �A65535 ^%B%�!'�2��������Scripting.Dictionary$. �O8�O  ^%B!r'�>��ȡѧ����������������  ��%"��ѧ���໤�����֤�������ݽ��б��� ��  %��-������֤�Ų����� � B@�&#add��������һ��Ϊkey���ڶ���Ϊvaluek���k����� !'�Sheet2$N��G:G7BB@  �!% !D�G17B,q��h��.o��X����P�����Attribute VB_Name = "������" '-(������ �У��&l Sub ��������:���򲢴�ӡ������Ϣ() Dim rowDataNum%typeValue 'ijһ�����ı�ʶ�������к�����ʽ��3:1;2���?bsT� '����(Ĭ��������0����Cva�lEntity�8?�: 7,��@����ֵ�hR0ow '�>�_������isNullArr(500) As Integer '�Ѽ�¼� ��յā���0���ÁP� sheetCount����Works.� '����������ʈ�Ŀ� If H <> 3 Then�m MsgBox "G����ȷ�����������������Ԁٽ��дˁ�@���"(1).Protect Password�:="1qaz �DExit ���#�End If�KUnp�H 2).h 3_ Sas(m sgB��).Cell�]learCo�tnts '�����ؼ���ʱ����ɂ` ���,C7cur�]��= 1 'G� A����� h�asError�=Fals`h�ôB��/�У��� Ƿ���!���֣��׶��r�� �hApplication.ScreenUdpd�ng� � sysDifficultyGrad�e�Fla�0�b o�϶����Ѽ��������δͨ��!!cinde�ofy� �eO����M�?,?,-, rna��HRange("A65530").N(xlUp)�.@1� s n�;"��jXQ 1, 2^,�� �bm��4�h���$c"�1".D IV5� ToLeft`Golum$p'��1:1`F*(What�h*", After:=[a1], S�OchOrBdAxlBy�s1�Dir�p`>:=xlPrevio|us����@8, "FAILU8RE"��aL!<������־��Ԫ�񣬲���ֵ��ʼ໯Ϊ0� ƞ��� 0�F��U� `} isSaveB utton�vbOK� ལ���ʱִE�E�_�c`ذ�ť�¼�)��� ��("�`�ȷ����r�� ����h�������excel��" & Chr(1`�& "������ܵ������ݶ�ʧ���ʧ���`1�Can`@&��ܰ��ʾ�") c"ŝ@ ���?��� �ST9T�KTab@clor I�:x� -4142Aiҳǩ����Ϊ��ɫ� �d35start�Title +�K �d� �eû�����ҵ�ѧ���I���޷模dQ%���aQ�!��%����g�g���`9QhX�XX�Q1writepLog + V`'"�2\����£��?��-�> �׉}��F�di���2 To�R� atLeaOnefNэ��= P>�: ����һ���ǿձ ����B�OГ���H������΀�������a���?�tot�alMoney�w�&e�y�F "��?� %}"�U���R}��ijs0ki`}eH�[������1��5/�InE '�������ǰ��Q��C0??9dcbԍ��Ա������������}�-j� 1�,�pu���=�9"�b(�j).@��˵��һ����c�'%�_is� = $�ж�for@ѭ����� ����callF�unc!�XQSV� ���S��51����/�Zw 0�p&QZ@ '���� �������/�T��= S��t(��o -o'��1��4�-3:2��5��P�޿ ":��c��Qε�#䄷�Ad������P�����?I�UBP�d(S) 00s�"�������ּ������ϵ����QQ0��������͵��������U5�O� �� "For m = LBound(bsType) + 1 To U *'+1����Ϊ�����е�һ������ΪĬ��У����� #� %val@Entity�Split�(m), ":") '����ȡ���ı�ʶ�����в�������кXź�7�Ht��RLowDJ(0�?� Զ���=����������3v�4��"If iÀS�XThen�)'�@>�bGA1�b;�b�B�ľ�������n@��F)H��'��ǀ�8����=callFunctionXQStar$t �(n�>1, i, j@sValidateC�t '����C$ֵ�����ö�Ӧ�ķ����&�&NextEnd If��!e! mi/��aAYsA?= �False �YM���5�WC��w��"W���?� U U rSoS�Q �M��K�EG=?�row��<> 0�?k�ʽ��3:2��5�_�eǺ� ��� v�� �`�W)� '�����е��������ڵ��ǰa�3E?_ʶ�o?_?��4__�?6�_ i�_��_�___9�?:���X'�(���)��B91���4�'��Y�Y��//O$O$O$�O"O"M" ?���o���Worksheets(1).Cells(�).L�ocked�J�z� 3=� j}'���� ����!�ŷǿ�q� �ĵ�Ԫ��������Ϊ� ����ϱ���p��Ŀ���UatLeaOneN�ulls��fA0��|= 6�?�m�e�rrorMsgP@"��" &��& "�0\���ݰ�ArE��"����������д��ȷ�����8��"�hasC= True@ '���������e�д������ϢOOwriteLo|g � ��=S=�^T+ /~�!�OntotalMo`neySu���+ � 'ÿһ�@�ϼ������O߿4?Q},c>1���$ 'A�������ؼ�����ȫ������������ɾ����� isNull�RowArr(`Num) = i� �$ |z�� + 1+�'��������Ϣ���еĸ���ɾ�����+PFor p�@curMsg� - isValidateCoun�t To ,Y�Sheets(msg�Name).8s(�=).Delete '�`Ѹ���q+pN`ext p�$=J> F+hasEr�r�[= �InZ��End If� ��:����q�0�|Aʭ- 1 '_� �Ч�О+ro�wData���I�Dq)If D!hlen^ ��dŠ�1 , � )�Else���hq �V �3��;qw�&j6> �8>(�~Box "�˴�У����bl��" &�ĠA�8& "���?���ݣ����������ր������С��ʧ�ܼ��auΪ��"��[�feT�e�F�����鿴����������������A�Worksc�1).Tab.ColorIndex-`b672�S`Qcto��J `S��` F�a�Ocheck�XQNew (1��h'Not��E �`n 'ִ�A;����7����,���û��ք�'�������Ƿ��А��Ҫဵą;�3Cͨ��!�/!ı/-41427 setCell��ueXQ 2,A8, "SUCCESS" '��ȡA��ɹ���־�����񣬲���ֵ��ʼ�0�Ϊ0V:rnap�"Range("A65530").-(xlU�p�m��I �v� pK�� �Kna���%�F�W2�_2_2��_2_2�_2�]2�NA�Protect Password:="1q�az '2).;A3� Su�b '- ��!�8ijһ���� � �A(rADim myDic AsP Obj�,KeyVarian�I�B4, var�{|s/Act�ive�.Y/5]/ '��������*Set id0d� = Cre��S ("Scripting.�tio�nary"�Me" �= "O8"p>O�j@ ).val�u��>ѧ��aj ���������a�Each c�ara In� �'�Ա�໤���#nn�S�d�P� �V<> ""> !W��!Ye .EXxis@��)� '�Xe����Ԏ�1�Add�, �y 'add�#����һ�@�Ϊkey�������K4���s�Smy�"=C$.�sr�With 5�4"!2W�!G:G�!ClearC�ontentc0 &1Resiz������������ ��� �I�������������� ������� D� `������������X ���� �I�>������������ ��x �I�������������� ������� �0 `������������� ���� �I�>������������ �� �I�������������� ������� �� `������������� �����I�r������������ ��� �I�������������� ������� �` `������������ �����I�r������������ ��@ �I�������������� ������� �� `������������� ����##�I�r������������ ��� �I�������������� ������� �� `������������P �����I�r������������ ��p �I�������������� ������� �(`������������� ����&&�I�r������������ ���I�������������� ������� ��`������������� ���� �I�r������������ �������@������������� �� �0`������������ ���� �I�r������������ ������� ��`������������� ���� �I�r������������ �������@������������� �� �P`������������ ���� �I�r������������ �������@������������� �� ��`������������� ���� �I�r������������ �������@������������� �� ��`������������8 ����""�I�������������� ��X�I�X������������ ��x�I�p������������ �������`�������������� ��`�������������� ��`�`��������������`����������������`����������������`����������������`����������������@�������������� ��`�������������� ��@�������������� ��`�������������� ��@�������������� ��`�������������� ��@�������������� �� ��`������������@ ����""�I�r������������ ��`�I�������������� �������@������������� �� �����`������������� ���� �I�r������������ �������@������������� �������P���������������� � �� h �� ����������0 0����������� ����������@` ������������������`�������( 0����������������������������%����� ������������������������������������������������������������������������������/(Պ�Z$*\Rffff*0C5b1ba27d��� � �� �� �B� �� ���� ������� �� ���� � �(� �� �B� ����"�� �0�8�@�H�P� �XB� ���� � ��� � ����p����������� ��B� 0�8��@���������� ����� n� �� �B� ��,��$��" �H�H`� �� ���� �������"��� ����� �8�P�"h�����4���� ��� h � � B� � �� �*� �� �� �� � � � � � � � � � B� � � � �( �8 �@ �H �P �X � �` � � �  B�  � �6( �` �p �x �� �� �� � |� �  � 8 B� P �X �0` �� �� �� �� �� �� � x� � @� `B� x� �� ������������������� �(� x0� �� �B� ������� �(�0�8�@� |H� �� �B� ��$�8�H�P�X�`�h� |p� �� B� (�0�f8������������� |�� X� xB� ������������������ ��� �� �B� ������:��� �8� X�`� h�p�x������� ��� 0� PB� h� p����� �� ���� ���� ���� ����� ��� .hB� �� �� �� ������������ ��� .�B� ������ ������ � �(B� ������ ��&���� �(�D0�4x��� ����������� �(� �0B� ������ ��&��� �(�0� 8� X�(`� ����D��4���  �(�0�P�p�x������� ��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� (0�00�H0�&P0�x0� �0�&�0��0��0��0��0�D�0�4 1�X1�h1�p1�x1��1� �1��1��1��1��1��1��1��1�2�2�2�2� 2� �(2� �2� �2B� �2��2��2�3�(3�03�83�@3�H3����X3��-----------------------------------------1 ��������,���д�����Ϣ��ʾ�� ������Ϣsheet��---------------------------------------� ��ʱ����0� ��Ϊ��ʱ����1�� ��Ԫ������]�� X Z n$N%`'\ \���'�d���'�k���i�����-----------------------------------------2 У��ѧ������ ҪΪ����-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true��]�H�^[\u4e00-\ue863��]{1,20}$'  r$��'�d����'�k���i����|-----------------------------------------3 У��������ڸ�ʽΪ2012-05-09(����Ϊ��)---------------------------------------�` r$����'�z��k��]����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����'�k���i����|-----------------------------------------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��@�'�k��0i��(�h-----------------------------------------4 У�����֤����---------------------------------------����Ϲ��򷵻�true������Ϲ��򷵻�false��]�79058421637905842��0��Ȩ����]� 10X98765432�0�0У���� �$�$�'��'ȥ���ո�]�H�`�x p � ����6)����׶����֤��Ϊ��,������Ϊͨ��У������'�z���k��� ���Gzj ���$�$��Gzj ��*[0-9X]�Gzj ��� � �$�'� ���G� '�j � � �$� � '��� �� '� ��$� . �� �$��G�'�ji����z-----------------------------------------У�����֤������ -------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true��]��"^[\u4e00-\ue863a-z|A-Z|0-9]{1,18}$'  r$��'�d����'�k��pi��h��----------------------------------------5 -У��ѧУѧУ��ʶ�� 42λ�����һλΪ���ֻ�x-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true� ]���^[1-9]\d{40}[\dx]$'  r$��'�d��8�'�k��(i�� �z----------------------------------------6 -У�黧������ -------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true��]�(�.^(\u519c\u6751)|(\u53bf\u9547)|(\u57ce\u5e02)$'  r$��'�d���'�k���i����u-----------------------------------------7 У����ѧʱ��-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�@]���'^(((19)|(20))\d{2})((0[0-9])|(1[0-2]))$'  r$��'�d����'�k���i����q-----------------------------------------7 У�����-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�� r�� ����,���Ϊ�DZ�����'�k���z���k���]�h�^((19\d{2})|(2\d{3}))$'  r$��'�d��h�'�k��Xi��P�q-----------------------------------------7 У���·�-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true��]���^((0[0-9])|(1[0-2]))$'  r$��'�d��P�'�k��@i��8�v-----------------------------------------9 У��ѧ����-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�]���^\d{4}[0-7]\d{3}[0-3]\d{7}$'  r$��'�d����'�k���i����v-----------------------------------------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��@�'�k��0i��(�v-----------------------------------------11 У�����п���-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�0]���^[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��� �'�k��p i��h ��-----------------------------------------checkOption У�鱸ע�磨����С��value2��-------------------------------------------------------------����Ȳ�С��200����false� ���򷵻�true�h >���'�z��p k��h > � ��'�d��H �'�k��8 i��0 ��------------------------------------------------------�Ƚϴ�С(С�ڵ��ڷ���true)----------------------------------------------------------------�'value1����value2����false ���򷵻�true� >X'> �X'� > � ��'Dd�� �'Dk�� i�� ��------------------------------------------------------�Ƚϴ�С(С�ڵ��ڷ���true)-dec---------------------------------------------------------------�'value1����value2����false ���򷵻�true�� >$4'> �$4'� > � ��'�d����'�k���i����}------------------------------------------------------У�鳤��---------------------------------------------------------------�0 ��,$�'��'� r���$����/���Ϊ�DZ������'�k���z���k��� �����,-�±��0��ʼ����ֵΪָ��������ά���õ�����±� r�$�$4 r�$�$4��'�z��@k��8d� ˵����У��̶����� r�$�$4��'�z���k���k���i����}------------------------------------------------------У������---------------------------------------------------------------�� ��,$�'��'� r���$����/���Ϊ�DZ������'�k���z���k��� r$���& �����Ϊ����z��� r�.��e�+�������С����z��pk��h �����,-�±��0��ʼ����ֵΪָ��������ά���õ�����±� r�$�$4 r�$�$4��'�z���k���d� ˵����У��̶����� r�$�$4��'�z���k��xk��pi��h��------------------------------------------------------У�����ֳ���(Number,����Ϊ��������С��0)---------------------------------------------------------------�` ��,$�'��'� r���$����/���Ϊ�DZ������'�k��Pz��Hk��@ r$���% �����Ϊ����z�� r$4�e�% ���С��0z���k����$�'��+����������󳤶��$�'��.С�������λ�� r�.�'��'��'� ����"˵��û��С���� r$4'� ��$�$4��'�z��k��d� �����С���� r� r�.�� $�'��D��Ԫ�������ֵ�����λ r r�.�� $�'� ��$�$4 ��$�$4��'�z��Hk��@k��8i��0��------------------------------------------------------У����ֵ��Χ---------------------------------------------------------------�� ��,$�'��'� r���'�z��` k��X r$���) �����Ϊ����z��0 r$4�e�) ���С��0z�� k��� r$4�$�$4 r$4�$�$4��'�z���k���i�����------------------------------------------------------У�����ֳ���(Number,����Ϊ����Ҳ����ΪС������С��0)---------------------------------------------------------------�� ��,$�'��'� r���$����/���Ϊ�DZ������'�k��xz��pk��h r$���% �����Ϊ����z��@ r$4�e�% ���С��0z��k���$�'��+����������󳤶��$�'��.С�������λ�� r�.�'��'��'� ����"˵��û��С���� r$4'� ��$�$4��'�z��8k��0d� �����С���� r� r�.�� $�'��D��Ԫ�������ֵ�����λ r r�.�� $�'� ��$�$4 ��$�$4��'�z��pk��hk��`i��X��-----------------------------------------checkIsInt У�鲻С��0������-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�(]��� ^0|[1-9]\d*$'  r$��'�d��P�'�k��@i��8��-----------------------------------------checkIsNumber У��ΪNumber����-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true���'� r$���'�k��@i��8��-----------------------------------------checkMoney У����0-9999������-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�0]���^(([1-9](\d{0,3})|0)|0)$'  r$��'�d�� �'�k��i����-----------------------------------------checkMoneyTJ У����0-9999С�����һλ-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true��]�8�^([1-9]\d{0,7})$'  r$��'�d����'�k���i�����-----------------------------------------checkPersonNum У���׶�԰��������һ����------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�P]���^(([1-9]\d{0,3}))$'  r$��'�d����'�k���i�����-----------------------------------------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������'�k��8z��0k��( �����,-�±��0��ʼ����ֵΪָ��������ά���õ�����±� r�$�$4 r�$�$4�  r$��'�d����'�k��xz��pk��hd� ˵����У��̶����� r�$�$4�  r$��'�d���'�k���z���k���k���i�����-----------------------------------------У�鿼���š�ѧ���š�ѧ�� -------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true��]��^[a-z|A-Z|0-9]{1,40}$'  r$��'�d����'�k���i��������������Attribute VB_Name = "У�麯��" '-%1 ��������,���д�����Ϣ�� ʾ�� sh`eet��$����ʱ����0! ��Ϊ1 Function checkRequired(bIndex, row coluDmn ) � '��Ԫ������Dim cellValu@e As S��ng��= Work5s�8).C� s(�;If�2���" Then0�K� g��False�E���{Tru�nd If �E�����-2"��ѧ������ ҪΪ�8���& !��ʽ����ȷ��uf7'A�t�1��wStu��(vg�Dplreh �@"^[\u4e00-\ue863��]{1,20�}$�5@_@ CA��(, �aBW�� Wa� kA�l4�Sa �`��׶�e�:,������Ϊ�ͨ��1 �� � �����c �c!� Len( <�> 18"0 ��0 Not�p er@ic(Mid�,� 1 7@�� f�%Like d"*AgX]�_ � For�= 1� To 17C��T�qW����۠�0� �1P���1sps + ; Bi! * TNext��s Mpod 1���RPight)�c�, T�E�ϥ�:� �"���������?�@��O�QO�7�SF�ZJLXʏ�` =�a-z|A-Z|�����18ϥckqG�ϥ���bw� �����VXX�/5!e3-�ѧP0��ʶ�� 42λ�����һ�0�Q���x��?��؏�ckSchCodeO��!��40}�[\dx]�O���C�_�fooo--6(��������� �_X����ȷ����true Function checkFamType(valu e) Di`m reg0 = "^(\u519c\u6751)|3bf\ u95477ceFe02)$"ivIf�C�u( K, i The�n%r �nT�xEls�  &FaEnd If � '-%7 У����ѧʱ����;��ʽ�j��f�S'� �RXDat��((19�20))\d{2})((0[P0-9] 12�])5�� �`F �`FP�`���QU��_Year�, fD�ArgsArr�D�����G""��Ũ� @ 0 '���Ϊ�DZ������ǿ����"� �I����Exit G��� ?j{�s� �{�II|(�23}�G��, ?0x�G>$dG��Gz G��Mont�h���t���*D-o�?-�"�9�Ja��ৼ���8�-1�-XJH�-Y4}Y��7]BZ 3!7�}��)Q[�.C�-�&$10ӵ�఺���8��i_�P�Phone�Num?l�\b�i`(([38��h4�[57Ai5�5j�k8}�0�0p2[\d�j-[2��\d*�[3��mg)\bo��No��R�q*I� �Ap���11����п��2O?BaLnk�=�[1c1�4,20_2Т_�^�����4oo�3�Xn@�I���磨2012�-@3��_�pXn_kU�xy �sc���2r0�J2}p r�01N9t990>0o�_�L2Split� , "-"4�q30�R(1)H - �0)01���= ۊ�h�/���olkp= ?�"�" OpCR��9��ע#�����С��R�~2_#�P#��b�2001إ��x���?٣}� �1��2�2 1@���4�h �����E�Le�-@"�>c�2�!V��L �?#Q5� �� qg�`O�Ƚ@ϴ�С(������)�� ���&��! �!��ompa6r��! #!CI n�=1a#?� value2 = CInt(h) � If" L1 > 2 0Then�Pco mpare�Fahlse@E \T$ru -nds EFunctiol'-2�Ƚϴ�С(С�ڵ��ڷ���to)-deFc�)� '������ڂ2/f�~@ ����6 � �d ��Dec��1,����*�� ��2-��lC �m�_У�鳤��#�]heckLen], faD�Args�N�Arr�ESplit�(�, ","� �c�QEb@""Tͣ� (0) 0� '���Ϊ�DZ�����?O݁�H e����If�Exit �l��`UBound� �#Á '�±��0��ʼ����ֵΪָ��������ά������������� F4) > � Mm�(1)) A��H�(=� 4'��.�� '@˵����\��̶��\s! �Hs�!? *� ��@2aL�GJ��Ry�#�������% �������c&b+@ �v�,�Zb� �on�����j5�(�����(Not I�sNumeri�kB)8J��Ϊ�>��,����InStrY".") <> �O�����С����oK�.) KsKKKNk� @p�:Kg�1K�_=�K�|����KK�I��K�sK�5��-�� >� K��/G_qKQ0q](�2ber,�����B��L������0~)�}M�1�������4FI����@�����M�M�� ���������.$ Q���� ��@ �Me�MfןM�� �2 C���B> �L�L�L�� max�0�Fp�1) 'a&���ց�υ�Doub�leqg2�V�λ��{ intq�gth��[�V�q�0�dou��pE�û��Џ`RBpE����`P (%_Xex���?Jeu*�_)�?-c%�� xMid%A0�v- ?�1) '��Ԫ��������������λ douValue = Mid(v,, InStr"."@) + 1)� If Len(int�) <= CDec(functionArgsArr(1)�) And-x-�2-Thenv�checkNum�1�False�Exit F�O�E�UIf�� ��'-2У��ʀ�ֵ��Χ� � �F �C�bp�aqLg�NSpli�tJm, ","� �Z��@"" ��mHTruPiTe�\ɯ�Not Is��}eric;)B '������Ϊ�OwE@�����3§0�СӼ�0��P��>��0̌#��oח�^/[b+� �^Y-�^�@ֳ���(8ber,������a�ҲcСʠ�����".)� �:�c��c��[�c�,@ � � >�c`�:0)@ �OΪ�DZ�������Za8(�tl�Qt?mo`�n�n?� �m�m_bmapxInt���(/f '�M��������Q�*�Douhble2@�T����λ��� ��gth�N�N�� ��(�,@1) �Dˀ���û�Г �kup��E��`�P �}�}{�x*O��� *Q\C`o h؏1�) -�������h��S����� ��b�����e����|����:  6�g� O��_^� Is�> ��edcӯ?@��ʽ�����ȷ����f#��'Q5t�+��t��5Dim reg���>"^0|[1-9]\d*$n"�p�CQ�(9�, Ԉ+~H= ��^�/��Jhiu;�t�n�{B�ª�����_/??�?ck���j� = 8��/�N� ��t?� --�Money ���0-�9���i?�___�� �+�+((�+(\d{0�,3})|0!_,�k_,*H_,DJ_,���owTJ=�#t��һλ�����TJ��DD{��0,7})$"  If regCheckFunc(`, value) Then��c�MoneyTJ = T�rue8Els LFa:End 0If kti2o^'-%�PersonNum У���׶�԰��������һ����&P '��ʽ����ȷ෵��f�_� � �t}a �K(��xDim����"^(([1-9]\d{0,3})�5Ň�� M�Id�bLink�c���֤�����Ա�ͳ����������û���д���Ƿ�һ�.¿i�i�+(B, rowIndex�, colB)Ck��'����njhrIDColumn���'A��‚� �Ƀ�� Exit �9� @�� !�isGe�(rRight As Boolean &'Y]�ρV�� ӦF0�Birt&h��3��]le ngth2�In�teger '�:��һ�γ��ֵ��±�5 g�V��!String�,��Ԫ��֮��@������61��Ž�ȡ��b�� �|�B�;year, ��Varian�t 'a����month, � ����day,� �i %arrE�-1@OMid�\1�7, 1[ g��= H 8%���A� Mod 2` 1b@X��������λΪ��������Ϊ�����[Sheepts(s�BoB71).Cells(GsC#o)� "�Л��A E �,ż%PŮ��?x?m�n"Ů)$�� ?'AC +H-�1, 42BB�5, 2��A��5�+�, " 0�� + "�-" +�*p�p�w �NBq�}o^�}𳤶ȏ V#zSpLebn�y, f���Args�iArr��Split(y�, ","8J~� �~[\u4e00-\ue863������]{1�,100}����� �z�7��"�"\g�4| (0�*0C9'������DZ������7�q:Kke�iv�l��� UBo�und�@� 2� Ad��0��ʼ����ֵΪָ��P����ά���õ������f�qpv) >= CDec=(1)) VA�;�<�s� (�2�������Yϸ���� �N�����$N?.��~�bY'˵�����=�̶�Q=� �{��a���pC�B&�� �B�@7�0���/�f���^��jquQ���R�!�����š��ȧ��s�Ł�_/�/��/�c�kS��eg���R^[a-z|A-�Z|0�րW4wW_"�g�B�� k�6������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������_g������������������������������x��ME�����������������������������������������������������������������������������������������������������������������������������������������������(6 ���������L����L����������� V�`������������ X ���� �I�X������������ ��x�I�Z������������ �������`�\�������������� b(`������������  �����i�d������������������� l�`������������ � �����I�n������������ ����I�X������������ ����I�p������������ ������� tX`������������ 8 ���� �i�d������������������� ~0`������������ � ���� �I�n������������ ����I�X������������ ����I�Z������������ ���I�������������� ������� ��`������������ � ���� '�I�n������������ ����I�X������������ ����I�Z������������ ������� ��`������������ @ ����2�I�n������������ ��`�I�������������� ����I�X������������ ����I�Z������������ ����I�������������� ������� ��`������������ 8 ������G�I�������������� ��X�I�n������������ ��x�I�X������������ ����I�Z������������ ����I�������������� ������� �`������������ 0 ����E�I������������� ��P�I�r������������ �������`������������� ��  `������������ � ���� S�I������������� �������+(� `������������ X���� j�I�n������������ ��x�I�*������������ ����i�,�������������������`�.������������ �� �� `������������ ( ���� {�I�r������������ ��H�I�>������������ ��h�I�@������������ �������@�B������������ �� J8 `������������ � ���� ��I�n������������ �� �I�F������������ ������� T `��������HH���k� ���� ��I�n����� ��� �I�X�������� ��� �I�p���� ���� ��� �I�r� (���� ������� V� `������������ h ������I�n������������ ��� �I�F������������ ������� X� `���������H���k ������I�n�������� �� �I�X�������� ��@ �I�p���� ���� ��` �I�r (���� ������� �� `������������ � ������I�r������������ ��� �I�n������������ �� �I�X������������ ��8 �I�p������������ �������@�B������������ ��@�Z������������ ��@�\������������ �� �����`������������ � ������I�n������������ �� �I�X������������ ��8 �I�p������������ �������`�>��������������`�^��������������`�`��������������� ��������������(��X8 � ���� ����������������������0��� �����T��������@������������������%��������� ����� ����� ��������������������������������������������8�����P������������������������������������������������������������� @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�� �� ��$�� �$ � H�P� ����� xXB� ����4��(0�*X�$������ 8��B�P�0h�!��� � �( �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��������� `�� (�8�P� 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� h0�x0��0�X�0�&�0� 1�  1�(1�01�P1� ^X1� �1� �1��1�2�T2�&`2� �2� �2��2��2��2� n�2� @3� `3�x3�"�3���3�&@4� h4� x4��4��4��4� j�4�  5� @5�`5�"p5���5�&(6� P6�`6�h6��6� n�6� 7�  7�@7�"P7��x7�&8� 08� �����@8�H8�h8� Pp8��8��8��8���8�&�9� �9� �9��9��9��9� R�9�H:�`:�x:�X�:�&�:� ;� ;�;� ;�@;� bH;� �;�$�;��;�@�;�&8<�`<� h<�x<�$�<�,�<��<��<��<��<��<�=� =� j(=� �=��=�"�=���=�&x>� �>��>��>�H�>� ?�L?� `?�h?� �p?� &@� @@� H@� X@�`@�h@�p@��@� Z�@� �@�A�(A�@0A�&pA� �A��A��A��A��A��A� jB� "pB��B��B��B� d�B� &0C� XC�hC�bpC� �����h�C� �����,@D� �pD� &E� 0E� @E�HE� �PE� &F� 8F� HF�PF�XF�`F��F� ^�F� �F�&G�(G�@0G�&pG� �G��G�&�G��G��G�H� ZH� hH�&�H��H�@�H�&�H� I�(I�&0I�XI�`I��I� Z�I� �I�,J�8J�@@J�&�J� �J��J�,�J��J��J�K� | K� �K�$�K��K�(�K�@L�&PL� xL� ������L�"�L��L��L��L� |�L� hM� �M��M�@�M�&�M� N� N� (N�HN�PN�pN� |xN� �N�$O�8O�@@O�&�O� �O��O�$�O��O��O�P� dP� �P� �P�@�P�&�P� Q�0Q�28Q�pQ� xxQ� �Q�6R�.HR�xR��R�( �R�2�R�( �R�1�R�( �R�2�R�( �R�1S�S�S�J0S��S��S��S��S��S� f�SB�  T� (T�<0T�pT� �T��T�$�T�$�T�U� U� ����� �(U� \�U� ����B� 0V�,PV� 0�V�@�V�"�V� ^W� 6xW��W��W��W�X�0(X�HXX��X��X��X��X��X��X� ��X� "�Y� �Y� .�YB� Z� Z�$Z�B@Z� �Z� �Z� �Z� �Z� �Z� �Z��Z��Z� ��Z� �[� �[� �[� �[B� �[�"�[� \�0\�8\� @\�H\�P\� X\�8x\��\�2�\��\� ]� (]�8]� @]�H]� P]�`]� F�]��]��]� �]� �]� *�]� ^� �(^� �^� �^B� �^�_�* _� 4P_��_� ��_B�  `�^(`� vH`� h`� �p`� a� (aB� @a�*Ha�xa� ��aB� b�^b� v8b� Xb� �`bB� c� c� "0c� Xc�8xc�2�c��c� d� d� 0d�8d� @d� Hd�Xd�"xd�0�d� �d�(�d�e� e�(e� L h�8e�&@e�he�pe� xe��e� ��eB�  f�(f�VHf��f� 8�f� �f� g�:(g�4hg�$�g��g�"�g�h�h�h����xh��-----------------------------------------У��У����������д�����Ϣ��ʾ�� ��ע��-----------------------------------------------------------�� ��Ԫ������]�� X Z ^%`'\ \���'Vd��(�'Vk��i����--------------------------------------------д��־ ��¼������Ϣ����ʾ��һ��������Ϣ����--------------------------------------------�� d j� h$f,` j� 'ji��X��------------------------------------------------------ ��ȡָ����cellֵ-------------------------------------------------------------�( X p n$N%`!r'li�����--------------------------------------------д��־ ��¼������Ϣ���ú�ɫ������ʾ��������Ϣ����--------------------------------------------�� d'v d j� h$f,`�� v j� h$f%`%x!z(| j� 'ji����i--------------------------------------------�����ע�������ʼУ�飩-------------------------------------�errorInfo��ע�����X� 1Worksheets(sheetIndex).Unprotect Password:="1qaz" � X Z n$N%`B@���� X Z n$N%`!�(��W ��ӻ�ɫ����� X Z n$N%`!�(Pi����i--------------------------------------------ɾ����ע�������ʼУ�飩-------------------------------------�0�1Worksheets(sheetIndex).Unprotect Password:="1qaz" X Z n$N%`B@� X � Z ��� X Z n$N%`!�(|d��� � X Z n$N%`!�(|k��pi��h�r---------------------------------------------�����ʼУ�� �Ƿ���ӻ�ɾ����ע���õķ���----------------------------�� ��� ���У��ʧ�� X Z n$N%`!����d �ж���עΪ�� n X Z �A@~�V �����ע����d�"����Ϊ�գ���ȥ����ǰ��ע��������� n X ZA@��N �����ע���� n X Z �A@~k����1 MsgBox "��" & rowIndex & "�������" & errorMsgd� :���У��ɹ����ж��Ƿ�����ע���������У��ʧ��ʱ����עȥ�� n X ZA@� ���,#�������ȥ���ո���,����������ʾ��� X��У��� Z��У���������ַ��"$4 ��"$4�"�а����˿ո�ϵͳ���Զ�Ϊ�������A@bd��`k��Xk��Pi��H��----------------------------------------------------------------------------------------------------------------------------------�y--------------------------------------------���ݱ�ʶ�������ö�Ӧ�ķ���(�����ʼУ��)-------------------------------------��----------------------------------------------------------------------------------------------------------------------------------��Ѵ�����Ϣд�������б��� X Z n$N%`'r � Z n$N%`'��I��ȡ���б�ͷ������ �������Ϊ�ϲ��еı�ͷ �� Z n$N%`'� X �e � Z� n$N%`'�k����0'� �� checkLen*��)���Ϊ��������У�� �� $�'��checkLen'� �� checkNum*e�-���ΪNumber����У�� �� $�'��checkNum'� �� checkVal*e�-���Ϊֵ��У�� �� $�'��checkVal'� �� checkInt*e�-���Ϊ����ֵ��У�� �� $�'��checkInt'� �� checkTerm1e�-���"�ǡ���"Ϊ�����1'�� checkTerm'� �� checkYesNo1e�/���"�ǡ���"Ϊ����1'�� checkYesNo'� ��checkDiffName1e�2������Ѽ�������Ϊ�����1'�� checkDiffName'� ��checkDiffCode1e�2������Ѽ������Ϊ�����1'�� checkDiffCode'� ��checkIDCardType1e�4������֤������Ϊ����1'��checkIDCardType'� ��checkSqyyName1e�2�������ԭ������Ϊ�����1'�� checkSqyyName'� �� checkYear1e�. ������У��1'�� checkYear'� �� checkSpLen*e�0���Ϊ��������У�� �� $�'�� checkSpLen'�k��P ���_=================================����1 ִ�еķǿ�У��==========================================��Ѵ�����Ϣд�������б�� checkNullKT n X Z$�'� ����� X� �е������ ������Ϊ�գ�����'��'��)����У��ʱ������д�����Ϣ �A@b�RMsgBox "��" & rgold.Row & "�е������" & Chr(10) & titleMsg & "����Ϊ�գ�����"k��0 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� �е������ ��.��д����ȷ���������Ϊ�ա�����д���򳤶ȱ���Ϊ�$�� λ������'��$�� ���e�d �������Ϊ�DZ������Ϊ���ȷ�Χ��� X� �е������ ��4��д����ȷ���������Ϊ�ա�����д���򳤶ȱ�����ڵ����$�� λ���Ҳ������$�� λ������'��$�� ���e�d �������Ϊ�DZ������Ϊ�̶����ȹ�� X� �е������ ��&��д����ȷ�������Ϊ�գ��ҳ��ȱ���Ϊ�$�� λ������'��$�� ���e�d �������Ϊ�DZ������Ϊ���ȷ�Χ��� X� �е������ ��,��д����ȷ�������Ϊ�գ��ҳ��ȱ�����ڵ����$�� λ���Ҳ������$�� λ������'�k��H �'��0����У��ʱ������д�����Ϣ �A@bk�� n � X Z �A@��'��Z================================= ִ�еij���У��==========================================� checkSpLenKT r �$�'� �� ��,$�'��$�� �����` �������Ϊ�DZ������Ϊ�̶����ȹ�� X� �е������ ��.��д����ȷ���������Ϊ�ա�����д���򳤶ȱ���Ϊ�$��&λ��ֻ��Ϊ���֣������������ַ�������'��$�� ���e�d �������Ϊ�DZ������Ϊ���ȷ�Χ��� X� �е������ ��4��д����ȷ���������Ϊ�ա�����д���򳤶ȱ�����ڵ����$�� λ���Ҳ������$��&λ��ֻ��Ϊ���֣������������ַ�������'��$�� ���e�d �������Ϊ�DZ������Ϊ�̶����ȹ�� X� �е������ ��&��д����ȷ�������Ϊ�գ��ҳ��ȱ���Ϊ�$��&λ��ֻ��Ϊ���֣������������ַ�������'��$�� ���e�d �������Ϊ�DZ������Ϊ���ȷ�Χ��� X� �е������ ��,��д����ȷ�������Ϊ�գ��ҳ��ȱ�����ڵ����$�� λ���Ҳ������$��&λ��ֻ��Ϊ���֣������������ַ�������'�k��x�'��0����У��ʱ������д�����Ϣ �A@bk��8 n � X Z �A@��'��h================================= ִ�еij���У�飨Number���ͣ�==========================================�checkNumKT r �$�'� �� ��,$�'��$����@ �������Ϊ�DZ������Ϊ�̶����ȹ�� X� �е������ ��G��д����ȷ���������Ϊ�գ�����д�������Ϊ���֣�����0������λ���Ȳ������$��λ����С��λ�������$�� λ������'��$�� ���e�d �������Ϊ�DZ������Ϊ�̶����ȹ�� X� �е������ ��?��д����ȷ�������Ϊ�գ��ұ���Ϊ���֣�����0������λ���Ȳ������$��λ����С��λ�������$�� λ������'�k��h�'��0����У��ʱ������д�����Ϣ �A@bk��( n � X Z �A@��'��[=================================ִ��ֵ��Χ��У��==========================================��Ѵ�����Ϣд�������б��checkValKT r �$�'� �� ��,$�'���� X� �е������ ��$��д����ȷ���������Ϊ���֣����ڵ����$�� ���Ҳ������$��������'��'��-����У��ʱ������д�����Ϣ �A@b�& isValidateCount = isValidateCount + 1k��8 n � X Z �A@��'��_=================================ִ�е�Ϊ����ֵ��У��==========================================��Ѵ�����Ϣд�������б��checkIntKT r �$�'� �� ��,$�'��$����@ �������Ϊ�DZ������Ϊ�̶����ȹ�� X� �е������ ��8��д����ȷ���������Ϊ�գ�����д�������Ϊ���������ڵ����$�����ҳ��Ȳ������$�� λ������'��$��e�E�������Ϊ�������Ϊ�̶�������� 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 �� '�k���d��� r$�'� ����� X� �е������ ��E��д����ȷ�������Ϊ�գ��ҳ��ȱ�����ڵ���1λ���Ҳ�����18λ������'��'��4����У��ʱ������д�����Ϣ �A@bk���k���k��� n � X Z �A@��'��X================================= ִ�����֤������У��==================================� checkZjlxKT� checkZjlx r�1$�'� ����� X� �е������ ����д����ȷ������'��'��(����У��ʱ������д�����Ϣ �A@bd���� checkZjlx n X ZA@�k��X n � X Z �A@��'��\================================= ִ��ѧ���ŵ�У��==========================================�checkXJHKT r�0, 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@b�k��� n � X Z �A@��'��W=================================ִ���꼶У��==========================================� checkYearKT� checkYear r�$�'� ����� X� �е������ ����д����ȷ������'��'��(����У��ʱ������д�����Ϣ �A@bd��h� checkYear n X ZA@�k��@ n � X Z �A@��'��W=================================ִ��ѧ��У��==========================================��Ѵ�����Ϣд�������б��checkXnKT r$�'� ����� X� �е������ ��)��д����ȷ�������ʽ��2012-2013�ȣ�����'��'��-����У��ʱ������д�����Ϣ �A@b�k��� n � X Z �A@��'��W=================================ִ���·�У��==========================================��Ѵ�����Ϣд�������б�� checkMonthKT r$�'� ����� X� �е������ ��&��д����ȷ�������ʽ��01��12�ȣ�����'��'��-����У��ʱ������д�����Ϣ �A@b�k��X n � X Z �A@��'��g=================================����3 ִ�е�����У��(�DZ���)==========================================��Ѵ�����Ϣд�������б�� checkDateKT� r$�'� ���2�����������У��ʧ����� X� �е������ ����д����ȷ����д��ʽΪ�"$4� xxxx-xx-xx�"$4� ����2013-02-21������'��'��-����У��ʱ������д�����Ϣ �A@b�k��x 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@b�k��8 n � X Z �A@��'��L=================================checkOption У�鱸ע ======================� checkOptionKT r�B$�'� ����� X� �е������ ��)��д����ȷ�����Ȳ��ܳ���200���ַ�������'��'��%����У��ʱ������д�����Ϣ �A@b�k��� 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� �е������ ����д����ȷ����д��ʽΪ�"$4�xxxxxxxx�"$4� ����20130221������'��'��-����У��ʱ������д�����Ϣ �A@b�'�d��@ �� r$����X$����϶��ȼ�����Ϊ�գ����϶�����Ϊ�լ'� �� r$��e�](����϶��ȼ����Ʋ�Ϊ�գ����϶����ڲ�Ϊ���'�d������ X� �е������ ��v��д����ȷ�������롰���Ѽ����϶����ơ�����ͬʱΪ�գ���ͬʱ��Ϊ����ͬʱͨ��У�飬���顰���Ѽ����϶����ơ��Ƿ�ͨ��У��'��'��0����У��ʱ������д�����Ϣ�'� �A@b�'�k���k��� n � X Z �A@��'��T================================= ִ����������У��==================================�checkMZKT�checkMZ r�$�'� ����� X� �е������ ����д����ȷ������'��'��(����У��ʱ������д�����Ϣ �A@bd��P�checkMZ 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$��e�w8����϶��ȼ����Ʋ�Ϊ�գ����϶����ڲ�Ϊ�գ��϶�ԭ��Ϊ�� �� �� r$��e��� X� �е������ ��d��д����ȷ�������롰���Ѽ����϶����ơ������϶�ʱ�䡱����ͬʱΪ�գ���ͬʱ��Ϊ����ͬʱͨ��У�飬����'��'��0����У��ʱ������д�����Ϣ �A@b�'�d������ X� �е������ �����д����ȷ�������롰���Ѽ����϶����ơ������϶�ʱ�䡱����ͬʱΪ�գ���ͬʱ��Ϊ����ͬʱͨ��У�飬���顰���Ѽ����϶����ơ������϶�ʱ�䡱�Ƿ�ͨ��У��'��'��0����У��ʱ������д�����Ϣ �A@b�'�k���Ek���E n � X Z �A@��'��X================================= ִ�����֤������У��==================================�checkIDCardTypeKT�checkIDCardType r �$�'� ����� X� �е������ ����д����ȷ������'��'��(����У��ʱ������д�����Ϣ �A@bd��PD�checkIDCardType n X ZA@�k�� D n � X Z �A@��'��T================================= ִ�вм����У��==================================�checkDisableTypeKT�checkDisableType r �$�'� ����� X� �е������ ����д����ȷ������'��'��(����У��ʱ������д�����Ϣ �A@bd���B�checkDisableType n X ZA@�k���B n � X Z �A@��'��T================================= ִ�вм����У��==================================�checkFamilyIncomeTypeKT�checkFamilyIncomeType r �$�'� ����� X� �е������ ����д����ȷ������'��'��(����У��ʱ������д�����Ϣ �A@bd��@A�checkFamilyIncomeType n X ZA@�k��A n � X Z �A@��'��v=================================14 checkGender ִ�������Ƿ�Ϊ���С���Ů��У��--==================================� checkGenderKT� checkGender r�1$�'� ���'��-�Ա��д�������У�����֤�Ź�� X� �е������ ����д����ȷ������'��'��(����У��ʱ������д�����Ϣ �A@bd��p?� 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 '�n���8d������Ϲ��� �� '��F6ִ�� ����һ���ǿ�У�� �ĵ�Ԫ��������Ϊ�����Ϲ������Ŀ  � � 'k��`8�'�n��P8i��H8�_--------------------------------------------����������ʽ-------------------------------------��]�p��VBSCRIPT.REGEXP$.�7RegExΪ����������ʽ� (��4 ����ȫ�ֿ����vba��\����ת��  ( �.������ʽ� ( �5�����Ƿ����ִ�Сд�� r %'�3 ִ������������.i���6��-----------------------------------------------------------�°� У���ظ���˵���Ѿ�û�и�ʽ����------------------------------------------------------------�V-----------------------------------------------------------1����ѧ���׶������ڱ��ڲ������(sheetѧ���׶��� �A65535 $f%B%�!'�*cna = getTotalColumnCount(sheetIndexValue) h$f!`B@�1&ÿ��У���ظ�ʱʱ���Ѵ�����Ϣsheet���,�'j�������Ϣ��¼��ʼ�����X==============================��ѧ���׶������ڱ��ڲ���==================================�0����ð������ÿ��Ԫ�غ�����֮ǰ�������н��бȽ�  �� �   $f%`' " �� � � "  $f%`'$  $��.���ѧ������ͬ��˵�����ظ����ݹ�� "� �е����ݺ͵� ������֤���ظ�������!!!!'� �A@b�*�Ѵ�����Ϣ����'&k��03�(3� 3i��3��-----------------------------------------------------------��һ���� ����ֵ��ȡ��ֵ������------------------------------------------------------------�����ֵ�����ҵ�ֵ���ڵ��л����keyWord ���ҵĹؼ����'kbn ���������л��� ֵΪ ��row�����row��'(]���the find result object� *�2 6�4 :�8� A1:A65535 n$N%B%0.. .�� ,�row� .!'(d��@1 .!<'(k��(1k�� 1i��1��------------------------------------------------------ ִ������ڹ���У��(����Ϊ��)-------------------------------------------------------------�value ���������value1 cell�������У�鲻��ȷ����false�У����ȷ����true�� @�0��˵��Ϊ�DZ����� >$����'�z���/k���/k���/]���'D�ijһ������ļ�¼�� �A65535 H$f%B%�!'F�B�������'� H r�row$('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 �к����1qaz�N n$NB@L F n$N%PB@R�/ �Ѹ���ɾ���- Worksheets(sheetIndex).Protect Password:=123i��p,��------------------------------------------------------ ��ָ��cell����ֵ-------------------------------------------------------------�8 �1qaz�N n$NB@L r X p n$N%`(ri���+��------------------------------------------------------ ִ��ɾ��ijһ�в�����excelû�б�����-------------------------------------------------------------�sheetIndex ����� rowNum �к�� F n$N%PB@R�/ �Ѹ���ɾ��i���*��------------------------------------------------------ ��ָ��cell����ֵ-------------------------------------------------------------�� �1qaz�N n$NB@L r X p n$N%`(ri���)��------------------------------------------------------ ���ݴ�����е���������ֵ��ǰ��ʱ�������Ѿ�ͨ����У�飩-------------------------------------------------------------�� ]�X �p �� X p n$f%`!rX '\�'D�ijһ������ļ�¼�� �A65535 H$f%B%�!'F�F������ H r�row$('B�A��ȡ��������������  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%`(rk��h&k��`& "�i��H&��------------------------------------------------------ ȥ��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 rS�ng�= A�;veShePet.Cs�6If�-�" Then�*�F�_��Fal4seE�Tru�nd If < E��)��[д��־ ��� �o��oһ�����kq�mwriteLog(co�ntent�]�iX`s(msgB�)�[curMsgR�ow, 1)�J�CK + 1:D�� ��ȡ� �����A�ֵLJpHDget��B�CountXQ(�sA�D�ʴ �A��?�Work�sHEQy�.vA`%2G�ú�ɫ����C��G3 �GRed�VHnLen� �EKzKRcR.Characters(�1, �).F]�.Color�73?VJx�x�&���!���������ʼ����s+#�` errafo�å��addCo�mmwXQC�VUů�,  �0™�'�TUnprotect Password:="1qa>z �e��\N�.A� (�� � I��0rior#=�<65 535 '�1���ɫ�����>%� � d/.Visi1 6K� ��Ye�sNo -k2� ? DiffName�����Ѽ���a�?%D~�� �Cods�����l�A!� � �'HBIDC0ardTpM�����֤�������� xo�(��/�  kSqyy�����ԭ���� �_ _ "] e? ? kYear�Z���?M�A�_ _ �] � �:��iSp�i�iBE\ ��V11j � BLvSelect� Case�� �=Q)1 ִ����ǿ�1?O��C��� 3~N8ull�d�xMe�thodXQ�7�Required��������� No��d�3�"��@"���" &Ǝ�"�x�������title�����д����ȷ���"����Ϊ�ա��B�������"�`���ΪA�<1)�λ����0�����+El4seuO2]OA+���ΧOex!�'�'�'���ڵ���3v(��Ҳ��謹�1-2?-%,?-�= 1�T`j�T�?-��T�T�T������T� &�S "�Se���S�&�S���S�f���{�F�{�&�R`'�R?,I�iahasE!�@�� '���B�a�ʱ����д���������POρ� �d͏| �|�| c�|���� } }-{}�g��|Sp}� �G{/?   � beginC��_comme�]�sheetD��Ni�(�,� isFo�r�h� '=� ִ�Ѓ�c�A��=�Case ~"B��T�J@�DHMB((, �"�1"4m�k�>�55��?y& ?y2y�1}/1�ww\o0O�!�L��set�Codz�, )'w�8&,��U���-ZZ�-�/�qO-*B-ѧ�஺ŵ�-�� �-XJH-EJ�-Len�"0,� 1, 50O-%� ���O��..O��/I�!c�����#c������c�c�50�c 222��2�2��%�]��_._.�_._.��O�.�*�.����I�D�.��.d\�. ��.�S��9��[л.\�....���?���?�0��-� ��-�-�-/�-�-���-�-��-�-�-�:֟�+��-�)������п����'p��������Ϣд�������б� Case "check�Bank" t�hMethodXQ = T(value)`�If Not`@Then2;errorMsgk"��" & rowIndex "�е�������title-& "��д����ȷ��������������֣��@��ڵ�ӂ'functionArgsArr(0)�,���Ҳ�������+�1��������ÆzhasEc�aTrue '����У��ʱ���������� writ`eLog ��'��End If�@beginCA�_comment �sheet�\,�o,column�D �'isForB '=ִ����꼶�K À5��Year�hҳ0DMB(�B, �¶, 1����H@B?�����X�N�\ Else�Ic s�et�*Cod�d+�KE{�IS �W� _Xc~kE�_X ���XY=�=Yѧ��Y�\9 �х����Xn�O]�\Xn��"��[�c���ʽ�@�2012-�3��ȣ^"__�C��_��_�J�U�U8‡_�'�*�·ݟ*?{��*�0hYMo�nth�*�*P-��*�Et�X@�?�\��X9?�& ?�7��*01�12�*}��*�������*�KI�*��V��*���U��R��]�*O'����3 �U������A+(�DZ����)��+�+���+Date" �CPo,`,Birt�hday�,v��, �, '�������ʧ���YoO�O��/H���.��!�Chr(34�r�x-xx �� ᭁ[-0\10���� ��0�0�0� ����j���0��0��0�0�0�0��0?,ٛ0���0�ѩ_�0�0� �0Nec�essaryO1r �CO1H1&�1(��1��1�@�1� �_V��_?�_$��1�1�1��3-���1� �1�1�1�L� writeLog error`Msg �0E nd If|beginCheck_comment sheetIn@dex, c2MethodXQ, rowolu mn ~isFor = True '=ִ�еij�������У����������<�4�Ѵ�����Ϣд�����б�@Case "qBirthday"| '��� �j�Necessary�(value)#@If Not � Then '�焹� ~ʧ��$�%�^�#"��" &i�"AS��� ��O��title����д�����ȷ���@��ʽΪA C@hr(34) x1-xx�  ����2013-12-21���@���"�+h8asE��+�� '������yʱ����n\(�J�����������10 �%�绰p����Sb'(\Pphone�3�Z�N�umvYvX�,�T�T�T����-�̶�# �� �����$�V�T�S�S�R��Q���P?�?��?��L��EOptionBQ౸ע �P&�CQ㣣�P, 66?Ъ_Q��_Q_Q�����Ȳ�������200����ַ����K�K�� ��% �%��c��, c�� ^ �%!_��# a��϶����Ѽ��������qO&�G�ODiffxNam/PSoP �D�MB(��, �}@, funcA0A8rgs_)B�)XQ��~ORC ���|�x�|��|�|?N�t�(_x�#� �sysaicultyGradBe�Flag� 0uR_��ElsG �E}set�C�od� ��p�� c� TriuoQ"!��ͨ��a(���ֵΪ��i ���1���Y�{��2��/@� ��A� /B/B/B/B?�?Foh�>&Bu�(��ǁ�)o{�BId`�ityDa�te�xOC@C�Ŀ�����A�A����Cs�omsgQE��"�q�1�S�02?�> ��G�G�G� �D �DyiP�ntif���J-�80�8i>< A��/E��Qn��ܼ�n!E ��1a-/F ?� indentifyDateFlag = 1  �DElseIf sysDifficultyG�radeNam�2 And Trim(value) <> "" Then '�����϶��������Ʋ�Ϊ�գ���������� �2�,errorMs�"��"� & rowI�x"�е�ʀ����� title�& "��д����ȷ�������롰���`Ѽ���ox������ͬ�2�|��z���ͨ��Ут�����!P�Ƿ�"ihasEA5@xTru�e '�����ʱ���d�д������ϢcheckMet hodXQ@Fa@�� writeL�og �W� �x0� 2E��If��beginCA6_comm� shee�t�}, �<,�`olumnD W6isForD_ '= ִ��À�������j^ =� l�K[��~�]ck��]:|�]�Y�]�_kH�]FamilyIn�@y^�zo^�_-_o�2_߼߼ ߼߼ �߼�_ʼP.�_R|��������ۿ_�Y14�%i��Ge�r��������Ƿ������С�� �Ů���`--�0�1�t3��P =�Z=��`��0"1�"�_�/0XQ �_�D�)IdNumC9s��Ա𱇣������������֤���;��4_�_�_�_�Y��4_�_���4O-4��6�b�F�5�ex�����5'�e���eJ�����5  ϔ�0�5YesN&o@�5���5����5~5��g"�5� ��5aH�5��f��@�_6_6�t�1�1�1�1��1��f����* �f��/�/y�/e�/�/����/G�/�/�/�/�or�eT�e/*�/?�/�/?�/�eSq�yyName�/� ����e�/0/0�@�O���f�r/0/0/0/0/0?j/0/0/0*,0,��rMsg 0Else��setDMBCode "checkSqyyName", sheetIndex, rowcolumn��nd If@beginCg_�comment e�MethodXQt, erro�isFor =� Tru�{'=!�9Term�ִ��ѧ��УP��--= rC,as���'"�If` Not ;�(�, value, functionArgs)� Then�%������<"��" &�j�"�е���@����t0itle�����д����ȷ������Ô,�hasE�]DV@ '�����I��������д��������*writeL�og�pE|��U�����AtLeastOneNNullT������һ�����Ϊp�ǿ�:�� �9a#ACou@p= ��+ 1 '� �!A> �ĵ�Ԫ�������=�\"\Mone�y(�Z) A�:B <> 0�Z 'aG ���Ϲ� ��G�Ptotanl� Q�+Cg�S�elect �tޘ� m"baoji�ao�C��:�1 � �Sum�-, �huosh�i����c _�� Bzhusu?�L��#�� �others?l���# _� A��T�sJ�� '�e��?f� �=pG�>6�>�>�>������Ϊ���e@A7��c��+ �h+ " �J"�`��~u �F�t '-������������ʽo- � reg[B�(��})8DimaEX As0 Obj�I�Set�= Create("VBSCRIPT.RE@GEXP")q'RegExΪ�8���G �EX�.GlobalpF���~'����ȫ�ֿ���''vba��\����ת���Pattern��� R�����Ignore�B8= Fa�����Ƿ����ִ�Сд����3�Test�gGB.����p������h�in��#$O  �°� �4������˵���Ѿ�û���pt������� �1����ѧ���������������ڲ��� �-B}�Sam�eXQNew(W�p2) '�w(n*a�S!�s:.Range("A6�5535").P(xlUp).R$ow'cge)�U>�`��Ex�it �2@e%7��i�f�LData� Count 0 �'ijһ��a(�ļ�¼���C�Num`Sz�s(Areag�fA� (xlUp@jo�w '����E �HF�/ -Ul �$0,#e) '���>��CFor i� �% To @��� 1�C`Fs(i,> �3b>�r'�+ �(��p#5o���2a�4 i'j.�5 +Z c -i DC��(��j, 3)�MB#Y)� '�ж��(�d�Ƿ���f������'&A eSbS)A�j� '��ʱcAQ��ĿΪ�������Ѓw�� ��]��OEbHɾ���.�в������ex�ܱ����������F�1` �����' �кňsdel�eteP\�h,�*�E�jv).UnprotaoPassw`|:="1qaz�"ob�s(�).D� '�Ѱ����!�'rA}).P123_� ������c'��ֵ?(setg�<�z�3XQ�$�c�ԋDF�Q+�??����#F��).�F�=�f�///%/�û��A///oW////n² &/N>o�$�Z/�fow�, ,?B �(/��(�(�(�(Q���(et���@�@?,t��).�(#��(p��W/�Bδ�A�֐]0���ư>�Σ�ǰ��ʱ��1�Ѿ�ͨ����˱��)?����Code��%bW�8�T�<��, c� 2�����QL2p|�y�,��HC=� �� S]_��_���_�@a[��B�=�����?� ��{��9�Q�?~�a��s��*��� Count = 8+ 1! �Else�Ex@it For Vnd If&Nex�t i` jjrowData �To  +- ��value1�Str(Sheets(Areas Index).Cells(j,� 3).0)x�If �%cV�.) Then '�жϹ��������Ƿ������െȏ'�+code#ۀQO2O�& !�n����v, col� +umnPl�us�,��J��A.qB}AIP"��"��M�2'�2"0"��S�)�"���"E��j �Function '-2 ȥ���â�Ŀո� D  removeSpace�XQ(gN,as�MI�DimeiAs �ring '�����������Ah'7�length1 Int@eger, c2 h '���ʾ#ԭ���ij`��ȣ�������"�!����ַ����'�� cFa`[ 'Ĭ��Ϊû�F' Wor k!s�!).Unprotect Password�:="1qaz�DƋt���x��d Lxen(� �/�p'0���yM '����1Ϊ�գ�@�����%�X����$c 2� Ina�� , " " )�12����һ�γ������λ�Çf�2 <> ��3����A5'%g� �ReplQ����"E�+���L��� �ETru��%|+z���������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������Root Entry������������*�d�uWorkbook����������CompObj2��������h_VBA_PROJECT_CUR"1+PrintForm����*f������������&CompObj����ao������������VBFrame������������VBA��������__SRP_0(��������K�Xf������������Z__SRP_1 �������� �__SRP_4��������~__SRP_5 ���������PrintForm�������� �__SRP_2 ��������i`!__SRP_3��������3�__SRP_8��������7D__SRP_9����'����A�__SRP_6����E! _VBA_PROJECT������������z�"__SRP_7��������v�dir ���������]SbpS��ȉ  ���������;N z�^���������S@ShowForm����������ThisWorkbook���������e !h���Qpe ���������B|__SRP_10��������w__SRP_11���������__SRP_f��������A��]wQ�Qpe ����������__SRP_b����"����Dj__SRP_c����$����F�Sheet1��������Mi__SRP_d����%����kj__SRP_e��������m�Sheet5#����������__SRP_a����!������Sheet6&����������PROJECT ����������PROJECTwm��������������ShowForm)-f�������������&CompObj./�����ao,������������VBFrame�������������DocumentSummaryInformation8�������������SummaryInformation(����0������Ole ��������������������������� ���� �FMicrosoft Excel 2003 ������Biff8Excel.Sheet.8�9�q������������������������ }t ����������������������������� ����Microsoft Forms 2.0 ����Embedded Object�9�q�������������������������������VERSION 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 Q�0TargetCancel Qq,PSaveAsUIIDNumberfunctionArgsArrvalue2 functionArgsIdNumN�����������������rU@@@@~xb��rU@@@�������������'�b�������������������������������������������������������������^�L����e���ʘ����������������������������x��ME�����������������������������������������������������������������������������������������������������������������������������������������������(SP����S����S����S�������0{1680EE36-33AD-4AFE-87D0-4FE373507221}{5E5E3BDC-9005-439F-8638-E65246908664}x����8 ����0����������%���������������h��8��������%����������������������������������������8����������������������������������������������������pՊ�Z�����������x�����Attribute VB_Name = "PrintForm" " �Bas�0{1680EE36-33AD-4AFE-87D0-4FE373507221}{5E5E3BDC-9005-439F-8638-E65246908664} dGlob�al�Spaco False �Cr@eatablP�redeclaDId�Tru BE`xpose0TemplateDeriv�Cus tomiz�D��������������������������rU@@@������������8�`��������������������8a`��������������������b��������������������������������������������������rU@@@8 `����������q`1�a������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������Hi���������$h������������������������������������������������������������rU@@@������������xX�`�������������������1�Cb������������������������������������������������������������rU�@@@~x a ��* ����$HiHi�Hi( Hi�HiX(Hi0 Hi�0Hi�0Hi�Hi�Hi8Hi� Hi�J�gg^���������������������Z������������������������gv�(x����� ����������������Z���������������H��������������H���g�0��@����&��������H���Hi J�gg^���������������������Z������������������������gv�(x����� ����������������Z���������������H��������������H���g�0��@����&��������H���Hi� (Hi�  a$h  "a �&o "a � *~  &o � .�  .� $h   "a  �0�   &o  �$h  *~ �$h  *~ �!*~ $ &oV�������������������������������rU@@@������������P�`����������������������OO@�`��������������������PX1` ��������������������1�aOOO@�`��������������������P`1 `��������������������1���OOOOX ` ��������������������1��OOOhQ `��������������������1����OOOOOhA`��������������������!1��AOOOOOP�`��������������������q�OO@1 `���������������������OX1 ` ��������������������1�X1 ` ���������������������!AOOOPQ `��������������������1aOO`� `��������������������1�a�OOOOPq`��������������������1aOO``��������������������1�a�OOOO`q!`���������������������1�aOOOOXA#` ��������������������1�aOOOb����������������������������������������������������������Y��0*� pH�d� VBAProje�ct4@j = r Պ�Z� J< r�stdole>stdo�le h%^*\G{00�020430-C 0046}#2.0#0#C:\Windows\Syst em32\e2.tlb#OLE Automation`�EOffDic�EOf�i�c�E�����E2DF8D04C-5BFA-10�1B-BDE5�E�AA�C4�2�E��gram Files\CommonMicrosoft Shared\OFFICE15\MSO.0DLL#��M 1@5.0 Ob�� �LibraryK�MSF�orms>SF�rm�s3��D452EE1-E08F`A-8-02608C@4D0BB4 SI�NDOWS\sS�FM20L'B �_��&/;"1��jIqAHq00}#:0Bq#� ��50�� ��A122AF265-4027-477C-B7E4-C100DD323ADC�6Users\lenovo\AppData\Local\Tem`p\VBE�b7.xexd�c<�!��.E ���.`�M �E��� �����ThisWorkbookGT� T�i�kWBnkb�okT� 2� �THB1������B,�!zL"" +�BrShee�t1G� S�e@`�t1 v�2�M� �� �H� 6�� 6� 6� 6� ��� �� ���ӡԤ��G�SbpS���ȉ�e2j�o �p �!�(e)� ���ߺ���c �]wQ�Q|pec ec eo mȟ���k ��@����G�;�Xf"a2fIo �o �&������!h����e�eo �co ~�k !L������GbQ;N z؏^b�2�o *.o U�2ShobwaxG`6�\o�w���3e2roRw�]n�O(� ��l5�^5�^5�^�5�^@?�Ch��^� �PrintC�rin� �%bj2o��d��0ʘ����������������������������������������������������������������������������x��ME�����������������������������������������������������������������������������������������������������������������������������������������������������h L�����������������������������������������������������������������������������������������������������������������������������XՊ�Z���"�� � (� H�h����x���ѧ����Ϣ��ӡģ��$N(P�ѧ����Ϣ��ӡģ��$NB@R��ѧ����Ϣ��ӡģ��$N(Po������������Attribute VB_Name = "����Ԥ��" Sub Browse_Print () Worksheets("ѧ����Ϣlģ��").Visibla�True"d^P@review2cEnd � ���������������������������������������������L����q��n����������������������������x��ME�����������������������������������������������������������������������������������������������������������������������������������������������(SP����S����S����S�������0{88F06786-5F9D-4399-AB64-EBCD650E6E8F}{CCB1E2AA-2AE0-4E8A-B290-9BFD1D7C1C6C}����8  X����������������������������� $������������������������������������� ����������������%��������������������������%��������X����������������������X������������������������������������������������������������� Պ�Z��� � "��� �0� ����� 8"�H�P� X�h� ��������x�ȡ����'| ��B@"o��H�ȷ���X &'| ��B@"o����������R�Attribute VB_Name = "ShowForm"  �Bas|0{88F06786-5F9D-4399-AB64-EBCD650E6E8F}{CCB1E2AA-2AE0-4E8A-B290-9BFD1D7C1C6C} dGlobaBl�SpacoFalse �Cre atablPr@edeclaI"d�Tru BEx0pose0TemplateDeriv�Customiz�D'ȡ`�� P�� Sub CancelButton_Click() notContinueBool�T Me.HidZEnd! 'ȷĶ� ,onfՏ,9�-Fl��;/������������������������������������������������������lzz ��zL��#����������p�����_�D�+���&/��F�+^�Q B���WhG�I������������x�+^�Q B���WhG�I���_�D�+���&/���ME�������������P���������������������������������������������������������������������������������������������������������������������������������SL����S����S�����6"����������������� ��������� ��������`������������ X����� �)�@������������x��%i�.������������ �������������� ����������������%��������������������������������� %��<������������H������������������ %��������������������������������������������x�������������������������Պ�Z*\R1*#278$*\Rffff*0?5b1ba24b�����`��� � ����� ����"� �& � H�X�`�p� ����� ����� ����� ����� ����x������ڵ�Ԫ����ʱ�� Continue? D�Hi$2 F��1A@2k�� �123A@4o����������x�Attribute VB_Name = "She@et1" �Bast0{000�20820- C$0046} |Global!�Spac�False dCreatablPre declaId�Tru BExposeTemplateDeriv$�Bustom izD2'����ڵ�Ԫ�����ʱ �P$( Sub Works�_BeforeDou�eClicka(ByVal Target As Range, @CancelBoolean)  If MsgBox("Continue?", vbYesNo, "Hi")��� Then3�  "�� End If� CDe�c�23�n�@4�8C�����������������������rU@@@ ������������xb����������������������rU�@@80 �"�-�-�'�-1.a.��+,A,���������+/`q,Q�,������������ `i�������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������h�ggZ�"�������"�p����� ������"�������"�P�����x������������������������O���������O�����p���OX����@���O(�������O���������O���������O���������Oh����P���O8���� ���O����(�� �$�����������x���������������p���X���(����������������������h���P���8���g� ��?��g ��gg���gg���8�������������p���X���(����������������������h���P���8��������������x���`�$h $h X����Z�����h���#����������p����=�q|{K�p�B}� �F$��Xm oI�� f$�FQ������������x$��Xm oI�� f$�FQ��=�q|{K�p�B}���ME�����������������������������������������������������������������������������������������������������������������������������������������������(SL����S����S�����6"������N0{00020820-0000-0000-C000-000000000046}������������ ����0����������%����@�����������p��������������%��(���������������������������%����H��������������������������������������������x@x������������������������8Պ�Z$*\Rffff*0@5b1ba24b�����`��� ����� ������������x������Attribute VB_Name = "She@et5" �Bast0{000�20820- C$0046} |Global!�Spac�False dCreatablPre declaId�Tru BExposeTemplateDeriv$�Bustom izD2 �������rU@@@8 p�*�!+��������q`1�a�����������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������D����������������Z���������#����������p��T��zD��:���(� �F����F��$e�E������������x����F��$e�ET��zD��:���(���ME�����������������������������������������������������������������������������������������������������������������������������������������������(SL����S����S�����6"������N0{00020820-0000-0000-C000-000000000046}������������ ����0����������%����@�����������p��������������%��H���������������������������%����H��������������������������������������������x@x������������������������8Պ�Z$*\Rffff*0A5b1ba24b�����`����������x������Attribute VB_Name = "She@et6" �Bast0{000�20820- C$0046} |Global!�Spac�False dCreatablPre declaId�Tru BExposeTemplateDeriv$�Bustom izD2������������������������������������ID="{00000000-0000-0000-0000-000000000000}" Document=ThisWorkbook/&H00000000 Document=Sheet1/&H00000000 Module=���ߺ��� Module=���� Module=У�麯�� Module=������ Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=ShowForm Module=��ӡԤ�� BaseClass=PrintForm Document=Sheet5/&H00000000 Document=Sheet6/&H00000000 HelpFile="" Name="VBAProject" HelpContextID="0" VersionCompatible32="393222000" CMG="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���ߺ����]wQ�Qpe�����XfУ�麯��!h���Qpe������;N z�^ShowFormShowForm��ӡԤ��SbpS��ȉPrintFormPrintFormSheet5Sheet5Sheet6Sheet6������������ }t ����������������������������� ����Microsoft Forms 2.0 ����Embedded Object�9�q�������������������������������VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} ShowForm Caption = "UserForm1" ClientHeight = 3180 ClientLeft = 45 ClientTop = 375 ClientWidth = 4710 StartUpPosition = 1 '���������� End ����������������������������������������������������������� ��՜.��+,��0�HP X`hp x �� ��У��ר�Ƽ�ͥ������Ϣ¼������� ������Ϣ ���������������������������������������������������������������� �����Oh��+'��0�@HTd | ���lenovoMicrosoft Excel@���&��@����0������������������������������������������������������������������������������������������������������������������������������������������������������������������������������ ���� ������������!"#$%&'()*+,-./012����456����89:;<=>?@����BCD����FGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstu����wxyz{|}~������������������������������������������������������������������������������������������������������������������������������������������������     ���� !"#$%&'()*+,-./0123456789:;<=>?@����BC����E����GHIJKL����NOPQRSTUVWXYZ[\]^_`abcdefghij����l����nopqrstuvwxyz{|}~������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJ����LMNOPQRSTUVWXY����[\]^_`abcdefgh����jklmnopqrstuvwxy����{|}~�����������������������������������������������������������������������������������������������������������������������������������������      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUV����XYZ[\]^_`abc����efghijklmnopqrstuvwxyz{|}~���������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������