EXIT SUB°ÝÃD

basarasy

½Ð°Ý¤j¤j¦³¤°»ò¤èªk¥i¥H1¦¸¹L¸õ¥X©Ò¦³SUB?
eg.  ¦³3­ÓSUB   A,B©MC

SUB  A()
B
C
END SUB

¦³¤°»ò¤èªk¥i¥H¬OB¸õ¥X©Ò¦³SUB(¸õ¨ìAªºEND SUB),¤£RUN  SUB C?

cai168

thank you§Aªº¦^µª¾Ç²ß¤F

basarasy

¦^´_ 9# Min

ÁÂÁ´£ÂI.
    ¦]¬°§Ú¦³2­Ó«ö¶s
1­Ó¬O¥ÎSUB A
1­Ó¥ÎSUB B
¦³³¥ªF¦è¥u·Q¦bSUB B°µ
©Ò¥H¤~¥Î ENDªº¤èªk.

Min

®¤§Ú¦h¼L...
¶XµÛµ{¦¡ÁÙ¨S¶V¼g¶V¤j®É »°§Ö¾É¥¿!
ª½±µ¥Îend¬O¥i¥Hµ²§ô¾ã­Óµ{¦¡¨S¿ù ¦ý³o¦³ÂI.....¤£§´!
¸û¥¿²Îªº¤è¦¡¦]¸Óreturn¦^¨Ómain(¤]´N¬O±zªºsub a)
Åýa¨Ó¨M©w¬O¤£¬OÁÙ­n¶]sub b©Îsub c...
³Ì«á¤´¬O¥Ñsub aµ²§ôµ{§Ç.

basarasy

¦^´_ 7# GBKEE


    ÁÂÁ¤j¤j .
­ì¨Ó¥u¥Îend ´N¥i¥H¥X©Ò¦³sub ><

GBKEE

¦^´_ 6# basarasy
§A¦b°õ¦æµ{§ÇA() ªº¹Lµ{¤¤°õ¦æ¨ìµ{§ÇB()  ¬°¤@­Óµ{¦¡°Ï¶ô
µ{§ÇB() ¤¤ªº If [A1] = 1 Then
                      Exit Sub  '<-- ¥u·|Â÷¶} µ{§ÇB()
                     End If
¦pµ{§ÇB()¥Î   If [A1] = 1 Then
                            End  '<-- ·|µ²§ô ©Ò¦³µ{§Ç°Ï¶ô    (  µ{§ÇA() -> ¶}±Òµ{§ÇB()  )            
                     End If

basarasy

RUN a   

B1  C1 ©MA2 ¤£·|¥XªF¦è.

¦³¤°»ò¥yªk¥i¥H ¦b   ¤lSUB¸õ¥X©Ò¦³SUB. OR  °±¤î©Ò¦³SUB.

et5323

SUB  B
IF  [A1]=1 THEN
end (³o­Ó¦a¤è·Q¥X©Ò¦³SUB)
END IF
XXXXXXX
XXXXXXX
END sUB

oobird

SUB  B
IF  [A1]=1 THEN
EXIT SUB (³o­Ó¦a¤è·Q¥X©Ò¦³SUB)
else
XXXXXXX
XXXXXXX
end if
END sUB

basarasy

¦^´_ 2# oobird


    ¤£¯à³o¼Ë.
¦]¬°  
SUB  B
IF  [A1]=1 THEN
EXIT SUB (³o­Ó¦a¤è·Q¥X©Ò¦³SUB)
END IF
XXXXXXX
XXXXXXX
END UB

A1 <> 1 ´N·|RUN   XXXX©M SUB C.