如题
小弟这里，谢谢了先。

如
SUB SAMPLE()
A=1
GOSUB DD
GOSUB CC
EXIT SUB
DD:
A=3
RETURN
CC:
A=2
RETURN
END SUB
最终的A的值应该是多少呀

[[it] 本帖最后由 wqaiyou 于 2008-10-20 14:09 编辑 [/it]]

就下面这个程序,我在前面标了执行的顺序

Option Explicit
Dim a As Integer
    Private Sub Command1_Click()
 1:  SAMPLE
 14:  Debug.Print a
 15:    End Sub

 2:   Sub SAMPLE()
 3:   a = 1
 4:   GoSub DD
 8:   GoSub CC
 12:  Exit Sub
 5:   DD:
 6:    a = 3
 7:    Return
 9:   CC:
 10:    a = 2
 11:    Return
 13:   End Sub

然后呢,a=?你应该可以知道了吧

PS: 第一次知道VB还能这样写的,估计是BASIC的语法吧,不过建议你忘掉这种写法,这种写法一点好处都没有

exit sub 是退出或者結束某個段的語句，不將再次執行下面語句
return 是在過程中跳到另一個程序繼續執行

这是很古老的BASIC 里的命令.如长城BASIC ,BASICA, TURTO BASIC 里的命令,
现在无论都不要用它.

到 Qbasic 里就不推荐用了.虽然一直还支持.

[[it] 本帖最后由 风吹过b 于 2008-10-20 16:12 编辑 [/it]]

哦知道了，谢谢大家了，好久没看VB了突然看到那麽段程序，所以不知道怎么看了都。
谢谢大家