��ࡱ�;�� T��������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������� g2�������\pHP B�a�=�� ThisWorkbook���=� L}8X@�"��1�����[SO1�����[SO1�����[SO1�����[SO1������[SO1�����[SO1�����[SO1����Arial1������[SO1�����[SO1h>����[SO1,>����[SO1�>����[SO1@�����[SO1�����[SO1������[SO1�����[SO1������[SO1����Arial1�Q����[SO1�����[SO1�����[SO1� ����[SO1����[SO10����[SO1� ����[SO10����[SO10����[SO1@����[SO1�����[SO1� ����[SO1>����[SO1�����[SO1� ����[SO1�����[SO1�����[SO1�4����[SO1� ����[SO1�����[SO1� ����[SO1�4����[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��� �'���� �(���� �)���`� ������ ������ ����� ����� ����� ����� ����� ����� �*���� �+������ �,���� � � �-���� ����  � �� ���""@ @ � ��@ @ � ���@ @ � ���@ @ � ��!�@ @ � ��""@ @ � ��� �1�� �1�� �1�� �1�@ @ � �1�� �1�@ @ � �1�@ @ � �1|7 �1�� �1�� �1�� �0@ � �� �1�@ � �1��� �1�� �1�� �1� �1|@  �1� �1� �1|@ @ 7 �1<@ @ � �.1�@  �1�� �1� �/87 �08� ||f�|f�}-} 00_)}-} 00_)}-} 00_)}-} 00_)}-} 00_)}-} 00_)}A} 00_)ef[$� -}A} 00_)ef [$� -}-} 00_)}A} 00_)�L[$� -}-} 00_)}-} 00_)}A} 00_)�L[$� -}-} 00_)}-} 00_)}A} 00_)23[$� -}-} 00_)}-} 00_)}A}  00_)23[$� -}-}! 00_)}-}%�?_)}A}( ��?_)����[$� -}-}) ?_)}(}-  ?_)}A}. a�?_)����[$� -}-}/ ?_)}}}2 �}�?_)�[$� -�##0. � �}�}3 ?_)����[$� -???�##0.???� ???� ???�}-}4 �?_)}-}5 ��?_)}A}6 �}�?_)���[$� -}A}? �e�?_)���[$� -}}}@ ???�?_)???�[$� -???�##0. ???� ???�}�}A ??v�?_)�̙�[$� -�##0.� � �}(}B  ?_)}-}9 ?_)}A}: ?_)[$� -}A}; ?_)[$� -}-}< ?_)}A}= ?_)[$� -}A}> ?_) [$� -}x}C����?_)���� [$�����## ����� �����}-}D ?_)}-}K ?_)}-}L ?_)}-}M ?_)}-}R ?_)}-}T ?_)}-}U ?_)}-}V ?_)}-}W ?_)}-}X ?_)}-}Y ?_)}-}\ ?_)}-}_ ?_)}-}` ?_)}-}c ��?_)}-}d ?_)}-}e ?_)�!20% - :_��eW[��r� 1�C��20% - :_��eW[��r� 1 �%�!20% - :_��eW[��r� 2�C�"�20% - :_��eW[��r� 2 �%�!20% - :_��eW[��r� 3�C�&�20% - :_��eW[��r� 3 �%�!20% - :_��eW[��r� 4�C�*�20% - :_��eW[��r� 4 �%�!20% - :_��eW[��r� 5�O�.�20% - :_��eW[��r� 5 ef���� �%�!20% - :_��eW[��r� 6�O�2�20% - :_��eW[��r� 6  ef���� �%�!40% - :_��eW[��r� 1�C��40% - :_��eW[��r� 1 �%�!40% - :_��eW[��r� 2�O�#�40% - :_��eW[��r� 2 �L渷� �%�!40% - :_��eW[��r� 3�C�'�40% - :_��eW[��r� 3 �%�!40% - :_��eW[��r� 4�C�+�40% - :_��eW[��r� 4 �%�!40% - :_��eW[��r� 5�O�/�40% - :_��eW[��r� 5 �L���� �%�!40% - :_��eW[��r� 6�C�3�40% - :_��eW[��r� 6 �%�!60% - :_��eW[��r� 1�C� �60% - :_��eW[��r� 1 ����%�!60% - :_��eW[��r� 2�O�$�60% - :_��eW[��r� 2 23ږ�� ����%�!60% - :_��eW[��r� 3�C�(�60% - :_��eW[��r� 3 ����%�!60% - :_��eW[��r� 4�C�,�60% - :_��eW[��r� 4 ����%�! 60% - :_��eW[��r� 5�O�0�60% - :_��eW[��r� 5 23���� ����%�!!60% - :_��eW[��r� 6�C�4�60% - :_��eW[��r� 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^ĉ 4�, 8^ĉ_hQ�VL�?e:SR�Nx�-���(�������c  ���.}Y�5��}Y ����� �a�%� /Gl;`�+��Gl;` �%�0�����'�^�1��� ��'�^[0]� 2���{�c�����{ ��}�%������ ���3�h�gUSCQ:_��eW[��r� 6�C�1�:_��eW[��r� 6  ��F� ����%� ?�-N�7���-N ���� ��e�%� @���Q�c�����Q �???�%�???��???��???� �???�� A��eQ�o����eQ ��̙� �??v�%������ ���B� ��0� ��]��v�����c  ���� C�lʑ�^� ��lʑ �������������������� ������X��TableStyleMedium9PivotStyleLight16��8�������������������������������3f������ff���f����������������������������������̙��̙3f�3���������fff����3f3�f333�3�3f33�333\���`�$�Exvzu�V�[VYf[ёD��RN�R TUS�!e�Nxh��:s���Oo`�����VV�����!  =dc:- KmՋ@b g!h��ĉRv^SbpS���Oo`���f�f����X@���������F�>��x�MO�S ���A�A�@�A@�  �� �U1 7 checkDiffName�V�����[�V���~+R T�yf[u�Y T 77usY�e�l T�^�S/�f T�y{|�W checkYesNo checkGender'`+RsY'`+R7u^�8^�V��N,��V�� N�V���S>e�eg 7 checkSfzjhsfzjh 7�[�Sё�� 7 checkNum1,6,0 7 createDate 7xm 7 zxjh 7Ny���R 7 checkYesNo 7/f 7&T 7 checkZXJHNy���R 7zxjhm 7 checkZXJH 7:_�Q��R 7 \pel�eؚB\!k��r^��R 7�[�S/e�c��0W:Sؚ!h�[T�W{Q��R 7�QQgf[!hYe��Ux�X^D��W{Q��R 7ؚ!h���[XT;e��`�`?e�lYe��NNZS�Xf[MO��R 7ؚ!h`�`?e�lt����Ye^;e��ZS�Xf[MO��R 7vQ�N 7�cυ��R 7 checkZXJH 7 checkZXJH 7�e 7Ny���R 7 yjsjxjSub 7 4161013681  xvzu�V�[VYf[ёD��RN�R TUS 7  xvzu�V�[VYf[ёD��RN�R TUS  7sfje 7/ kX�QD��RD�ё�v�S>e�eg � 7FAILURE 7! 4133010347�Z8 �8��8��9�x:j�;��<� @eAW �B� �C� cc��B��������O��Uj_ �KU� g2���  �_  d����MbP?_*+��%{����&ffffff�?'ffffff�?(�?)�?M.Microsoft Print to PDF�P/ � 4dXXA4����GIS4DINU"�$,?]{~�SMTJ�{084F01FA-E634-4D77-83EE-074817C03581}RESDLLUniresDLLPaperSizeA4OrientationPORTRAITResolutionResOption1ColorModeColor,V4DM� p"��O4�wM��H�5��L*@VDocumentUserPasswordDocumentOwnerPasswordDocumentCryptSecurity�" d��333333�?333333�?�&�<3�cA�U} �d}  e} �d} �*d} �d} d}  d} 3�d} 4l�d} mq d} rz d} { d r�L�[E�X�L�Ll�M�N��P{@� QP� \7� R� T!� U� L5["@]� cO^� W0� Y1� WW_� M� _8� L� L� L� Z`� M� V� M2� V� iM;� kM � S� a9� SN� S� S� S� OQ� b:� OR� O4� O6� O3d���TB FlTT���r��q�Z�( � ��� �cq � �N�P�� ��X��������������?��E� ��]4c9@ ����E�@��ķQ>� ��<kX�Qf[u�v�Y T<�~�~� � � �<�(�� ����C�C��@���],@�t39� ��$< _�Y�h�g<�~�~� �� � �<�(�� ����C�C��@����],�@s39� ��$<_ �Y �h �g< �~�~� ��i � �<�(M ����C�C��@��:0��],�5@Ir39� ��$<_ �Y �h �g<c9admin>�@din��jn  �7� Sheet1gg����Dh4hl�:S�W2 g2��� &�pcr  d����MbP?_*+��%����&ffffff�?'ffffff�?(�?)�?M�Foxit Reader PDF Printer�_�� � 4dXXA4�" dXX333333�?333333�?�&�<3U} @F} �F} �F} �!F}  K} �K}  K} K}  K&�@ ,,,,,,, , , , , ,,,,,,,, ,!,� J� E� E � J � K.�DDDD� KS� FH�?� G� F� KT� F H� G� F�DHHD� F H@� G� F � F H�?� G� FH�DHHI� F H�?� G� I� F H@� H� I� F H@� H� I� F H@� H� I� DHHI�DHHI� F+F� F,� F-� F*F�?� F"� F� FF@� F)� F� FF@� F#� F� FF@� F$� F� FF@� F%� F� FF@� F&� F� FF@� F'� F� FF @� F(� F� F<F�?� G=� I>� F?F@� G@� I>� F?F@� HA� I>� F?F@� HB� I>� F?F@� HC� I>� F?F@� HD� I>� F? F@� HE� I>� !F?!F @� !HF� !I>�D" lF J<<< <<<<<<<<<<<<<<<<<<<<",#,$,%,� "F<"F"@� "HG� "I>� #F?� #FH� #HI� #I>� $F?� $FJ� $HK� $I>� %F?� %FL� %HM� %I>� 4<<88�P�H � �0�( � � >� @��� 7� Sheet5gg����D g2��� �t  d����MbP?_*+��%����&ffffff�?'ffffff�?(�?)�?�"�333333�?333333�?�&�<3UDDDD� x< �P�H0��0�( � �>�@��  � 7� Sheet6gg����D ����������������������������������������������������������������������������������T �? �&" WMFC�� � �,l4�!K� EMF�,� V@��8�F, EMF+@��``F\PEMF+"@ @ $@ 0@�?!@ @   ���  !" ����!" ���� ! ��� " ����! ��� 5�" ����! ��� 5�" ����! ��� 5�" ����! ��� 5�" ����! ��� 5�'���%  ���   Ld�4��%!��?�?'�%  � �&�% ��6��% �Ld������!��?�?% ��6��% �Ld������!��?�?% ��6��% �Ld������!��?�?% ��6��% �Ld������!��?�?% ��6��% �Ld������!��?�?% ( '�% % ��6�% �Ld����������!��?�?% ��6�% �Ld����������!��?�?% ��6�% �Ld����������!��?�?% ��6�% �Ld����������!��?�?% �6�% �Ld���������!��?�?% ( Rp�������[SO0�90W`2��p[�w�,�(��S`2@��0�,�z��,�T���0z��,��d���0z�p[�wt�9N0z�H�0 x��=� H07!� � -� �^0�ކ�h�x�v$���t��0dv%   ��� T|�G�i�h�AUu�A�GL��������\vQ�ND��RN�R TUS$$$$$$$$Rp�������[SO0�90W`2��p[�w'�(��S`2@��0'�z�'�T���0z�'��d���0z�p[�wt�9N0z�H�0 x�Ȗ� H07!�k" � -k" �^0�ކ�h�x�v$���t��0dv% Td;����h�AUu�A;�L��������Tf[u�Y TT`�T��h�AUu�A�L��������Tf[M|�STp��B��h�AUu�A��L��������X���N���N{|�WTl����h�AUu�A��L��������X���N���N�S�% �% �" ����!% %  ��� 5�'���% (  ��� ���  ( &���% 6*% �Ld)*!��?�?% +6�% �Ld+�+V!��?�?% �6�*% �Ld��)�*!��?�?% �6�*% �Ld��)�*!��?�?% g6g*% �Ldgg)g*!��?�?% 464*% �Ld44)4*!��?�?% �6�% �Ld���!��?�?% ��6��% �Ld������!��?�?% ��6��% �Ld������!��?�?% g�6g�% �Ldg�g�g�!��?�?% 4�64�% �Ld4�4�4�!��?�?'%   ���( &% �6�% �Ld���$!��?�?% ��6��% �Ld������#!��?�?% ��6��% �Ld������#!��?�?% g�6g�% �Ldg�g�g�#!��?�?% 4�64�% �Ld4�4�4�#!��?�?% �6�% �Ld���!��?�?% ��6��% �Ld����������!��?�?% ��6��% �Ld����������!��?�?% g�6g�% �Ld��������g�!��?�?% 4�64�% �Ld��������4�!��?�?% (  ��� ���( &���% 66% �Ld46!��?�?'%   ���( &% *66*% �Ld*4**6!��?�?% �66�% �Ld�4��6^&� WMFC� �,!��?�?% �66�% �Ld�4��5!��?�?% �66�% �Ld�4��5!��?�?% �( % �" ����!%  ��� 5�5�0 � % �% �  ���% �% !&% '���% &% ( '���%  ���  Ld�>�>�>�!��?�?Ld�>�m�>0!��?�?'%   Ld�>�m�>0!��?�?Ld�m�m�m�!��?�?% ' ���%  ��� ���Ld�?�?�?�!��?�?Ld�?�l�?.!��?�?' ���%  ���Ld�?�l�?.!��?�?Ld�l�l�l�!��?�?% %  ���Ld�@�k�@�,!��?�?% " ����% �% �% �% � ��� ���% %  ��� ���% % �@�lRp �������[SO0�90W`2��p[�w%�(��S`2@��0%�z�%�T���0z�%��d���0z�p[�wt�9N0z�H�0 x��L� H07!�k" � -k" �^0�ކ�h�x�v$���t��0dv%    Tx�J�d�h�AUu�A�JL��������\_ �Y �h �g�% �% �% �" ����!% %  ��� 5�% �% �K@0 5�5�  ���% % �% �( % �( " ����Q|4�P(x��5�( �F4(EMF+*@$�?���?��FEMF+@   �5 ��� '��'����� '����� ,�5'����� ,�5'����� ,�5'����� ,�5'����� ,�5����- ���  @ !�%���- ����-�����- @ !���-����- @ !���-����- @ !���-����- @ !���-����- @ !���-���--���- @ !���-���- @ !���-���- @ !���-���- @ !���-��- @ !��-����������- ���2 G���������ҵ������$$$$$$$$���������-2 �;ѧ������2 �ѧ����2 �� ���֤������2 �� ���֤��������-���"System-'��--��� ,�5����-� ������ �����-*- @ !�*-+�- @ !�V+-�*�- @ !�*�-�*�- @ !�*�-g*g- @ !�*g-4*4- @ !�*4-��- @ !��-����- @ !���-����- @ !���-�g�g- @ !��g-�4�4- @ !��4�- �����-��- @ !�$�-����- @ !�#��-����- @ !�#��-�g�g- @ !�#�g-�4�4- @ !�#�4-��- @ !��-����- @ !���-����- @ !���-�g�g- @ !��g-�4�4- @ !��4-� �����������-6- @ !�6�- �����-**6- @ !�6*-��6- @ !�6�-��6- @ !�5�-��6- @ !�5��-�-'��-��� ,�5,�5����-�-  ���--�- ����- �- � ����-  ���  @ !��>� @ !�0>��-   @ !�0>� @ !��m�- ����- ������ @ !��?� @ !�.?�����- ��� @ !�.?� @ !��l�- - ��� @ !�,�@�- '��----  ������- - ������- -,l�@����������-  2 J� �� ʼ �� ���---'��- - ��� ,�5--,�5 ���- --� -� '��#A ���5(NANI������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������� ������ ����&��������������������������x��RR��������������������ME������������� ����������������������������������������������������������������������������������������������������������������������������(@��T0��6 ����<�������HT��������h�J0��h�V�������Z`H���������������^�����@��������ʘ�0B��������������ʀ�X�� ��@��������ʀ�4�� �� @��������ꀈ�D���� @����������b�L��� @�������������%������Ϣ���˵��%ꀠ�V�� �� @�����������Z�� �� @���������d \�� �� @���������fHB���������������hX�����@��������‒p�����@��������ʀ��d�� ��@����������x����@���������j�z����@��������ʘ��B���������������lH~�� �� @���������HhB��!�������������p����B��#������������%��������B���X�B���������������XHpH���������������\p�H��������������ʀ���� ��@�����������$�� ��@����������`8H��h @��������ꀚ�P���� @���������*�T���� @����������X�� �� @��������ꀜ^�� ��@���������0B��������������ꀊ�`�� ��@���������Z�t����@��������ꀢ�|�� ��@���������: B���������������npB��"��������������H �80�p��X�p������������������H��������p����������������H��������������� �����������������������������0X���R��������������������������$���������������������p�������������������������������������������������88���[*\R1*#253$*\Rffff*0>5c7c058e(*\Rffff*0>5c7c058e\0�4��4� ������ ����� �� �0�8� ����� @� �����`� Dp��� 8��� �0� P�0p�D����0�8�4P�.�� �����.����.�(8�(`�>��"��$��$�@�>`�R��^��FX����� �����`��*0�$`� ���� ���� �����������������^�������� ��^�0p��@�����һ���ṹ����������ҳ]$��H����=Public Const sheetNameValueTJ As String = "����2������ʵͳ��"]$�������Ϣ���2Public Const IntroSheetName As String = "���˵��"]$�������H]$�˵���] �p� ��¼�ܵ�У����]$������¼��ͷ������] �0�"ִ�� ����һ���ǿ�У�� �ĵ�Ԫ����Ŀ] ���6ִ�� ����һ���ǿ�У�� �ĵ�Ԫ��������Ϊ�����Ϲ������Ŀ] �X�ÿһ�кϼ��е�ֵ] ���"����һ���ǿ�У��ʱ����¼����Ԫ��] ��������Ϣ] ���%---������ģ���У���¼���ĸ���Ԫ������] �8�---����ģ���У���¼����ĵ�Ԫ��] ��� ����У��ʱ���洢�����������ַ���] �����¼ʱ�رհ�ť] ��� ��¼�ܵ�У�����Ƿ��в����Ϲ����] ��� ��¼�ܵ�У�����Ƿ����ظ���] ���#��¼�ܵ�У�����Ƿ����ظ���] ���%/��¼������Ч��ǰ����������Ƿ��д�����Ϣ ��״̬] � �#����У�鷽���ķ���ֵ]$���)������¼��ʼ���к�]$��H�)ѧ��ѧ���ſ�ʼλ��]�D0���¼Ϊ�յ���Ŀ]�X�"/�������Ƿ�Ϊ��Ч���� ͳ�� 5�������ֶ�Ϊ�յĸ���] �p�"C��¼ȥ���ո������ִ�н�������ȥ���˿ո��򷵻�true�����򷵻�false] ���Pcell����ԭʼ�ĵ����ݣ���ϵͳû�н����Զ��������û�����Ĵ�������֮ǰ��cell������] ���7�ϴ�д������Ϣʱ�����ڵ���,Ӧ����Ŀ��ʼ��ʱ��ʼ��ֵһ��] ���������] ���������] ���R�ڸ��ݱ�ʶ���ò�ͬ�ķ���ʱ���ж��Ƿ���forѭ�� Cell_SelectionChange����Ҫ�õ��ñ���]$������¼ʡ���صȼ�¼���ڵ���]$����+�����sheet���±���Ƿ����] � ]$�h�H�)�����е�������]$���) �Ա�������]$��p�+�������������������������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�babyID"�J8= 3 'ѧɀ�ѧ�����λ�� Di�m isay�)i� Ϊ��%n��%Ar�����Ђ>Π���Ч� !� 5��������ֶ�c ����&removeSp�aceFla�l:�ȥ���ո������y�`ǀ������a$�ˡ��*tr@ue����f�alse�3e��@�a�c������2��)��!�t��`�û�н����Զ��������û����ao�?֮C�sc� ur �@*�)Long '�ϴx�д�F�!��8,Ӧ����Ŀ��ʼ��ʱ��ֵһ��F rna� �A'����,��c���1^�isFO).�ڸ��ݱ�ʶ����ò�ͬ0)C�A� �жϑ;��forѭ�� C�_Sele BFCh�M����Ҫ�õ������W^�,headIb��'�+ʡ����صȱ�& S�qsV9= 2 '��q���±��� ���"��not�ti�nueQ$AqJ�1��Plu"S�6104 '�����!�c�����rge � r�6��Ա� � ��s� birt�hday= ��������������������������������������������������������������������������������������������������rU����~| UY� � �  ��� i 9Y������ �!@ A)�Q� ��9Yy�� � )Y�Qi� � � A`@��Y�yq��� Q ���!�1Y���� !Y q� ��� �,)����$ ��� 0l���i����������(��]�@�+'t�'��'���:��N���� 6������t�;:��%p�(��%��$ ��� dp���)��p�;:��%p�(��%��$ ��� dp��� )��p�;:��%p�(��%��$ ��� dp��� )��p�;:��%p�(��%��$ ��� dp��� )��p�;p�:�� %��$ ��� dp�W�� ���� )��p�5�� �{ �z"�� ��$ �� ��� (����`� (����P�;p�:�� %��$ ��� dp�W�� ���� )��p�5��]��������%:��%p�(��%��$ ��� dp������>���A��Uz)��p�6������U��������%��'��%:��%$ ����������p�p�a����"�z)��p�6����1:��Nt�t�(��(��(��0� 6 ������t�0� (���� �u����L:��%p�(��%��$ ��� dp������A������q �)��p�5��:�� %l ��C!(�� %l ��C" �q �C:��%p�(��%��$ ��� dp�����������q��)��p���������%l���C#:��$%l���C% �q��W� �� &'��'0�:��'Nt�t��:��(�����:��)���^��6 ������t�0���T�;:��%p�(��%��$ ��� dp���)��p�=(����%p�(��%��$ ��� dp�W��*�C+)��p�5�� u��P+'t�'��'���:��,N���� 6������t��z;:��%p�(��%��$ ��� dp���)��p��zRp�(��%��$ ��� dp�W��!:��-���`������ ./��)��p�6������ u��<(�� ��uD���h��< (����/ (����0 (����1 2��3 :��2��4 (������uz5�z6(����uD���ht��M(��%���� @p�(��%��$ ��� dp����� �A��7��h�)��p�5���z8h�:��2]�@p3������:��9N����h������� :����X�/��5��3������:��;N����h������� :����d�/��5��X��5I������ ,X��5I�L���i��T�X��5I����i���h4�� IT��� @X�������������:��;N������������ :����H�/��6����(��%H�������(� ��(��3� H(��%H�������������:��<N������������ :����8�/��6����&8��5I�L�i��$�8��5I����i���h�� <$��� @8������q��������(��l���� =-�6������E���� @���� @p�(��%��$ ��� dp����� ����)��p����� >������ ���� D(��%���� @p�(��%��$ ��� dp����� ����)��p�K:��?������:��@��������:��A��t�����0�:��B����`��36 ������t�0�����z[������%���� @���� @p�(��%��$ ��� dp����� �=��C�CD)��p�6����3�� .5�� $��~� T��~4�< u8��� H(��%X�������������:��<N������������ :����8�/��6����&8��5I�L�i��$�8��5I����i���h��� <$��� @8������q��������(��l���� =-�6������E���� @���� @p�(��%��$ ��� dp����� ����)��p����� >������ ���� D(��%���� @p�(��%��$ ��� dp����� ����)��p�K:��?������:��@��������:��A��t�����0�:��B����`��36 ������t�0�����z[������%���� @���� @p�(��%��$ ��� dp����� �=��C�CD)��p�6����3�� .5�� $��~��H nd��5I�����Q(��%d�������(� ��(��3LH(��%d�������������:��<N������������ :����8�/��6����&8��5I�L�i��$�8��5I����i���h��L<$��� @8������q��������(��l���� =-�6������E���� @���� @p�(��%��$ ��� dp����� ����)��p����� >������ ���?D(��%���� @p�(��%��$ ��� dp����� ����)��p�K:��?������:��@��������:��A��t�����0�:��B����`��36 ������t�0�����z[������%���� @���� @p�(��%��$ ��� dp����� �=��C�CD)��p�6����3�� .5�� $��~��� nH(��%X�������������:��<N������������ :����8�/��6����&8��5I�L�i��$�8��5I����i���hp�n<$��� @8������q��������(��l���� =-�6������E���� @���� @p�(��%��$ ��� dp����� ����)��p����� >������ ���aD(��%���� @p�(��%��$ ��� dp����� ����)��p�K:��?������:��@��������:��A��t�����0�:��B����`��36 ������t�0�����z[������%���� @���� @p�(��%��$ ��� dp����� �=��C�CD)��p�6����3�� .5�� $��~p��M�f��%���� @���� @p�(��%��$ ��� dp����� �CE)��p�5�� ���~t�1"0(��]�<��0/�/���'���O7:��?������:��F���4���:��G��t�`��36������t���z3�� .5����(����������a`�1������`���(��]�t/��U ��"�� �(�������� �&v �i��������P�v ���i���h0�Mv �i��������%p�:�� %��$ ��� dp�����H����I)��p�5�� P��~0��v �i���������"{ u5z ���~���(�� � �(�������h�� ��"��pz� �(��]�3�z�M��@(���� J 6�����,kz�D�� �����������(��t� J 6����t�  ��~�Z �(��]�t7'0�'t�'���:��K �����:��L��� 6 ������t�0�u�+'t�'��'���:��MN���� 6������t�=(��%p�(��%��$ ��� dp�W��*�C+)��p�5��1p�:�� %��$ ��� dp���N)��p�N�zO(���� P6���� uO��+'t�'��'���:��QN���� 6������t�=(����%p�(��%��$ ��� dp�W��*�C+)��p�5��1:��RNt�t�(��(��(��0� 6 ������t�0�,M��@(��(��(��t� S6������t�L+'t�'��'���:��TN���� 6������t�=(��%p�(��%��$ ��� dp�W��*�C+)��p�5��1p�:�� %��$ ��� dp���N)��p�;:��%p�(��%��$ ��� dp���)��p�;:��%p�(��%��$ ��� dp���)��p�;:��%p�(��%��$ ��� dp���)��p�|���*���������t�D�4�������������p�@�0�������P�����T�X�$�P�d� �����`�h���`�H�8�(� ����4 �����p�������t�0���0 ��   f�����������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������K*� ����  rU����~~~~~~~~~"~~~~~~~~~~~ �3F��zA�G�!xr` '_ � ���� ��a  ����� �����a  ��������a  ������)� ����� ����Q"��A�a �����`������� )Y���Iy�� 1Yy���a�a  ������������� �������������1Qq����� 1 Q i � � � � !!!A!a!�!�!�!�!!"����a ����������a�������������������a ������������������� � �� VBAProject ThisWorkbookSheet1Sheet6��ӡԤ�����ߺ�������У�麯��������ShowFormSheet5 PrintForm��F:C:\Program Files (x86)\COMMON~1\MICROS~1\VBA\VBA7\VBE7.DLLVBA )���� Q�0�F:C:\Program Files (x86)\Microsoft Office\Office14\EXCEL.EXEExcel 9����a�@0�FC:\Windows\SysWOW64\stdole2.tlbstdole a������PL��-�[���D�REC:\Program Files (x86)\Common Files\Microsoft Shared\OFFICE14\MSO.DLLOffice A����i`�.E ���.`�M �C:\WINDOWS\SysWOW64\FM20.DLLMSForms qq��p�I>��v�C�z��d�� 0C:\Users\keze\AppData\Local\Temp\VBE\MSForms.exd Range Qqy����������У����򲢴�ӡ������Ϣ checkTheSame ��F+b{�n$xL��@s�sl~�FE_ �4� G��2G��D�FWorkbookWorkbook_BeforeSave @ .�`/f&Tnx��\���OX[�excel ��Y�OX[ ����p�Q nx�[ , &�|�~\��ۏL��h�g!h�� ��Y N�OX[ ����p�Q �S�m ? ���Oo` �Nxh� �f , 00� $4DHLPdVBE7.DLL q ����` � q ����S �F��Fq � ������F 0�]\Oh�pe�v Ncknx ��� N}�g�e!jgT ��QۏL�dk!h�� 1qazPasswordProtectUnprotect CellsClearContents��F A65530Endrow IV5��F�;!��M�9@�(c� �F�;��nE��"�͆�fD�F WorksheetF�F FAILUREcheckedRequiredStartwriteLoggetCellValueCountXQ writeLogRedaddCommentXQStartclearCommentsXQStartbeginCheck_commentcallFunctionXQStart regCheckFuncsetCellValueCountXQcheckTheSameXQNewGetRowOrColIndexcheckDMB deleteRowcheckXJHdeleteRowNoProsetCellValueXQ setDMBCode removeSpaceXQremoveSpecialCharacter A9:IV65536Font �[SONameSize &HorizontalAlignment @ "NumberFormatLocal 4�`nx�[_�Y�h�gT� �h�gǏ z-N ����RsQ�excel � &TR�S���[�penc"N1Yb�h�g1Y%� )n���c:yTabColorIndex "�l g�g~b0Rf[u�Oo` ��e�lۏL�!h��� -N���Oo`�Y N�  value - : ; ,{ L� R�vpency�� VX[(Wyr�kW[&{��Y^ , ; ' <> " ? zzL��eHepenc�f[u�Y T0���N���N�SR!h����1Y%�sS9eL�:N�eHepenc � checkMonth * g���Oo` ����g w ���Oo` h� �ۏL��Ock Select !h���Ǐ! SUCCESS * g͑ Ypenc ����g w ���Oo` h� �ۏL��Ockq x q ����� �.�y.�E$L�(Q{�Q���9��S�H���Ʈ����C�` F�7���������G�NX:�5� checkRequired checkStuName checkBirthdaycheckBirthdayNecessary IsIDNumber checkSFZJLX checkSchCode checkFamType checkRXDate checkYear checkPhoneNum checkBankcheckXn checkOptioncompare compareDeccheckLencheckIntcheckValcheckNum checkIsInt checkIsNumber checkMoney checkMoneyTJcheckPersonNumcheckIdNumLinkcheckNowNecessary Browse_Print1���������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������a�� �*\G{000204EF-0000-0000-C000-000000000046}#4.1#9#C:\Program Files (x86)\COMMON~1\MICROS~1\VBA\VBA7\VBE7.DLL#Visual Basic For Applications*\G{00020813-0000-0000-C000-000000000046}#1.7#0#C:\Program Files (x86)\Microsoft Office\Office14\EXCEL.EXE#Microsoft Excel 14.0 Object Library�*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\SysWOW64\stdole2.tlb#OLE Automation4*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.5#0#C:\Program Files (x86)\Common Files\Microsoft Shared\OFFICE14\MSO.DLL#Microsoft Office 15.0 Object Library�*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\SysWOW64\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{8E3E498C-7693-4397-A67A-C7D864B10FEC}#2.0#0#C:\Users\keze\AppData\Local\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Library�.E ���.`�M �  ���������[���������������� �������������������������������� ThisWorkbook0=5c7c058e��!ThisWorkbook��zLx��������� �� Sheet10?5c7c0590��7 Sheet1���H� Sheet60B5c7c0590��9 Sheet6���0���SbpS��ȉ0D5c7c0597��:SbpS��ȉ���H����]wQ�Qpe0@5c7c0590��D�]wQ�Qpe����`����Xf0>5c7c058e��R�Xf���&x���!h���Qpe0C5c7c0591��r!h���Qpe��~���Y��;N z�^0<5c7c0566���;N z�^��Ux��������`�����/9��ShowForm095c7c0565��ShowForm��n�1�� Sheet50A5c7c0590��# Sheet5��h���PrintForm0;5c7c0565��%PrintForm��ʘ���������������������������������������������������������������������������������������������x�����������������������������0������������������������������������������������������������������������������������������������������`��������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������H�������������������������������������������������������������������������~��R'K��|L�oI������-=�Y8�A���F2~.�������2�)e@�\a��"��� (^adI���a������x[�o:�G�@PG$������ο��=��A�Wm�T(������}���F��-�D�����!C��ÊD�!.U������c����b?M�`g�+������2��j�M��k �3�������_�~G�� ��2������������&$R!�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�` 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�)`�(checkNumh�`�(checkValK�`�(checkInt��`resZjlx0�` �(IsIDNumber-*` �(checkSFZJLX�*`�(checkDMB��` �(setDMBCode�d` �(checkBankUw` �(checkYear�6`�(checkXn��` �(checkMonth��` �(checkBirthday��`�(checkNowNecessary��` �(checkPhoneNum��` �(checkOption,�` �(hasErrorIdNum��`�(atLeaOneNNullCount�` �(checkMoneyi�` �(totalMoney%�`baojiaoMoneyColumns`baojiaoMoneySumk�`huoshiMoneyColumn_�`huoshiMoneySumr`zhusuMoneyColumn_` zhusuMoneySum>-`othersMoneyColumnߥ`othersMoneySumH�`�(atLeaOneNullCount�` �(atLeaError�~` �(regCheckFuncE�`reg�`regEX*�` CreateObject��`Patterni�` IgnoreCase0�`Test4�`�(setCellValueCountXQ�]` Unprotect?`Password��`�(checkTheSameXQNew�` sheetIndex2n`�(rnaO�`Range� `xlUp��`row��` ClearContents{�`i``babyID1��` �(babyIDColumn�`ja`babyID2��` �(hasTheSame�`�(GetRowOrColIndex�f`keyWord�F`kbn1�`cZ`Findn�`What�C`LookIn�P`xlValueso�`LookAt�O`xlWhole��`Column�i`value1�`flag��`Trim@�`rowData�1`Count0v`rowNummR`�(AreasheetIndex�H` �(deleteRow�`Rows�U`Delete�x`�(deleteRowNoPro`�(setCellValueXQ��` codeValue�` �(columnPlus��`length1S`length2T`Replacef`�(removeSpecialCharacter�` �����i`�(!ValueColumType��` columnNamew�`�(sheetIndexValue1` �(AreaSheetName�`�(readmeSheetName��` �(totalCount�-`�(rgold�`�(Target�F`�(hasErrorInValidateU�` �(dataRowStart��` isNullRowNum�8`�(cna`�(notContinueBoolt` �(genderColumn�~`�(birthdayColumn0` У�麯��&�`�(checkBirthdayNecessary��`IDNumber4 `Wm`sj`Tk` IsNumeric$*`Right ` �(checkSchCode��` �(checkFamType��` �(checkRXDate�*`�(checkXJHF�`years��`value2�` �(compareDecN�` 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`st(_`timeNowy` timePrint��`Now%�` ������` rowDataNumn�` typeValue��`bsTypet�` valEntity܏`val��`typeRow�` isNullRowArr/�` sheetCountB�`Protect�f` Application�*`ScreenUpdating! `sysDifficultyGradeNameFlag��`indentifyDateFlag� `xlToLeftWY`Size��`HorizontalAlignmentS@`xlLeft�9`NumberFormatLocal)�`rowType�`md`ne` removeSpecial�j`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��` ��BeforeSave��` _B_var_Chr\;`��_Defaultj�`!����_B_var_sysDifficultyGradeNameFlag_�`����_B_var_indentifyDateFlagE`����_B_var_isNullRowNum;r`����_B_var_i �`����_B_var_isValidateCount"`����_B_var_j �`����_B_var_rowType��`����_B_var_m �`����_B_var_n�` ����_B_var_value�`����_B_var_removeSpecial&>`����_B_var_titleMsg�`����_B_var_totalMoneySum�Y`����_B_var_p�`����_B_var_q�`���!s�������������������������������������������������79 ; ������������SE# % �������� ������������������������������������������������"�@�� p0(P7��q� YX�� �HH � �������������������������������������������������������������������������������������������������������������������������������� �(����I)9��U�������������������������x��ME������������������������������������������������������������������������������������������������������������������������������������������������6 ���������L����L��������� ����L���������"����L��������� �������������������������� 4 `���������k�������������P������z�����;c@������h��� ���X@������X��� ��x@������H��� ��@������8��� ��@��@(��� �� ������������@���������� �� �����`������������ ������������`��������� ��`��������� ��`��������� ��`��������� ���������� �����������������������%8������8������p �����X���8  �������������������������������P������������x����������������� h����>,XVZ��@������� �� @������������ @������ �� @��0���� �� @��H���� �� @��`���� �� @��x���� �� @������� �� @������� �� @�� t��� �� @������p��� �� @��`��� ��@�P��� ��@������@��� �� ���6jD*2�@��0��� �� @h� ��� ��@������ �� �P!@��� �����`�x!@��P���� �� ��&@������������`h�&.0�R����@���������� �� @������������ @ �������� ��@��x���� �� �P:@������ �� x:��d����P<@������ ��@�������� ��@������ �� (�C@��ht�� �� �C@�����d��� ��@�pT��� ��@���D��� �� �hK@���4�� �� ��K@�����$��� ��@������ �� �Q@����� �� ��Q@����������� @bP���� ��@��������� ��@�P���� ����_��a@������� �� ��e@����� �� ��e�s@��(���� �� @z@��`��� �� P(zx(�@������� �� �`�@�� p�� �� ������ �@�����`��� ��@�8P��� ��@��( @��� �� @ �@��� 0�� �� P ( �` ( �� x�@�h ��� ��@��� ��� �� � � �@�������� �� � � ������ ����������������������������� �������������������������������������������������������������[$*\Rffff*0<5c7c0566*\R1*#385*\R1*#125*\R1*#119*\R0*#17$*\Rffff*0>5c7c058e*\R1*#114*\R1*#42$*\Rffff*0?5c7c0590*\R1*#121*\R1*#253$*\Rffff*0@5c7c0590*\R0*#2*\R1*#11*\R0*#f*\R0*#1����� h"�h�p�:x�.��6��" �"H�.p��� )�� �� :+�� ;�8�@�;H�;h�;��>;��" ��:� "P�, `�$ ��>;��,]�� (� ~@�$U��P1�� 8�X�x�>L�� ���� �� �����8C��0�"8� `� �Wh� ��;��� � �.=(�  X�,+p���;���� ��*��*R� 8�P�%0 h�%D ��% ��% ��%0 ��% �%,@ �%&p � � �#6M� �$J� �$"8 �(,3` �(P3� �(`� � (�����,L,@ �4JI� �<(� � <�����?  �D6H �D0&P �HB<� �HE� � "� �G �H �M4D( �N�K` �N&� �N8[�N H� ,X�I�� �����D ��@��, �� ,�����0 ��48H��40&��8 <(�8EH� "h�G��H ��M4D��N�K��N&h�N8[��N �� ,��I� �����4 �0�)" �<(H� <�����<0 p�H6H��H0&��PB<�PEP� "p�G��H ��M4D��N�K��N&p�N8[��N �� ,��I� �����H �< �("(�,8HP�,0&��0 <��0E�� "��G �H 0�M4D8�N�Kp�N&��N8[ �N X� ,h�I�� �����, ��(��$��$M�� �� <�� "(�(L7@�(&��( ��(�� ��)$�� � >�,P�,`� (p�,&��40M��, ��,��,� � �(�(0�X� h�*x���+$,���� �� ��d7��X� `�4+h�=��1������ ��4 �� $ �+H�=`�P1x�,����4+��= �18�H� P� ;X� ;x� ;���� x�"� 8�@�P�2`�$��@��6� 8�*H� :x������� ����� �� ���������,�@�H�P� ��������`�a--------------------------------------------�����ʼУ��-----------------------------------------�]�@]�X�+ijһ���͵ı�ʶ�������кź����͸�ʽ��3:1;2��]�p� ��ʶ����(Ĭ�ϱ�ʶ�����Զ����ʶ)]���(ijһ���͵ı�ʶ���飨�����кź����͸�ʽ��]��� ijһ���ͱ�ʶ�ľ���ֵ]����Զ����ʶ����������]������%�Ѽ�¼Ϊ�յ��кŷŽ�������]� >!6'��"��ȡ��������Ŀ ����0��������Ŀ����ȷ������������ģ����ٽ��д�У��A@,�1qaz���$>B@�|���k����1qaz���$>B@��1qaz���$>B@��1qaz���$>B@� X$V!PB@ �-$ÿ�ο�ʼ���ʱ���Ѵ�����Ϣsheet���,�'Z�������Ϣ��¼��ʼ�����'��.�ô�У���У���¼�Ƿ��д�����֣��׶���Ϣ���У�� �(��'��#Ĭ���϶����Ѽ�������δͨ��У���'��Ĭ���϶�����δͨ��У�� X$V!PB@ �-$ÿ�ο�ʼ���ʱ���Ѵ�����Ϣsheet���, �A65530�$>%%�!'� ��ȡ���������xcna = Worksheets(1).Range("1:1").Find(What:="*", After:=[a1], SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Column ��IV5 6%%�!,'j����FAILUREA@D�&+��ȡ�Ƿ�У��ɹ���־��Ԫ�񣬲���ֵ��ʼ��Ϊ0�'h��ռ�¼����ʼ��Ϊ0 * 2��" ����ʱִ��d� ��ʼУ�鰴ť�¼�ʱִ��� A9:IV65536�$>%!j��1���������������ͺ������9� 9�q��� A9:IV65536�$>%��,��������������� �9��@9��"�����������ı���ʽq����.��ȷ����ʼ����� �������У�����ر�excel��� $.�������ܵ������ݶ�ʧ����ʧ�� 0���ܰ��ʾ$, 2�d���1qaz���$>B@�|���k���k����.�$>!b(l�)��ҳǩ����Ϊ��ɫ  �� ��"û�в��ҵ�ѧ����Ϣ���޷�����У�飡A@,�'*�1qaz���$>B@�|��0k��(�'���ô�У���У���¼�Ƿ��д��������$>!��д�����Ϣ���£�A@R  �� �� � �� ��'��<"ִ�� ����һ���ǿ�У�� �ĵ�Ԫ����Ŀ�'��;6ִ�� ����һ���ǿ�У�� �ĵ�Ԫ��������Ϊ�����Ϲ������Ŀ�'��'��'��5"����һ���ǿ�У��ʱ����¼����Ԫ��'��9�Ƿ�Ϊ��Ч��¼ �'d�C��¼��У�����ǰ���Ƿ����д����'��;��¼�Ա����������Ƿ��д�� �� j�� �$>%P!b'��O��һ���б�ʶ��ֵ�'��2=�ж�forѭ�����Ƿ����callFunctionXQStart ��û����ִ��Ĭ�Ϸ��� ����<�����ʶ����Ϊ�� ��-$�'��G��ʽ��1��4-3:2��5 ��:$�'��H6��ʽ��3:2��5����ȡ���ı�ʶ�����в�֣���ֳ��кź͹��� �����DJ�����Ҫ���ּ������ϵ������ҪУ�飨��Ĭ��У�����͵������Զ���У������ �� ��� ����Y&+1����Ϊ�����е�һ��Ԫ��ΪĬ��У����� �$��:$�'��V*����ȡ���ı�ʶ�����в�֣���ֳ��кź͹����$�'��S�Զ����ʶ����������  ���$��;$�'��c�Զ����ʶ���͵ľ���ֵ� �� �� ����g�Ա�ʶ�����б��� �$��   �A@��}���ݱ�ʶ��ֵ�����ö�Ӧ�ķ���  �$>%P'b�H����������ȥ�������ַ��ķ��� b$P'� �� � �$>%P'��{��ȡ���б�ͷ��������� ��� � �е������ ��F���������ַ�����^ , ; ' <> " ? �ո� �س��������뷨Ϊȫ�����ͣ����飡'��'��^����У��ʱ������д�����Ϣ���  �$>%P!t(v� ��ӻ�ɫ���� �A@R�N%isValidateCount = isValidateCount + 1k��p��hk��`� ��� ����$��;$�'��P����ȡ���ı�ʶ�����в��� �� �� ����W�Ա�ʶ�����б��� �$��   �A@�  �$>%P'b�H����������ȥ�������ַ��ķ��� b$P'� �� � �$>%P'��{��ȡ���б�ͷ��������� ��� � �е������ ��F���������ַ�����^ , ; ' <> " ? �ո� �س��������뷨Ϊȫ�����ͣ����飡'��'��^����У��ʱ������д�����Ϣ���  �$>%P!t(v� ��ӻ�ɫ���� �A@R�N%isValidateCount = isValidateCount + 1k������k��� ���e�J ��ʽ��3:2��5�$�'��Q�Զ����ʶ����������  ���P�����ʶ���е��������ڵ�ǰ�����$��;$�'��e�Զ����ʶ���͵ľ���ֵ� �� �� ����k�Ա�ʶ�����б��� �$��   �A@������ݱ�ʶ��ֵ�����ö�Ӧ�ķ���  �$>%P'b�H����������ȥ�������ַ��ķ��� b$P'� �� � �$>%P'��{��ȡ���б�ͷ��������� ��� � �е������ ��F���������ַ�����^ , ; ' <> " ? �ո� �س��������뷨Ϊȫ�����ͣ����飡'��'��^����У��ʱ������д�����Ϣ���  �$>%P!t(v� ��ӻ�ɫ���� �A@R�N%isValidateCount = isValidateCount + 1k��� ��� k��� d�-ֻ��Ĭ��У������ʽ��1��4�$��;$�'��H����ȡ���ı�ʶ�����в��� �� �� ����O�Ա�ʶ�����б��� �$��   �A@�  �$>%P'b�H����������ȥ�������ַ��ķ��� b$P'� �� � �$>%P'��{��ȡ���б�ͷ��������� ��� � �е������ ��F���������ַ�����^ , ; ' <> " ? �ո� �س��������뷨Ϊȫ�����ͣ����飡'��'��^����У��ʱ������д�����Ϣ���  �$>%P!t(v� ��ӻ�ɫ���� �A@R�N%isValidateCount = isValidateCount + 1k��` ��X k��P k��H �  �$>%P(�� ��� 6ִ�� ����һ���ǿ�У�� �ĵ�Ԫ��������Ϊ�����Ϲ������Ŀ �� � ����� � �е������ ����������һ������д��ȷ������'��'��8����У��ʱ������д�����Ϣ �A@R �� '�d��  � � '��Tÿһ�кϼ��е�ֵk��� �� ��<,һ�����������ؼ��ֶ�ȫ�������򽫸���ɾ��  h+� h� 'h�,"��������Ϣ���еĸ��д�����Ϣɾ����� �� Z � Z� � Z � X$V%>B@@�r �Ѹ���ɾ��� ��� Z � 'Z d'�k���� ��k���� ��� h� ��6 ɾ����Ч�� �$�'� ���� �A@<�B �Ѹ���ɾ��d��`� � � A@<�H �Ѹ���ɾ��k��0� ��� h� ���˴�У����ɾ���� h�>����Ч���ݣ�ѧ�����������֤������У�鶼ʧ�ܼ�����Ϊ��Ч���ݣ�A@,k��� ���*�д�����Ϣ����鿴��������Ϣ������������A@,��$>!b(l X$VB@Hd��0�'�A@� ��'%ִ��У���ظ����ݷ���,���û���ظ�������������Ƿ�����Ҫɾ������Ч����� У��ͨ��!A@,�.�$>!b(l����SUCCESSA@D�:+��ȡ�Ƿ�У��ɹ���־��Ԫ�񣬲���ֵ��ʼ��Ϊ0��� A@�d���*���ظ����ݣ���鿴��������Ϣ������������A@,��$>!b(l X$VB@Hk���k����1qaz���$>B@��1qaz���$>B@��1qaz���$>B@�o��@�q-------------------------------------------------���ظ�����ijһ��------------------------------------------------� ]�`�x]���� �A65535 N%%�!'�2��������Scripting.Dictionary$�.�O8�O  N%!b'�>��ȡѧ����������������� � ��%"��ѧ���໤�����֤�������ݽ��б��� ��  % ��-������֤�Ų����� � B@�&#add��������һ��Ϊkey���ڶ���Ϊvaluek��@k��8��0 !'�Sheet2$>��G:G7B@   �!% !6�G17,q�����.o������������'�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).. ���h��/����DcW 1:1�F�(What ]*", After:=[a1], S`DchOrBdAxlBy�>s1�Dir e�2:=xlPrevio�us�Kolum�t�b$1.$IV5��ToLeftks�� T®XQ 2,A8, "FA�ILURE"��aG!7�ɹ�������Ԫ�������ֵ��ʼ��Ϊ0�� ƙ�� +�A��P� `x isSaveButton��vbOK� ฀���ʱִE�E�Z�^`Ӱ�ť�¼�)Wit�h 399:IV�96�0q� ����������������ͺ��A�.�Y�"����!�.Siz��11�c!��&3Ak����� @.Horiz a�lAlignm�e9xl�8��,berFormatL�ocalQ @"���ı�Asc> 2V�_^("��ȷ ���J��B ������D����ر�excel��" �& Chr(1pk& "������ܵ������ݶ�ʧ����ʧ��0/!Can�`&��܀���ʾ")` ��� � a � [�dۏdb �d3 �d#�KTabtlorI�Kx� -41�42zҳǩq$�Ϊ��ɫ� P�EstartTi�tle +�\�ut`3 "û�����ҵ�ѧ��qZ���޷�au�8��_rQ�4�$9�8�_x_x��`9Qh�h��h�h�Q1write�Log\=�9�&��l�����£�?��F�> �I��3��5 i��2 |To�c� �9e`aOneN��S�= �Q�M ����һ���ǿ�� ��VיO����\������Ϊ�������!���?�totalMoxney��&e�Q�P. "�?� ��"0iA�!fэ���is�oi ��eH�nΪp̧1ϟ�5/InIE '�����!P�ǰ��Q���C0??9d�u����Ա����������}�-�j� 1�,�� ��=�9�(1, j).ұܵ�������#���_Iis� = $�ж�forѭ����� ��ӂ��nlFunc᪈XQSV ���S���5��י�Z1w <> p&QZ '���� ���>�a�/��= �S`�t(��o-o'��1��4-3�:2��5��p�����t(typeValue, ":") '��ʽ��3:2��5����ȡ���ı�ʶ�����в�֣����к��͹���  $If UBo�und(bsT�) <> 0 Then '�����Ҫ���ּ�����ɀϵ����У�飨��0Ĭ�� x���������Ԑ������'���pFor m = L�a+ 1 To�l'+1����Ϊ�����е�һ���Ԫ��Ϊ�a�@��valEntity�FSplit��(m)���߅�1�Row"%(0��e�������������3;E{�@��i�)E,���'�@>�bGA1�b;���B�ľ�������n@��F)H��'����8�����callFunctionXQStar$t `(n`1,� i, j�s��@idateC�t�����#ֵ�����ö�Ӏ��ķ���'e��ue #Worksheets(1).Cellts()_ _ #'@������!���������8ַ�? (removeSpecial�Cha�racter(���_$�f+g ,A`�leMsg�5s�KTitl@�j��AӸ��б�̀�������9�)error"��" & iQ`"��AjA�е�������F& "0���څ@��^ , ; '��"" ? �ո� �س��������뷨Ϊȫ��a������飡"���)hasE �,Tr�1'���!�sʱ��x��������Ϣ��_8T8.InP+ior.Colv= 65535 '�����ɫ������wri�teLog uO�'iLO=� p�_End If /�Next��5 _�� m��� ��s�s= Fa�lse2�oo�V��4Z�0�_�S����~�~�~ � �}�}M- ��Rk�B�z�z�z�;s=� ��z��z���o��zʕ��zȡ�z���z�z�z��z��z��z�z�z� �z�z�z � Worksheets(1).Cells(i, j).Interior.Color = 65535 '�����ɫ���� �.8writeLog err orMsgM`'isValidat�eCountk�+ 1�:End If 3)Next��9&�Else If UB�Dd(rowType) <> 0 Then '��ʽ��3:2��5��2#t�Row^�(0) '�������ʶ������������{@Ci�(+!A����(���е��������ڵ�ǰG�;�jval�S0plitc�, ";"�J�ľ߰��ֵ%F�}n�L�A�) TFo�C�'��� ����б����� callFunctionXQStart `(n), 1, A���y'����$4������ö�Ӧ�ķx����+�u>e %v�__#'� �����!ȥ����������? (removeSpeciBP�Charac�`�(�)�#�m+�m� � (tit�le��5sLTaa� '��ȡ���б�ͷ���������)%�"��" &D i`"��AjA���������F& "���څ@����^ , ; 'A�"" ? ���� �س��������뷀�Ϊȫ���U���������"_ _ 0hasE�{P Tr�1'����У@��ʱ���S�д���������o_8������������_�� ���������ߍ������� 'ֻ������q)�����Í1��4?)��pPp.szbs1���ez���1D���ħr���//�x��x�x�v�v�%� ?bc�:�:/�/ �r�r�Kk= ��r���r �����r��r�r�?�r�r����rsg�t�r�r�r�r�_� �r�r�r�F� Worksheets(1).Cells(i, j).Interior.Color = 65535 '�����ɫ���� �5*writeLog err orMsgM`'isValidat�eCountk�+ 1�:End If +)Nex>t��1��� ׆LockedOFalLse_*�3 j� 'ִ�� ����һ���ǿ�У�� ����Ԫ��������Ϊ�����Ϲ���@����ĿIf atLeaO@neNull�~<`> 0 Ah�=Ç � Then�Ea��@I"��" &D i�"���,�`���E���A��?�Ё?����д��ȷ����숲�"ghas= True '����)ʱ������д������Ϣ� E�s%��n+ 5 ?E�MItotalMoneySu&m1�+ � 'ÿһ�к�ȼ��@4ֵ�i�c�O�> 1 �I$ '���!2�����ؼ�����ȫ������������ɾ��_�isAWRowArr(�Num�) !i r ��E ���) `'��eO<��-�%���+�i F��p�cu#a�  - -.To^ �� fSC�msg"Name).s(x).Delet�p�Ѹ��_9/�p�")�=*�O�hE�|Inu��3 ~ ��)�?;� q9� 0 i/@!1 '�%��Ч��� � rowDa�ta,/�4q)���@?T_c��d�"A,�1,)'�#oR�Os- q ~ �����q��U�RtK�!zw; ��Box "P�˴�An��R�f�Rw�J& x����ݣ�ѧ�����������֤��������ʧ��ܼ��:Ϊ��/x��� �2? 9 � Gy����������Q����`������Վ��k�Tab��Indexp16�ץ�M�MS�(cب�%���0SQ0o�# checkdXQpNew P���N�ot (0n ҡ�ظ�����,�sû���D��p,�������Ƿ������Ҫ�f������ͨ��!;�� ����-4142��set1�UueXQ 2,!8, "SUCCESS" '0��ȡ! ���@����־㱣�����ֵ��ʼ��Ϊ0�f �Ұ��FQG�na���,u�,,�?:,�?,,�;�Protect Password:=`"1qaz� 2�).��3� Sub '-'��!�d����ijһ��-, Sub checkTheSame() Dim myDic As �Object, Key Vari8antPH, �varData 'rna = ActiveSheet.Range("A65535").End(xlUp).row �'������b Set idNum�= Create�("Scripting.�tionar�y"b I@O8", "O" & R).value '����ѧ�����@�����ӀF�݃GFor Ea@ch carK �In�O4'�ԁ�໤���퀷�֤���� ���б���!�$ If�"<>� "" ��nNo�~.Exis(ts(<)� '����������GA.AddE, Null@ 'add�������һ��ΐ�key��?C��h,�INe�xƒ Cmy��j=�.�s�With Work�sA�s�p�2Gm�G:G@�ClearContent��4�1@Resize(B�.Count)A�ppl(ica��.FFun�on.Tra�nspos� �'D���4�'*���= �a2h@� �@� �����������������������������������������������������������������������q������������������������������x��ME�����������������������������������������������������������������������������������������������������������������������������������������������(6 ���������L����L����������� F�`������������ @ ���� �I�H�������� ��`�I�J�������� �������`�L���������� R�`������������ � �����i�T��������������� \�`������������ 8 �����I�^�������� ��X�I�H�������� ��x�I�`�������� ������� d�`������������ � ���� �i�T��������������� n�`������������ 8 ���� �I�^�������� ��X�I�H�������� ��x�I�J�������� ����I�p�������� ������� zX`������������ � ���� '�I�^�������� ���I�H�������� ��8�I�J�������� ������� �8`������������ � ����2�I�^�������� ����I���������� ����I�H�������� ����I�J�������� ���I���������� ������� �`������������ x ������G�I���������� ����I�^�������� ����I�H�������� ����I�J�������� ����I���������� ������� ��`������������ X ���� ��I���������� ��x�I�b�������� �������`���������� �� �p `������������ � ���� ��I�^�������� ���I�H�������� ��0�I�`�������� ��P�I�b�������� ������� �� `������������ � ���� ��I��������� �������+� `������������ ���� �I�^�������� ��0�I��������� ��P�i����������������`��������� �� �@ `������������ � ���� $�I�b�������� ����I�.�������� ����I�0�������� �������@�4�������� �� <� `������������ � ���� B�I�^�������� ����I�8�������� ������� B@ `������������ ����J�I�^�������� �� �I�8�������� ������� D `�������� �k� ����N�I�^������ ��� �I�H������ ��� �I�`������ ��� �I�b� �� ������� � `������������ @ ����S�I�b�������� ��` �I�^�������� ��� �I�H�������� ��� �I�`�������� �������@�4�������� ��@�F�������� ��@�L�������� �� �� `������������ H ����l�I�^�������� ��h �I�H�������� ��� �I�`�������� �������`�.����������`�J����������`�L���������� P����`������������ 0 ���� |�I�b�������� �������@���������� ������@� 8 � ��X����p����������@ �����������������������������D������ ��������������%��������� ����� ����� ����� ������������������������������������������������������������������������������������������������������ � � @D����l��� ��� � ������������>@��Hh��� �� @��0X��� �� @��`H��� �� @������D��� �� @��x4��� �� @���$��� �� @��������� �� @��������� �� ����8��������������������� ����������������������������� ����������������������������h ���[$*\Rffff*0@5c7c0590*\R1*#385*\R1*#125*\R1*#119����� ����� �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� ����2�� ��(�0� ����� f8� �� ������>��&8� `� Xp������� h�� `�*x� ������j��&P� x��������� `�� (�8�P� X� Hp�(x�� H0�(�x� H�(p`� H��(�� �� &�� �� ���������� n � ������ �� 8��(�� 8��(�� �� &�� �� ���������� b � �� �����������&x� �� �������� f�� P� p����� �� 8��(��� 8��(��� p� &x� �������� f�� H �(` � � � T� � &� � !�(!�0!� $H!� &p!�$|�!�$&"�$ @"�$P"� `"�h"� p"� �"�$t�"�$&#�$ (#� 8#� $�����@#�H#� �����P#�p#� ^x#� �#�"�#�$�@ $�&`$� �$��$� �$��$��$��$� b�$� X%�h%��%� t�%� &&� 0&� �����@&�H&�h&� bp&� �&� �&�'� '��('�&�'� �'� �'��'��'�(� ^ (� �(� �(��(��(�X�(�&0)� X)� �����h)�p)��)� ^�)� �)� *�(*�8*�X@*�&�*� �*� ������*��*��*� ^+� `+� �+��+��+�T�+�&,� 0,� @,�H,�P,�p,� nx,� �,� -� -�"0-��X-�&�-� .� .� .�(.�H.� jP.� �.� �.�/�"/��8/�&�/� 0� 0�(0�H0� nP0� �0� �0�1�"1��81�&�1� �1� �����2�2�(2� P02��2��2��2���2�&@3� h3� x3��3��3��3� R�3�4� 4�84�X@4�&�4� �4� �4��4��4�5� b5� p5�$�5��5�@�5�&�5� 6�06�$86�`6�h6��6�!�6� Z�6� �6� 7�07�@87�&x7� �7��7� �7��7��7�8� b8� p8� �8��8�@�8�&�8� 9� �����(9� 09�P9�X9�x9� ^�9� �9�&�9� ����� :�@(:�&h:� �:��:�&�:��:��:��:� |;� �;�$�;��;�(�;�@�;�&0<� X<� �����h<�"p<��<��<��<� |�<� H=� `=��=�@�=�&�=� �=�>� >�(>�0>�P>� |X>� �>�$�>�?�@ ?�&`?� �?��?�$�?��?��?��?� d�?� `@� x@�@�@�&�@� A�A�2A�PA� ����� xXA� �A�6�A�.(B�XB�hB�( pB�2�B�( �B�1�B�( �B�2�B�( �B�1�B��B��B�JC�`C�xC��C��C��C� f�CB�  D� D�<D�PD� pD��D�$�D�$�D��D�E� �EB�  �E��E� �E��E� ��E� \�F� ����B�  �F�,G� 0@G�@pG�"�G� ^�G� 68H�pH��H��H��H�0�H�DI�`I��I��I��I��I��I� ��I� "HJ� pJ� .�JB�  �J� �J�$�J�BK� HK� XK� hK� xK� �K� �K��K��K� ��K� @L� XL� pL� �LB�  �L�"�L� �L��L��L� M�M�M� M�88M�pM�2xM��M� �M� �M��M� N�N� N� N� F@N��N��N� �N� �N� *�N��N� ��N� �O� �OB�  �O��O�*�O� 4P�HP� �PP� �P� QB�  Q�*(Q�XQ� �`QB� �Q�<�Q� JR�8R� �@RB�  �R� �R� "S� 8S�8XS�2�S��S� �S�T� T�T�  T� (T�8T�"XT�0�T� �T�(�T��T�U�&U�0U� 8U�HU� �PUB�  �U��U�VV�`V� 8�V� �V� �V�:�V�4(W�$`W��W�"�W��W��W��W� ��WB�  hX�pX� �����6xX� ������X��X��X��X��X��X�����X��-----------------------------------------У��У����������д�����Ϣ��ʾ�� ��ע��-----------------------------------------------------------�� ��Ԫ������]�� H J N%P'L L���'Fd��(�'Fk��i����--------------------------------------------д��־ ��¼������Ϣ����ʾ��һ��������Ϣ����--------------------------------------------�� T Z� X$V,P Z� 'Zi��X��------------------------------------------------------ ��ȡָ����cellֵ-------------------------------------------------------------�� H ` ^$>%P!b'\i�����--------------------------------------------д��־ ��¼������Ϣ���ú�ɫ������ʾ��������Ϣ����--------------------------------------------�� T'f T Z� X$V,P�� f Z� X$V%P%h!j(l Z� 'Zi����i--------------------------------------------�����ע�������ʼУ�飩-------------------------------------�errorInfo��ע������� 1Worksheets(sheetIndex).Unprotect Password:="1qaz" p H J ^$>%PB@r��� H J ^$>%P!t(v�W ��ӻ�ɫ����� H J ^$>%P!x(@i����i--------------------------------------------ɾ����ע�������ʼУ�飩-------------------------------------���1Worksheets(sheetIndex).Unprotect Password:="1qaz" H J ^$>%PB@| H ~ J ��� H J ^$>%P!t(ld��� � H J ^$>%P!t(lk��pi��h�r---------------------------------------------�����ʼУ�� �Ƿ���ӻ�ɾ����ע���õķ���----------------------------�X ��� ���У��ʧ�� H J ^$>%P!x���d �ж���עΪ�� ^ H J �A@n�V �����ע����d�"����Ϊ�գ���ȥ����ǰ��ע��������� ^ H JA@z�N �����ע���� ^ H J �A@nk����1 MsgBox "��" & rowIndex & "�������" & errorMsgd� :���У��ɹ����ж��Ƿ�����ע���������У��ʧ��ʱ����עȥ�� ^ H JA@z ���,#�������ȥ���ո���,����������ʾ��� H��У��� J��У���������ַ��"$. ��"$.�"�а����˿ո�ϵͳ���Զ�Ϊ�������A@Rd��`k��Xk��Pi��H��----------------------------------------------------------------------------------------------------------------------------------�y--------------------------------------------���ݱ�ʶ�������ö�Ӧ�ķ���(�����ʼУ��)-------------------------------------��----------------------------------------------------------------------------------------------------------------------------------��Ѵ�����Ϣд�������б��8 H J ^$>%P'b � J ^$>%P'��I��ȡ���б�ͷ������ �������Ϊ�ϲ��еı�ͷ �� J ^$>%P'� H �e � J� ^$>%P'�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'� �� checkZXJHe�-���ר��ƻ�Ϊ������1'�� checkZXJH'�k��P ���_=================================����1 ִ�еķǿ�У��==========================================��Ѵ�����Ϣд�������б�� checkNullKT ^ H J$�'� ����� H� �е������ ������Ϊ�գ�����'��'��)����У��ʱ������д�����Ϣ �A@R�RMsgBox "��" & rgold.Row & "�е������" & Chr(10) & titleMsg & "����Ϊ�գ�����"k��0 ^ � H J �A@��'��a=================================����2 ִ��ѧ������У��==========================================� checkNameKT ^ H JA@��@����ȥ���ո�ķ��� H J ^$>%P!b'b b$�'� ����� H� �е������ ��;��д����ȷ������Ϊ���֣����ȴ���1�����ܳ���20���ַ�������'��'��%����У��ʱ������д�����Ϣ �A@R �� '�k��` ^ � H J �A@��'��Z================================= ִ�еij���У��==========================================�checkLenKT b �$�'� �� ��,$�'��$�� �����` �������Ϊ�DZ������Ϊ�̶����ȶ�� H� �е������ ��.��д����ȷ���������Ϊ�ա�����д���򳤶ȱ���Ϊ�$�� λ������'��$�� ���e�d �������Ϊ�DZ������Ϊ���ȷ�Χ��� H� �е������ ��4��д����ȷ���������Ϊ�ա�����д���򳤶ȱ�����ڵ����$�� λ���Ҳ������$�� λ������'��$�� ���e�d �������Ϊ�DZ������Ϊ�̶����ȶ�� H� �е������ ��&��д����ȷ�������Ϊ�գ��ҳ��ȱ���Ϊ�$�� λ������'��$�� ���e�d �������Ϊ�DZ������Ϊ���ȷ�Χ��� H� �е������ ��,��д����ȷ�������Ϊ�գ��ҳ��ȱ�����ڵ����$�� λ���Ҳ������$�� λ������'�k��H �'��0����У��ʱ������д�����Ϣ �A@Rk�� ^ � H J �A@��'��h================================= ִ�еij���У�飨Number���ͣ�==========================================�checkNumKT b �$�'� �� ��,$�'��$����@ �������Ϊ�DZ������Ϊ�̶����ȶ�� H� �е������ ��G��д����ȷ���������Ϊ�գ�����д�������Ϊ���֣�����0������λ���Ȳ������$��λ����С��λ�������$�� λ������'��$��e�D �������Ϊ�DZ������Ϊ�̶����ȶ�� H� �е������ ��?��д����ȷ�������Ϊ�գ��ұ���Ϊ���֣�����0������λ���Ȳ������$��λ����С��λ�������$�� λ������'�k��H�'��0����У��ʱ������д�����Ϣ �A@Rk�� ^ � H J �A@��'��[=================================ִ��ֵ��Χ��У��==========================================��Ѵ�����Ϣд�������б��checkValKT b �$�'� �� ��,$�'���� H� �е������ ��$��д����ȷ���������Ϊ���֣����ڵ����$�� ���Ҳ������$��������'��'��-����У��ʱ������д�����Ϣ �A@R�k��@ ^ � H J �A@��'��_=================================ִ�е�Ϊ����ֵ��У��==========================================��Ѵ�����Ϣд�������б��checkIntKT b �$�'� �� ��,$�'��$����@ �������Ϊ�DZ������Ϊ�̶����ȶ�� H� �е������ ��8��д����ȷ���������Ϊ�գ�����д�������Ϊ���������ڵ����$�����ҳ��Ȳ������$�� λ������'��$��e�D �������Ϊ�DZ������Ϊ�̶����ȶ�� H� �е������ ��0��д����ȷ�������Ϊ�գ��ұ���Ϊ���������ڵ����$�����ҳ��Ȳ������$�� λ������'�k����'��0����У��ʱ������д�����Ϣ �A@Rk��H ^ � H J �A@��'��`================================= ִ�е����֤����У��==========================================� checkSfzjhKT ^ H�$\'��S ��ȡ��д���� ������ H� �е������ ��&��д����ȷ�������֤������Ϊ�գ�����'��'��0����У��ʱ������д�����Ϣ �A@Rd��� �� �������֤� b J$�'��O ���֤��У�� ���:������������֤У�������� H� �е������ ��M��д����ȷ���������Ϊѧ�����֤�ţ��������һλ���Ϊ��ĸX�ı����д������'��'��4����У��ʱ������д�����Ϣ �A@R �� '�k���d��� b$�'� ����� H� �е������ ��E��д����ȷ�������Ϊ�գ��ҳ��ȱ�����ڵ���1λ���Ҳ�����18λ������'��'��4����У��ʱ������д�����Ϣ �A@Rk���"k���"k���" ^ � H J �A@��'��X================================= ִ�����֤������У��==================================� checkZjlxKT� checkZjlx b�1$�'� ����� H� �е������ ����д����ȷ������'��'��(����У��ʱ������д�����Ϣ �A@Rd��`!� checkZjlx ^ H JA@�k��8! ^ � H J �A@��'��\================================= ִ��ѧ���ŵ�У��==========================================�checkXJHKT b�1, 1, 50$�'� ����� H� �е������ ��E��д����ȷ�������Ϊ�գ��ҳ��ȱ�����ڵ���1λ���Ҳ�����50λ������'��'��0����У��ʱ������д�����Ϣ �A@Rk��� ^ � H J �A@��'��[=================================ִ�����п���У��==========================================��Ѵ�����Ϣд�������б�� checkBankKT b$�'� ����� H� �е������ ��$��д����ȷ���������Ϊ���֣����ڵ����$�� ���Ҳ������$��������'��'��-����У��ʱ������д�����Ϣ �A@R�k�� ^ � H J �A@��'��W=================================ִ�����У��==========================================��Ѵ�����Ϣд�������б�� checkYearKT b �$�'� ����� H� �е������ ��*��д����ȷ�������ʽ��2012��2002�ȣ�����'��'��-����У��ʱ������д�����Ϣ �A@Rk��� ^ � H J �A@��'��W=================================ִ��ѧ��У��==========================================��Ѵ�����Ϣд�������б��checkXnKT b$�'� ����� H� �е������ ��)��д����ȷ�������ʽ��2012-2013�ȣ�����'��'��-����У��ʱ������д�����Ϣ �A@Rk��( ^ � H J �A@��'��W=================================ִ���·�У��==========================================��Ѵ�����Ϣд�������б�� checkMonthKT b$�'� ����� H� �е������ ��&��д����ȷ�������ʽ��01��12�ȣ�����'��'��-����У��ʱ������д�����Ϣ �A@R�k��� ^ � H J �A@��'��g=================================����3 ִ�е�����У��(�DZ���)==========================================��Ѵ�����Ϣд�������б�� checkDateKT� b$�'� ���2�����������У��ʧ����� H� �е������ ����д����ȷ����д��ʽΪ�"$.�xxxxxxxx�"$.� ����20130221������'��'��-����У��ʱ������д�����Ϣ �A@R�k��� ^ � H J �A@��'��c=================================ִ�е�����У�飨�����==========================================��Ѵ�����Ϣд�������б��checkDateNecessaryKT�& b$�'� ���2�����������У��ʧ����� H� �е������ ����д����ȷ����д��ʽΪ�"$.�xxxxxxxx�"$.�= ����20131221������ֻ�����õ���֮ǰ��ʱ�䣨�������գ�������'��'��-����У��ʱ������д�����Ϣ �A@Rk��� ^ � H J �A@��'��g=================================ִ�еij�������У�飨�����==========================================��Ѵ�����Ϣд�������б�� checkBirthdayKT�! b$�'� ���2�����������У��ʧ����� H� �е������ ����д����ȷ����д��ʽΪ�"$.� xxxx-xx-xx�"$.� ����2013-12-21������'��'��-����У��ʱ������д�����Ϣ �A@Rk��� ^ � H J �A@��'��J=================================����10 У��绰����======================� checkPhoneKT b$�'� ����� H� �е������ ����д����ȷ����д��ʽΪ�"$.�����-�̶��绰 �� �ֻ������"$.� ������'��'��%����У��ʱ������д�����Ϣ �A@R�k��x ^ � H J �A@��'��L=================================checkOption У�鱸ע ======================� checkOptionKT b�B$�'� ����� H� �е������ ��)��д����ȷ�����Ȳ��ܳ���200���ַ�������'��'��%����У��ʱ������д�����Ϣ �A@R�k��  ^ � H J �A@��'��\================================= ִ���϶����Ѽ�������У��==================================� checkDiffNameKT� checkDiffName b �$�'� ����� H� �е������ ����д����ȷ������'��'��(����У��ʱ������д�����Ϣ �A@Rd���� checkDiffName ^ H JA@�k��� ^ � H J �A@��'��'��T================================= ִ�н�����׼У��==================================� checkZZBZKT� checkZZBZ b �$�'� ����� H� �е������ ����д����ȷ������'��'��(����У��ʱ������д�����Ϣ �A@Rd��H� checkZZBZ ^ H JA@�k��  ^ � H J �A@��'��\================================= ִ��ר��ƻ���������У��==================================� checkZXJHKT� checkZXJH b �$�'� ����� H� �е������ ����д����ȷ������'��'��(����У��ʱ������д�����Ϣ �A@Rd��� � checkZXJH ^ H JA@�k��� ^ � H J �A@��'��X================================= ִ�����֤������У��==================================�checkIDCardTypeKT�checkIDCardType b �$�'� ����� H� �е������ ����д����ȷ������'��'��(����У��ʱ������д�����Ϣ �A@Rd��X �checkIDCardType ^ H JA@�k��( ^ � H J �A@��'��v=================================14 checkGender ִ�������Ƿ�Ϊ���С���Ů��У��--==================================� checkGenderKT� checkGender b�0$�'� ���'��-�Ա��д�������У�����֤�Ŷ�� H� �е������ ����д����ȷ������'��'��(����У��ʱ������д�����Ϣ �A@Rd��� � checkGender ^ H JA@�k��` ^ � H J �A@��'��u=================================14 checkYesNo ִ�������Ƿ�Ϊ���ǡ�����У��--==================================� checkYesNoKT� checkYesNo b �$�'� ����� H� �е������ ����д����ȷ������'��'��(����У��ʱ������д�����Ϣ �A@Rd���� checkYesNo ^ H JA@�k��� ^ � H J �A@��'��u=================================14 checkYesNo ִ�������Ƿ�Ϊ���ǡ�����У��--==================================� checkSqyyNameKT� checkSqyyName b �$�'� ����� H� �е������ ����д����ȷ������'��'��(����У��ʱ������д�����Ϣ �A@Rd��`� checkSqyyName ^ H JA@�k��0 ^ � H J �A@��'��]=================================checkTerm ִ��ѧ��У��--==================================� checkTermKT� checkTerm b �$����� H� �е������ ����д����ȷ������'��'��(����У��ʱ������д�����Ϣ �A@Rk��� ^� checkTerm b �$� H J �A@��'��r=================================checkAtLeastOneNNull ִ������һ�����Ϊ�ǿ�--==================================�checkAtLeastOneNNullKT �� '��A"ִ�� ����һ���ǿ�У�� �ĵ�Ԫ����Ŀ b$� b���=��������Ϲ��� � b '� J� �KTF � b '� �KTF � b '� �KTF � b '� �KTF � b '�n��d������Ϲ��� �� '��F6ִ�� ����һ���ǿ�У�� �ĵ�Ԫ��������Ϊ�����Ϲ������Ŀ � � � '�k����'�n��pi��h�_--------------------------------------------����������ʽ-------------------------------------�]����VBSCRIPT.REGEXP$�.��7RegExΪ����������ʽ� �(��4 ����ȫ�ֿ����vba��\����ת�� � �(��.������ʽ� �(��5�����Ƿ����ִ�Сд�� b �%�'��3 ִ������������.�i�����------------------------------------------------------ ��ָ��cell����ֵ-------------------------------------------------------------���1qaz�� ^$>B@� b H ` ^$>%P(bi����-----------------------------------------------------------�°� У���ظ���˵���Ѿ�û�и�ʽ����------------------------------------------------------------�V-----------------------------------------------------------1����ѧ���׶������ڱ��ڲ����p�(sheetѧ���׶��� �A65535 $V%%�!'�*cna = getTotalColumnCount(sheetIndexValue) X$V!PB@ �1&ÿ��У���ظ�ʱʱ���Ѵ�����Ϣsheet���,�'Z�������Ϣ��¼��ʼ�����X==============================��ѧ���׶������ڱ��ڲ���==================================�0����ð������ÿ��Ԫ�غ�����֮ǰ�������н��бȽ�� � �� �   $V%P'� � �� � �   $V%P'  ��.���ѧ������ͬ��˵�����ظ����ݶ�� � �е����ݺ͵� ��������ظ�������!!!!'� �A@R�*�Ѵ�����Ϣ����'k��pB��hB��`Bi��XB��-----------------------------------------------------------��һ���� ����ֵ��ȡ��ֵ������------------------------------------------------------------�����ֵ�����ҵ�ֵ���ڵ��л����keyWord ���ҵĹؼ����'kbn ���������л��� ֵΪ ��row�����row���']�p�the find result object� �" &�$ *�(� A1:A65535 ^$>%% . �� �row� !'d���@ !,'k��h@k��`@i��X@��------------------------------------------------------ ִ������ڹ���У��(����Ϊ��)-------------------------------------------------------------�value ���������value1 cell�������У�鲻��ȷ����false�У����ȷ����true�� 0�0��˵��Ϊ�DZ����� .$2���'�z��?k���>k���>]�(�'6�ijһ������ļ�¼�� �A65535 :$V%%�!'8�B�������'� : b�row$'4�=��ȡ��������������� � 4 8� � :$V%P b� 6� '6d��>y���=k���=� ��� � 4 4 6 � � � :$V%PX .X ��L�жϹ��������Ƿ��cell������'�y��h=k��`=� ���#��ʱcount��ĿΪ�ù������е�������Ŀi��=��------------------------------------------------------ ִ��ɾ��ijһ�в�����excel�ܱ����ģ�-------------------------------------------------------------�sheetIndex ����� rowNum �к��@�1qaz�� ^$>B@� 8 ^$>%>B@@�/ �Ѹ���ɾ���- Worksheets(sheetIndex).Protect Password:=123i���;��------------------------------------------------------ ִ��ɾ��ijһ�в�����excelû�б�����-------------------------------------------------------------�sheetIndex ����� rowNum �к��� 8 ^$>%>B@@�/ �Ѹ���ɾ��i���:��------------------------------------------------------ ��ָ��cell����ֵ-------------------------------------------------------------�@ �1qaz�� ^$>B@� b H ` ^$>%P(bi���9��------------------------------------------------------ ���ݴ�����е���������ֵ��ǰ��ʱ�������Ѿ�ͨ����У�飩-------------------------------------------------------------� ]�� �� �� H ` ^$V%P!bX 'L�'6�ijһ������ļ�¼�� �A65535 :$V%%�!'8�F������ : b�row$'4�A��ȡ��������������� � 4 8� � :$V%P b� 6� '6d���7y���7k���7� ��� � 4 4 6 � � � :$V%P!bX '. . LX ��1�жϹ��������Ƿ��cell����� � :$V%P!b'F FX H ` H ^$V%P(by��7d���6� H ` H ^$V%P(bk���6� ��i���6��------------------------------------------------------ ȥ��cell�еĿո�-------------------------------------------------------------� ]�� ���Ԫ�����������]�� �� �3Blength1��ʾcell��ԭ���ij��ȣ�length2��ʾִ��ȥ���ո����ַ��������'��Ĭ��Ϊû��ȥ���ո��2 Worksheets(sheetIndex).Unprotect Password:="1qaz" H ` ^$>%P!b'. .'J J��Gzj�*"�����Ԫ��Ϊ�գ�����ȥ���ո���� .� �'L�%length2Ϊ�ո��һ�γ��ֵ�λ�� L�������ַ��������ո� .� �$N'. .X H ` ^$>%P(b�'�k��(4i�� 4�~------------------------------------------------------ ȥ�����ַ�-------------------------------------------------------------�� ]�P �-[\uFF00-\uFF06][\uFF09-\uFFFF]|[\s,;'<> "?^]+'� � b$���'Pd��03�'Pk�� 3i��3����3������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/.VisiMetho(dXQ:,visBF�� '= ִ��ѧ���ŵ����8�CasPXJH�~J9��Len(value, "1�, �50")SQ��If Not ��Then� E���"��A�EwA�d�������Ϊ�գ��ҳ��ȱ�����ڵ���1λ����ହ�50@�E(�?�E�%Ɉ �P�[�\ck\�y� �\�Xa\���п��N�\i@h��%�����a�б��k$�_Bank�_ U�=WA�^?]?]�/g�\����\�ZΪ�`��֣��[�ffunctionArgsArr(0�)�g�^q1c_a��`��#"�`��'_`�  ____x�_^O^�����]�]�.�^�Year�.�.pu�E^�#�/�o^XQ �o^��//^O��+H��/��ʽ��2012��2002���ύ���+���� �+o�y�+���[��+�o[ʐ�E< �+�*�#����+�Z��Zy�n��+�+�+Xĉ�*F�*�*��*�*�*�*���*-�*3�*�ߏ*�*�*��*g�(j����*��*�*�*�*�or���*'�*���OV_�*�*���*Month�*�*��*�_�)�*�*,?��*�*�*�*�*01���1OU��*�*��*��*�*[���*���*�*�*�*�*��*�o'����3��@�������U(��DZ���)��= '�Ѵ�����Ϣ����X�б� Case "checkD�ate" ' > VJMethodXQ = Birthday(value)=If Not4DThen '�����������Ѐ���ʧ��H�errorMsg�"��" & rowIndex"�е�ʀ����� title�& "��д��� �ȷ�����ʽΪ�Chr�(34) x ����20130221���@���"UhasE�VUTru�e '����s±'���ЅӜ$writeLog �~��rEnd If�beginC��_comment sheet5�V,Ko,�\olumnD �'isF�"��" &�d�"�е���� ���title�e���������ȷ�������T9�hasE�t�Am@ '����V��������д��������*writeLDog��Els��sDet@XCod�g,� ����< ����d�ר��ƻ��������Ƒ}�XJH?\XQ�?�-\!?\�)�?\g$�?\?\?\ ?\?\ ?\���d_MBi_�/ ��_F����������__�����֤��������^�� -�IDCard�Type�_�_�_`��. ?c'$c�1�sg�_�_��1�_�_�* �1_�/��_�*_0ϐ��_0G`�ϐϐ�ϐ��_0���14PbXGe��r��������Ƿ�Ϊ���С���Ů��2--�82�3�1P |�=����1"0"���/�6��DU)IdN�umV��Ա�����������C��'��4ET��2?�?�?��x�4�4��4�f�U$�6��b6F�5�5����5G�5�5�5�5��69�5 _f�0�5Ye�sNo��5���5����5����5"��5� 2>�����g����@_6_6�t�1�1���/f/f��1�1�1*�/f���/y�/e�/��/���/G�/�/�/�/�/�� isFor = True $'=14�checkYesNoִ�������Ƿ�Ϊ���ǡ�����У��-b-�= FC ase "bSq�yyName" !*#Method XQ�DMB( =, value, functi�onArgs)�)�If Not -0ThenEer@rorMsg�@"��" & ro@wIndex"�е������� title�& "��д����ȷ������Ôt3hasE�43�� '�����ʱ������д�����Ϣ�Uwrite0Log -� El�s@�A�set@YCod�i, sh(eet?,�A, �column� nd If�beginC��_co�mmentJ�j,�;m��TermÀG��ѧ��~����I�� � ��_V�_V_V_V_VbTE?H���7H�*`��KJ���K �\'��"LAtLeastOneNNull �M����һ�����Ϊ�ǿ՟�n=��� 4PaAC$ou�p= �+ �1 '� �!�c �ĵ�Ԫ�����ĿS}�\�Money(��) A ;B <>d 0"[ '� ����Ϲ���� � &Btotal� ���+#ÛSel�ect ���%�"baojiao5�C¡:�1 ��Sum�-��� huoshi� �_H� � ��� zhusu� ��G� �� �� others�� �H� � }� �Oc*?%��| �'�2��3 �=�pG�>6�>�>�>�¡�Ϊ��@K�E� �+ ��+ " ��Jb�`��Xu �vF�� �-��������`��ʽo-� � regb�(��}��DimaEX As O�bj�ISet�= Create("VBSCRIPT.REGEXP")q'RegExΪ����G �EX.G�lobalpFB��}'����ȫ@�ֿ���''vba��\��@��ת��P�attern���� R��ʽ�@IgnoreB8=� FaЪ��q����ִ�С�д����3�pTest�gGB.ˀ�������`�hing �#o ������cell�����H&5��C@Vт=XQr(O�exB��o(W(ork2s�).@Unprot�rPassword:�="1qazh:��p�).! s(uӷ�).�=�z�O--�°� �J�ظ��������Ѿ��(��� ���������C�1����ѧ���׶������ڱ��ڲ���� ��оSameXQNe�w(2) 'rs趀���� rna = Sh@eets(s0Index2).Range("A65535").End(xlUp)�.row�'c�getTotalColumnCount�Valu�e)homsg Name).Cells.ClearContents 'ÿ�������ظ���ʱ���Ѵ������Ϣ� ���,Ycu�rMsgRow�1 '*��¼��ʼ���� '=��ѧ���������ڱ��ڲC��F'�������������ÿ��Ԫ�غ�������ǰ�������н��бȽ�For i�astartTitle + 2p To ���b�abyID1�� 催(i, �h�cEji -\ 1��2�js�AIf(�1�Then '����c����ͬ��˵����1����&�er ro�@'"��" & j�"��H�����i������P��!"writeLog �F'�����hhas6S��@&True� �� If��NextGC� Function '-7�������� ����ֵ��ȡ��ֵ����<��� 7�C ��@���ҵ�� ����л����keyWord �Ĺؼ���9�bnBCa �ֵΪ ���������Ǣ� P Get��O �l�I�(By�� �b<, #$� As String)� @I@�ger�- � �7-�bDim c�Object 'the find result o�G7Set�= �kb��g�1:ưF� (What:=FLoo�kIn:=xl�(s, !A@xl0WholI��lNoQ�Is h� algDqk != "��*"��!c�á�Els�[r�+M`���]�U ִ����a������(����Ϊ8��)|��Vva��� � ����1 c�ܵ��� ���'A����ȷ����fa7�%�et��[ch�eckDMB(� , �1, flE$�ex�""��l�Gj c�%� '�1 ȥ��#9�Ŀ8ո��8H�removeSpacxeXQ�ܤ��$QAs @�ing '��Ԫ����p���P�$�l�ength1 Integer,J c2h '���ʾ#ԭ���ij��ȣ���ִ���"�!����ַ�<������JFa��૬��Ϊ� ��F' Wo rkbC �Unprotect Password:=�"1qazhA�st�c|�������#~�d � Len��1�`��'0C�aE�'�����1Ϊ�գ�������%P����� 2� Inn��� � �# 2����һ�γ��ֵ����Çf2 <> ��3����A5'�q�&Rep�lQ���"����}�v~�Xo� �"TryN>=�6�=�������"� �"�4#� @#� H#�P#� X#�`#� ����� �h#� �#� $B� ($�0$�8$�P$�`$�h$�p$�x$��$� ��$� %� 8%B� P%�X%� `%� p%�x%��%� ��%� &� 8&B� P&�X&� `&��&��&��&��&��&��&� ��&� P'� p'B� �'��'��'��'��'��'��'��'��'� ��'� �(� �(B� �(��(��(��(��(�)�)�)�)� � )� �)� �)B� *� &*� $8*� `*� �*�&�*�*�*�"�*�$+�8+�(X+��+��+��+��+��+��+� �����,� �����2(,�`,�"�,��,��,� ����� ������,��,�-�8-�P-�X-� �`-B� �-�.�.�.�.�� .��.� �.��.��.�/�/�/� /�(/�0/�8/�����/��-----------------------------------------1 ��������,���д�����Ϣ��ʾ�� ������Ϣsheet��---------------------------------------� ��ʱ����0� ��Ϊ��ʱ����1�� ��Ԫ������]�� H J ^$>%P'L L���'�d���'�k���i�����-----------------------------------------2 У��ѧ������ ҪΪ����-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�� b$2���'�z��k��]� � b$���'�d���'�k��i����|-----------------------------------------3 У��������ڸ�ʽΪ2012-05-09(����Ϊ��)---------------------------------------�0 b$2���'�z��@k��8]����reg = "^((19)|(20))\d{2}-((((0?[13578])|(1[02]))-((0?[1-9])|([12][0-9])|(3[01])))|(((0?[469])|(11))-((0?[1-9])|([12][0-9])|(30)))|((0?2)-((0?[1-9])|([12][0-9]))))$"��reg = "^((19)|(20))\d{2}-((((0[13578])|(1[02]))-((0[1-9])|([12][0-9])|(3[01])))|(((0[469])|(11))-((0[1-9])|([12][0-9])|(30)))|((02)-((0[1-9])|([12][0-9]))))$"�;^(19|20)\d{2}-(1[0-2]|0?[1-9])-(0?[1-9]|[1-2][0-9]|3[0-1])$'� � b$���'�d����'�k���i��x�|-----------------------------------------3 У��������ڸ�ʽΪ2012-05-09(����Ϊ��)---------------------------------------��]���^((19)|(20))\d{2}-((((0[13578])|(1[02]))-((0[1-9])|([12][0-9])|(3[01])))|(((0[469])|(11))-((0[1-9])|([12][0-9])|(30)))|((02)-((0[1-9])|([12][0-9]))))$'� � b$���'td�� �'tk��i���h-----------------------------------------4 У�����֤����---------------------------------------����Ϲ��򷵻�true������Ϲ��򷵻�false� ]�79058421637905842���0��Ȩ����]� 10X98765432���0У���� v$2'v� ȥ���ո�]����� `  v���6)����׶����֤��Ϊ��,������Ϊͨ��У������'�z���k��� v��Gzj v��$�$~�Gzj v�*[0-9X]�Gzj� ���� x �$�'| |��G� '|j z v �$� | 'z��� z� '| v�$�  |� �$��G�'�ji����z-----------------------------------------У�����֤������ -------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�]�x�,^[\u4e00-\ue863��a-z|A-Z|0-9|()|����]{1,18}$'� � b$���'�d��`�'�k��Pi��H��----------------------------------------5 -У��ѧУѧУ��ʶ�� 42λ�����һλΪ���ֻ�x-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true��]���^[1-9]\d{40}[\dx]$'� � b$���'�d���'�k��i���z----------------------------------------6 -У�黧������ -------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�]�h�.^(\u519c\u6751)|(\u53bf\u9547)|(\u57ce\u5e02)$'� � b$���'�d����'�k���i����u-----------------------------------------7 У����ѧʱ��-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true��]���'^(((19)|(20))\d{2})((0[0-9])|(1[0-2]))$'� � b$���'�d����'�k���i����q-----------------------------------------7 У�����-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�� b�� ����,���Ϊ�DZ�����'�k���z���k���]�x�^((19\d{2})|(2\d{3}))$'� � b$���'�d��H�'�k��8i��0�q-----------------------------------------7 У���·�-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true��]���^((0[0-9])|(1[0-2]))$'� � b$���'�d����'�k���i����v-----------------------------------------9 У��ѧ����-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�]�h�^\d{4}[0-7]\d{3}[0-3]\d{7}$'� � b$���'�d����'�k��xi��p�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'� � b$���'�d�� �'�k�� i�� �v-----------------------------------------11 У�����п���-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true��]�X�^[1-9]\d{14,20}$'� � b$���'�d�� �'�k��� i��� ��-----------------------------------------checkXn У��ѧ���磨2012-2013��-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�p]��]���1^(20\d{2}-20\d{2})|(19\d{2}-19\d{2})|(1999-2000)$'� � b$�� b�-$�'��$��$� ���'�d��x �'�k��h d��` �'�k��P i��H ��-----------------------------------------checkOption У�鱸ע�磨����С��value2��-------------------------------------------------------------����Ȳ�С��200����false� ���򷵻�true� .���'�z��P k��H . � ��'�d��( �'�k�� i�� ��------------------------------------------------------�Ƚϴ�С(С�ڵ��ڷ���true)----------------------------------------------------------------�'value1����value2����false ���򷵻�true�� .X'. �X'� . � ��'Dd���'Dk���i�����------------------------------------------------------�Ƚϴ�С(С�ڵ��ڷ���true)-dec---------------------------------------------------------------�'value1����value2����false ���򷵻�true� .$4'. �$4'� . � ��'�d����'�k���i����}------------------------------------------------------У�鳤��---------------------------------------------------------------�� ��,$�'��'� b���$����/���Ϊ�DZ������'�k���z���k��� �����,-�±��0��ʼ����ֵΪָ��������ά���õ�����±� b�$�$4 b�$�$4��'�z�� k��d� ˵����У��̶����� b�$�$4��'�z���k���k���i����}------------------------------------------------------У������---------------------------------------------------------------� ��,$�'��'� b���$����/���Ϊ�DZ������'�k���z���k��� b$~��& �����Ϊ����z��� b�.��e�+�������С����z��P b$4�e�% ���С��0z�� k�� �����,-�±��0��ʼ����ֵΪָ��������ά���õ�����±� b�$�$4 b�$�$4��'�z���k���d� ˵����У��̶����� b�$�$4��'�z��0k��(k�� i����------------------------------------------------------У����ֵ��Χ---------------------------------------------------------------�� ��,$�'��'� b���'�z��Hk��@ b$~��) �����Ϊ����z�� b$4�e�) ���С��0z���k��� b$4�$�$4 b$4�$�$4��'�z���k���i�����------------------------------------------------------У�����ֳ���(Number,����Ϊ����Ҳ����ΪС������С��0)---------------------------------------------------------------� �<^(([1-9][0-9]*)|(([0]\.\d{1,2}|[1-9][0-9]*\.\d{1,2}))|0{1})$'� � b$��z��` k��X ��,$�'��'� b���$����/���Ϊ�DZ������'�k���z���k��� b$~��% �����Ϊ����z��� b$4�e�% ���С��0z���k����$�'��+����������󳤶��$�'��.С�������λ�� b�.�'��'��'� ����"˵��û��С���� b$4'� ��$�$4��'�z���k���d� �����С���� b� b�.�� $�'��D��Ԫ�������ֵ�����λ b b�.�� $�'� ��$�$4 ��$�$4��'�z���k���k���i�����-----------------------------------------checkIsInt У�鲻С��0������-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�� ]�� � ^0|[1-9]\d*$'� � b$���'�d����'�k���i�����-----------------------------------------checkIsNumber У��ΪNumber����-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�� �'� b$~��'�k���i�����-----------------------------------------checkMoney У����0-9999������-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�X ]�� �^(([1-9](\d{0,3})|0)|0)$'� � b$���'�d����'�k���i�����-----------------------------------------checkMoneyTJ У����0-9999С�����һλ-------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�� ]�0 �^([1-9]\d{0,7})$'� � b$���'�d��h�'�k��Xi��P��-----------------------------------------checkPersonNum У���׶�԰��������һ����------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�H ]�� �^(([1-9]\d{0,3}))$'� � b$���'�d��0�'�k�� i����-----------------------------------------checkIdNumLink У�����֤�����Ա�ͳ����������û���д���Ƿ�һ��------------------------------------------------------------���ʽ����ȷ����false���ʽ��ȷ����true�� � If colIndex = jhrIDColumn Then� checkIdNumLink = True� Exit Function� End If]�`�%�Ա�����֤�����Ƿ��Ӧ]�x�$�������ں����֤�����Ƿ��Ӧ]������ڵ�һ�γ��ֵ��±�]���"�Ա�,��Ԫ��֮�ڵ�����]���$��ݺŽ�ȡ������]���!��������,��Ԫ��֮�ڵ�����]���"��ݺŽ�ȡ������]�� �#�������]�8�P�%�����·�]�h��]�� ���$�'� ���$�'� �� ���(�����ڶ�λΪ��������Ϊ������� H n X$V,Pd������ڶ�λΪż������ΪŮ���Ů H n X$V,Pk��h ���$�'� ���$�'� ���$�'� ��- � �- � H p X$V,P�'�i�����-----------------------------------------3 У��������ڸ�ʽΪ2012-05-09����������δ��ʱ��(����Ϊ��)---------------------------------------��]�]�(]�@]�X��^((19)|(20))\d{2}((((0[13578])|(1[02]))((0[1-9])|([12][0-9])|(3[01])))|(((0[469])|(11))((0[1-9])|([12][0-9])|(30)))|((02)((0[1-9])|([12][0-9]))))$'� ��yyyymmdd$�'� b � ��'�z��8k��0 � b$���'�d���'�k��i����%^([\u2E80-\uFE4Fo��]|[a-zA-Z]){1,20}$'��4�޸ģ�����У����Ƨ������p����\�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�CpRTrim��?�"�R�1ID�S�8�Exit GI�'�P���re�� @A^([\u2E80-\uFE4Fo��]|[a-zA-Z]){1,20}$" '�޸ģ �����AT��pƧ���s�0C��� (, �8L���1�z��R;����3�"��������A6Ϊ2012-05-09(�����!t)_D"MxBirthday��<�X �` �Pue)��Pcke�z?�Lsos�4�' �^��֤�x��������Ϲ���qqcp'��I�r�j IsIDNumb�er(By�� �y�, � ��)��Boolea��Const W' "790584p2163�@m�'��Ȩ���� �l�c�10X9�8765432Ce'���' = �^% )�sȥ����ո�!-sInteger,� i�T� Cv= babyID�C�� A>�aӃ '���������:,������Ϊͨ���� A �+���h%�h 5y � Len(<> 418�/ �3Not0  eric(�Mid�, 1 |7)�3��6�5L@ike "*qkX]�_ � For�= 1 To l17C�T�qW��Զ���0� ]�1`��1sps( + ; i! *� TNext��s Mod 1���Right�)�c, T����3 ゟ^o: --� �"���������@��_�Q_�G�SFZxJLX��Y`E`p�4e0q�e863���0�|A-Z|�|()|�����]�18����Y�����r��Xk� POXLX��5g�3bѧ�0��ʶ�� 42λ�����һ����̻�x���/��/�ckSchCod>e����a�P�40@}[\dx]�k��:�C�Vn� Else �0checkSchCode = FatEnd If Function ' -$6�-У�黧������ %x'|��������ȷ�е��f�'Xtru�� �FamType(v alue)�}Di�m reg�}"^(\u519c\u6751)|3bf\u9�5477ce�@e02)$"�IZf�#C��:(�%,� �4 The��� �E7T�T��YC��-7 AcȀ�ѧʱ��?cA1cRXDat�b((19]20))\d{2})((@0[0-9]1�2])5a� �`F ��`�Z�`��ݿ_!�_Yeara, f�zArgsAr�r$cZ�W�#""LX/EY`��0� '���Ϊ���������d���ra�a�ŏi�aExit �{� �j{�s� �{�II|�(23}�G��, 0x�G�@$dG�>�Gz ��`��Mo�nth���t�����*D-�?-�"�9�N�a�� ׺�8�-1�-XJH�-Y4}Y��7]BZ 3!7�}��)�-ck@ۂ#���_10�i�绰�����O�_���-ckPhon0eNum?l�\b��i(([38��hP4[57Ai5�5Sjk8}�0�0!p2[\d�j-["2�\d*�[3Dz�mg)\bo�o��o�� ��x_11����п��2O�P�Bank� =�[1c14,2�0_2ck������4oo��g Xn�I�I���瀣�2012-@�3��_�pXn_U�x�y �s�z��20�J�2}p r�019�t9900o�_�L2Spli�t� , "-"4��]0�R(1) -� �0)01����= ۊ�h�����olkp�����s OpQ��#��ע#�����С��R�2_#OP#���2�00yٷ����Y�Vck� �1�2��2 1@���4�h �����E�Le�-@">c��2�!V��L ?#�Q5� G�1� q�Jc�`O��-�Ƚϴ�С(С�ڵ��ڷ���t0rue)�+D 'value1�(���2�false ����j Function com pare(9, a7)  �= CInt& J2 2If�(1 >- Theno/3�C$F�WE�^T��nd �If E��q���3��dec�)F yk�Dec!l� l�9l�lC �m�_У��鳤��# ɀheckLen], fD�Args#�V�Arr�ESplit(�, "�,"hcD �(Eg ""�f`�(0)0� '���Ϊ�DZ�������h�o(�2Esaiaj��xit �l�Dp�`UBo�und� �#2�±��0��ʼ������Ϊָ��������ά���õ������ F4) >� Mm(1)) �A H(� E3'��.�� '˵�����\�̶��\us! �� H�!? � *� ��F����x�#������� �������3���P;�o-�w�@�0@@@$��@A����@ Not IsNuPmeri�k)8J��Ϊ�>��,���� InStrY".") <> y����С�����oK 6`nCQCr= �0߿��-p?Ps?P?P?P?PRBpX??Pg�1?P���$?P���h,O$? ?PO�$?P�?PY�?P�?P�?�+�� ?P��'oJ1P��ֵ�Χ��}PVal��������Ponq��0���K�PP����'��_=A`#�Je�J׿�J�oQ2�E ��� K�E�/��#߀� )L?@3@0t������B/2E��y_ ��5q��)s/�ֱ�(�fber�,����Ϊ� Ҳ�aa��������1P�1+�unctionA�rgs) reg = "^(([1-9]["0*)|80]\.\d{1,2 }|l())|0@{1})$"�I@f Not �C�heckF�(, value)` Then-�Epxit '�E�nd If "f�Arr�Split( , ","�c�Num�,False�&T�I� ""KM� :((0)0� '���Ϊ���������-���@Tru@t?�� ���Q�Is��reric(��P��Ϊ���֏�O�]I�CDeF<= <С��0��p�*�max�IntLen�Q�V1) '�����������0���� @DoPuble2� �����λ���iBgth�InStrK��. ��)� VA�@ ;xdouT�MIMˀ���û��C&K$���^� ��?(�E() h �S��E��T �FJ�>E�JG�Q� �.Mid�31D, �5 - �E���Ԫ�����[�āGλ�&�6H �� +� 3 �� ?/�@�(1)) A� ���42��i*e�5��51�e���p '-#bIs�} У��>���48���ʽ����ȷ�����f#�'��etb�% ��JD�xDimA��=�Ԡ}"�^0��\d*� n��� � @ ��_�J�(#= ��s.?.e%� ��ber�.Ϊ������8*�?�?�?ckri�j�� :��l>� ��G{+?/�Money �����999���E�___`� Y�+eg�+$�(@�0�,3}��!_,o��GyH= _,3FJ_, '--wTJ=#t��һλ�������TJ����7'���Dg���j_3G��!��D�_t�Person@D��׶�԰��������һ���˿�ooo`v �O1��01�ʯ�S������o1o1�B�Id�Link����֤�����Ա�������������û���д���Ƿ��һ��O_ooo`� (�, rowInde�x, col���'�e�sjhrI�DColumn���' F*w!vo��?��1A��1�isGe rRight As Boo�lean 'CE��ϡ��Ӧ�}��Birth�����/+len@ʦ2���eg�|'q��һ�γ��ֵ��±�=[gb ��` ��in gS ,r���֮�ڵ��@��� Dim genderValue1 As Integer '���@�Ž�ȡ�b0irthjhString '��������,��Ԫ��<r=�qyear, 4Variants�� �mon0th, /����day, �1 �arr��= Mid(IdNu�m, 17�)�o��z �8�If��Mod 2 = 1 Then '�����ڶ�λΪ���������`�����"��S�heets(s� I|x|).Ce�lls(rowB,�ColumnB)@"��"�EHlseLżE�J�rHŮIn�d IfF"�$G���@,�b�Z@c, 4dÂ�� 5, 2� ��Q kI &V�$�8�+�+ "-" +��C� �5checBkB�Link�$T@rue E@DFunction ( '-%3bBУ��u��ʽ��2012-05-09����������δ�@�ʱ��(�0���)� " E �NowNecessary(�v��$-A�stg��a�time�UP� ��reg��%"^((19)|(20))\d{2}(0[13578]�1[0@2]))((`-9![12][0�c3[01���4611�� ��023 )))$�Z�= Forma�t(, "y�mmdd"�#@�b%� > ��~# 8�*@Fa�s&Exi�t D�>AF�h` $�CaK�(�, #3���8@ CPb ir��G�����������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������Root Entry��������P�{>��b@ZWorkbook3���������uOlePres000����;8@_VBA_PROJECT_CUR"����4ShowForm VBFrame������������f������������&CompObj����ao������������PrintForm����1 VBFrame������������f������������ &CompObj ����ao ������������PROJECT���������VBA��������*dir�������� Z__SRP_b��������2�__SRP_c��������F�__SRP_d��������JB__SRP_e��������L��Xf������������\�__SRP_a��������P�Sheet1.��������h~__SRP_f��������zBThisWorkbook����'����|� Sheet6���������~Sheet5���������~ShowForm����$������__SRP_2&��������ijPrintForm����������__SRP_3����������__SRP_4��������<__SRP_5 ��������y__SRP_12����/����T__SRP_11����"�����__SRP_10����#����*p__SRP_0��������wl__SRP_1%��������0]_VBA_PROJECT��������������#;N z�^����������Q__SRP_6!��������:J__SRP_7)+����<�__SRP_8����,����?�__SRP_9��������CB�]wQ�Qpe (���������[�!h���Qpe 0���������p__SRP_13��������EgSbpS��ȉ -��������G~PROJECTwm������������Y�Ole ������������]CompObj2��������^hSummaryInformation(����5����`�DocumentSummaryInformation8������������d(������������������������VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} ShowForm Caption = "UserForm1" ClientHeight = 3180 ClientLeft = 45 ClientTop = 375 ClientWidth = 4710 StartUpPosition = 1 '���������� End ��������������������������������������������������������� }t ����������������������������� ����Microsoft Forms 2.0 FormEmbedded 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 �������������������������������������������������������� }t ����������������������������� ����Microsoft Forms 2.0 FormEmbedded Object�9�q�������������������������������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="5654FA0C0A1412181218161C161C" DPB="6260CE00C71DC71D38E3C81D17FC8953CCC339FF0A869173DE96B8A3E7A54D7591715DEC04" GC="6E6CC214C22CCF2DCF2D30" [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, 769, 337, ����=0, 0, 0, 0, C У�麯��=52, 52, 795, 363, Z ������=0, 0, 0, 0, C ShowForm=0, 0, 0, 0, C, 38, 38, 1424, 583, C ��ӡԤ��=0, 0, 0, 0, C PrintForm=0, 0, 0, 0, C, 76, 76, 1462, 621, C Sheet5=0, 0, 0, 0, C Sheet6=0, 0, 0, 0, C ���������������������������������������������V��0*� pH�d� VBAProje�ct4@j = r ���[� J< r�stdole>stdo�le h%^*\G{00�020430-C 0046}#2.0#0#C:\Windows\SysW OW64\e2.tlb#OLE Automation`�EOffDic�EOf�i�c�E�����E2DF8D04C-5BFA-10�1B-BDE5�E�AA�C4�2�E��gram Files (x86)�\Common \Microsoft Shared\OFFICE14\MSO.DLL#��P 15 .0 Ob�� L�ibraryN�MSFo@rms>SF�rmHs3��D452EE1-E�08F�1A-8-02608C4 D0BB4�TINDOWS�TFM260L'B @a�&/�;"1�l�rAA�r00}#0�r#G� ��50�� ��A8E3E498C-7693-4397-A67A-C7D864@B10FEC�6Users\keze\AppData\Local\Temp\VBE�b�6.exdc�;@!��.E ���.`�M ����� �����ThisWorkbooPkG�T�iE@kW�mkb�oPk� 2� Q�HB1��-��B,�!zL*""+��rSh�eet1G� S��e�`t1 �v��2�� �� T�H� 6� 6� 6�� 6� ���� ���ӡԤ��G�Sbp�S��ȉ�e2jo �p�!�(e)� ���ߺ���c �]wQ��Qpec ec e�o ��(��k �@����G�;�Xf"a2fIo �o �&������!h����e�eo �Yo ~�k !L������GbQ;N z؏^b�2�o /9o U�2ShobwaxG`6�\o�wf��3e2ro�1 ��]n�O(� T�l5�^5�^5M�^5�^�zh��^ A�PrintC��rinPw�bj2oqd���0ʘ���������������������������������������rU��� ��������,� `��������������//(� `������������00� ` ������������1�Q///(� `������������08! `������������1��q////0I ` ������������1��///<q `������������1����/////<� `�������������1���/////,� `������������!//8� `������������1�Q!////( `������������9/09 ` ������������1Yq0a ` ������������!��///,� `������������1�//,� `������������1�//8� `������������1�Q!////8 `������������!1�Q////0) ` ������������1�Q///(Q `������������!/n����������������������������������rU��� ��� ����A4�� �����������������������������������������������������������������������������������������������������`��������rU��� ��������@n��������������������������������������������������������������rU��� �1�Y����A4�� �����������������������������������������������������������������������������������������������������`��������rU����~|   �Y� � � �9Y0 ��  0 ���  0 ���  0 ���  0 ���  0 ���  0 ��X  0 ��8  0 ��  0 ���  0 ��p  0 ���$  0 ���  0 ��@  0 ���  ��<:4�%D��X�%h�$ �h� dD���)h�D�J�$�%��D��X�%h�$ �h� dD�����C)h�D�5���p�x�(�l�h�D��0 ��   0 ��   0 ���        ����������������������������������������������������<�jx����H��#����������<���;!��M�9@�(c� �F�;��nE��"�͆�f������������x�;��nE��"�͆�f�;!��M�9@�(c���ME�����������������������������������������������������������������������������������������������������������������������������������������������(SL����S����S�����6"������N0{00020820-0000-0000-C000-000000000046}��������������(����������%����H���������`�������������� %��6����������������������� %����`��������������������������������������������h8@``����������������������0���[$*\Rffff*0?5c7c0590�����4����������x������Attribute VB_Name = "She@et1" �Bast0{000�20820- C$0046} |Global!�Spac�False dCreatablPre declaId�Tru BExposeTemplateDeriv$�Bustom izD2��rU��� ��������@n��������������������������������������������������������������t��6D ��zL��#����������<��+b{�n$xL��@s�sl~�FE_ �4� G��2G��������������xE_ �4� G��2G��+b{�n$xL��@s�sl~��ME�������������(���������������������������������������������������������������������������������������������������������������������������������SL����S����S�����6"����������������� ��������� ����<,��<0��<4��<8��<<��<������N0{00020819-0000-0000-C000-000000000046}����` $����`����������k@���� �i�&���� �� ��`�cki�(������ ����������������������������%���������������������������� %�� ���������������������� %����`����@�������������������������������������������������������������������������������������������������������������������������������������������.0,*24@��l��� �� @��\��� �� @��0L��� �� @��x<��� �� @��H,��� �� @��`��� �� @��� ��� �� @������� �� @������� �� @������� �� @������� �� @��8���� �� @������ �� @�� ���� �� @��P���� �� @���|��� �� @��hl��� �� @���\��� �� @���L��� �� @���<��� �� @���,��� �� @������ �� @�� ��� �� @��(���� �� @��@���� �� @���������� �� @���������� �� ���������������������������������������������@��������������������������[$*\Rffff*0=5c7c058e*\R0*#f*\R0*#1*\R0*#17$*\Rffff*0>5c7c058e*\R0*#2$*\Rffff*0<5c7c0566�����4�� "����� �� ���� ��� ���������� ��)���Ƿ�ȷ�Ͻ�Ҫ�����excel���籣�棬�����"$.�ȷ���"$.�,� $.�&ϵͳ��Ҫ���м��У�飬�粻���棬�����"$.�ȡ���"$.�? 0$,'* * 2�A@4d��P�'(k��@o��8����0����ڱAttribute VB_Name = "ThisWorkbook" �Bas�0{00020P819-0C$0046}� |Global�Spac�False dCreatablPred�eclaId�Tru BExposeTemplateDeriv�Bustomi6zD2P�� Sub ��_BeforeSave(@ByVal AsUI As Boolean, _ Can(cel�)� is��Button�kMsgBox("���Ƿ�ȷ�Ͻ�Ҫ��@���ex� �����������" & �Chr(34)��"ȷ�� ,��10ϵͳ���м��У��A�������?", 0vbOKC6�3If L4� Then�B�D��������A�������ӡ��Π���Ϣ� E‰gP��P= fE nd If� A�i ��������<�jx������#����������<����C�` F�7���� �F�����G�NX:�5�������������x�����G�NX:�5���C�` F�7������ME�����������������������������������������������������������������������������������������������������������������������������������������������(SL����S����S�����6"������N0{00020820-0000-0000-C000-000000000046}��������������(����������%����H���������`�������������� %��8����������������������� %����`��������������������������������������������h8@``����������������������0���[$*\Rffff*0B5c7c0590�����4����������x������Attribute VB_Name = "She@et6" �Bast0{000�20820- C$0046} |Global!�Spac�False dCreatablPre declaId�Tru BExposeTemplateDeriv$�Bustom izD2��<�jx���h���#����������<��.�y.�E$L�(Q{�Q� �F��9��S�H���Ʈ��������������x��9��S�H���Ʈ��.�y.�E$L�(Q{�Q���ME�����������������������������������������������������������������������������������������������������������������������������������������������(SL����S����S�����6"������N0{00020820-0000-0000-C000-000000000046}��������������(����������%����H���������`�������������� %��"����������������������� %����`��������������������������������������������h8@``����������������������0���[$*\Rffff*0A5c7c0590�����4����������x������Attribute VB_Name = "She@et5" �Bast0{000�20820- C$0046} |Global!�Spac�False dCreatablPre declaId�Tru BExposeTemplateDeriv$�Bustom izD2�����L�����+��n����������������������������x��ME�����������������������������������������������������������������������������������������������������������������������������������������������(SP����S����S����S�������0{AA81678D-838F-49AD-9988-2FCE17D7D7F9}{321E2A21-ED94-4DA1-B935-BB1C6DBDFCE1}����� @����������������������������� ���������������������������������������������������%����������������������� %��������@���������������������@�����������������������������������������������������������������[��� � "��� �0� ����� 8"�H�P� X�h� ��������x�ȡ�����'l ��B@`wo��H�ȷ��(�@ 'l ��B@����o����������O�Attribute VB_Name = "ShowForm"  �Bas|0{AA81678D-838F-49AD-9988-2@FCE17DF9}{321E2A21-ED94-4DA1-B935-BB1C6(DBDX} dGlobal�Spa�coFalse �CreatablPredeclaId�Tru� BExpose0Templat@eDeriv�C�ustomiz�D'ȡ�� P�� Sub CancelButton_Click() notContin@ueBool�T � Me.HidZEnd! 'ȷ�� ,on�fՏ,�-Fl��;/�������������������������������������������������������������H�L����O���ʘ����������������������������x��ME�����������������������������������������������������������������������������������������������������������������������������������������������(SP����S����S����S�������0{77CB7400-595B-4BE9-9734-026DBFFD4D41}{60278416-61C6-456E-AB92-B85B62E93E28}����p���0��(����������%�����������X��0�������� %����������������������������������������0����������������������������������������������������`���[�����������x�����Attribute VB_Name = "PrintForm" " �Bas�0{77CB7400-595B-4BE9-9734-026DBFFD4D41}{60278416-61C6-456E-AB92-B85B62E93E28} dGlob�al�Spaco False �Cr@eatablP�redeclaDId�Tru BE`xpose0TemplateDeriv�Cus tomiz�D������������������������������������������������rU��� ��������$�`������������$�`������������n����������������������������������������������������rU��� � � ) � � � 1 Q  �� A i �����+4� a� ������������ ` �����������������������������������������������������������������������������������������������������������������������������������������������������������������������������x��"l� �"� � �� �"�� �"\� '��'��' ��:\�l���L�:<���,���� �:������������:����������:|���l�\���L�:<���,�^�z6$l�L�,�� �������������l�\�L�,� �����u���� ���� �$� Tl�L�,�� �������������l�\�L�,� �����4X����rU��� ��������@,`����������#n�������rU����~| ����k��������������������������������������������rU��� ��������0�` ������������1��///(�`������������!/(�`������������!/(�`������������!/,!`�������������Q(I`������������!/(q`������������!/(�`������������!/(�`������������!/,� `������������!�//( `������������!/(9 `������������!/(a `������������!/(� `������������!/(�`������������!/,�`�������������//,`�������������//,)`�������������//,Q`������������!)//,y`������������!)//,�`������������!)//,�`������������!)//( `������������!/(1`������������!/(Y`������������!/(�`������������!/(�`������������!/0�` ������������Q�Q///(�`������������!/n�������������������rU���~| ��������������������������������������������������������������������������������������������������������������������     \����������������rU����~~{ ������������      ���� ���� � SaveAsUICancel �rowIndex columnIndexcontent sheetIndexcolIndex errorInfo checkMethoderrorMsgtypeValisValidateCountregvalue sheetIndex2keyWordkbnvalue1flagrowNumIDNumberfunctionArgsArrvalue2 functionArgsIdNum�����������������������������������rU����~| p������������������������������������������������������rU��� ���������$� n����������������������������������������������rU��� 0i������A4�� �����������������������������������������������������������������������������������������������������`��������rU��� ��������@n��������������������������������������������������������������rU��� ��������$�`������������n���������������������������������������������������������������x��ME���������������������������������������������������������������������������������������������������������������������������������������������(6 ����<��< ��<����������� <����`�������������������������������0�:������x��������������%����������������������������������������������������P����������������������������@���[$*\Rffff*0D5c7c0597���"�� � (� H�h����x���ѧ����Ϣ��ӡģ��$>(@�ѧ����Ϣ��ӡģ��$>B@B��ѧ����Ϣ��ӡģ��$>(@o������������Attribute VB_Name = "����Ԥ��" Sub Browse_Print () Worksheets("ѧ����Ϣlģ��").Visibla�True"d^P@review2cEnd � ��ThisWorkbookThisWorkbookSheet1Sheet1���ߺ����]wQ�Qpe�����XfУ�麯��!h���Qpe������;N z�^ShowFormShowForm��ӡԤ��SbpS��ȉPrintFormPrintFormSheet5Sheet5Sheet6Sheet6���������������������������������������������������������� ���� �FMicrosoft Excel 2003 ������Biff8Excel.Sheet.8�9�q�������������������������������Oh��+'��0�@HTd | ���kezeMicrosoft Excel@���&��@6�������������������������������������������������������������՜.��+,��0�HP X`hp x �� �о������ҽ�ѧ������ҵ����������� ������Ϣdc ������ ������Χ���������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������� ����������������!"#$%&'()*+,-./01����3456789:;<=>?@ABCDE����GHI����K����MNO����QRSTUVWXYZ[\]^_`abcdefg����ijklmnopqrstuvwxy����{����}~���������������������������������������������������������������������������������������������������������������������������������������������������     ������������ !"#$%&'()����+,-./����123456789����;����=>����@AB����D����F����HIJKLMNOPQRSTUVWX����Z[\��������_����abc����efgh������������������������������������������������������������������������������������������������  !"#$%&'()*+,-./0123456789:����<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[����]^_`abcdefgh����jklmnopqrstuv����xyz{|}~�����������������������������������������������������������������������������������������������������������������������������������������     ���� !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRS����UVWXYZ[\]^_`a����cdefghijklmnopqrstuvwxyz{|}~���������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������