PRIVATE SUB FORMCLICK
FOR I = 3 TO
F=0
FOR J= 2 TO I-1
IF THEN
F=1
EXIT FOR
END IF
NEXT J
IF F=0 THEN
END SUB
微信扫码预览、分享更方便