求：VB goto语句用法?

Question

求：VB goto语句用法

Answer 1

行号和行标签（应该就是你说的标号）其实是一样的。都是需要事先定义的。

Sub a()
If Date Mod 2 = 0 Then
GoTo 30 '跳到行号为30的代码行
Else
GoTo LineInput1 '跳到行标签为 LineInput1 的代码行
End If

10: MsgBox "10"
20: MsgBox "20"
30: MsgBox "30"
40: MsgBox "40"
50: MsgBox "50"
60: MsgBox "60"

GoTo LastLine '跳到行标签为 LastLine 的代码行

LineInput1:
InputBox "aaa"

LastLine:
End Sub

Answer 2

最好不要用这个goto语句，那是当年解释性语言的产物。现在都是结构化、面向对象的程序设计了。goto语句因为到处乱跳转而被淘汰了。

因为最开始的basic是自带行号的(可以设定开始的行号和每行增加的数)，所以可以不经预定义就可以跳转.