主题：FOXTABLE有没有跳转语句?

就是有一段代码,在几个IF ..... END IF里面都用到,又比较长,如果能公用,使用跳转语句就好了.

Dim number As Integer = 1
Dim sampleString As String
If number = 1 Then
    GoTo Line1
End If
number =2
Line1:
sampleString = "Number equals 1"

Line1:

什么地方结束呀。用return吗？

运行提示"line1" 没有定义

line1后面有冒号

GoTo Line1

表示跳转到Line1标记，标记区分大小写，用冒号结尾。

Dim number As Integer = 1
Dim sampleString As String
If number = 1 Then
    GoTo Line1
End If
Line1:
sampleString = "Number equals 1"
Line2:
sampleString = "Number equals 2" 
output.show(sampleString)

Dim number As Integer
Dim sampleString As String
For number=1 To 2 Step 1
    GoTo Line1
    'GoTo Line" & number & "
    messagebox.show(sampleString)
    'messagebox.show(1)
Next

Line1:
sampleString = "Number equals 1"
Return
Line2:
sampleString = "Number equals 2"
Return

 

 

这个代码怎么没有反应呀？

我在使用GOTO时也发现问题,就是把要跳转的代码挪出去后,代码中涉及到的一些变量,运行时系统提示没有定义,而这些变量在跳转前都已经定义过了的.

请参考帮助“变量的作用范围”