nynw.net
当前位置:首页 >> VB中,GOTO语句 >>

VB中,GOTO语句

设定一个标号,然后直接goto 标号 比如 Sub GotoStatementDemo() Dim Number, MyString Number = 1 ' 设置变量初始值。 ' 判断 Number 的值以决定要完成那一个程序区段(以“程序标签”来表式)。 If Number = 1 Then GoTo Line1 Else GoTo Line2 L...

A:private sub command1_click()B:dim n as integer,s as stringC:n=1D:if n>1 then goto 11 else goto 12E:11:F:s="n大于1"G:goto 13H:12:I:s="n小于等于零"J:13:K:msgbox sL:end subgoto跳转的意思,代码编号A-L.方便为您解释: A...

行号和行标签(应该就是你说的标号)其实是一样的。都是需要事先定义的。 Sub a() If Date Mod 2 = 0 Then GoTo 30 '跳到行号为30的代码行 Else GoTo LineInput1 '跳到行标签为 LineInput1 的代码行 End If 10: MsgBox "10" 20: MsgBox "20" 30:...

在你要goto 的地方加标号,可以是数字或者字母,以冒号结尾做区别如Recycle:a=b+c……goto Recycle当运行到goto即会跳转到对应地方

On Error 语句 启用或禁用错误处理程序。 On Error Resume Next On Error GoTo 0 说明 如果在您的代码中未使用 On Error Resume Next 语句, 所发生的运行时错误 将显示错误信息,同时,代码的执行也随之终止。但是具体操作由运行代码的主机决定...

GoTo 语句 无条件地转移到过程中指定的行。 语法 GoTo line 必要的 line 参数可以是任意的行标签或行号。 说明 GoTo 只能跳到它所在过程中的行。 注意 太多的 GoTo 语句,会使程序代码不容易阅读及调试。尽可能使用结构化控制语句(Do...Loop、Fo...

用for循环: a=text1.text for i = 1 to listbox1.count fun=listbox1.list(i) if fun(a)=条件 then 满足条件后执行内容 exit for end if next i

在insert:前加一句 exit sub

用一个变量作为开关 if xxx then bln=true end if if bln=true then 15 行代码 end if

goto Num语句格式: goto 标号1 ...... ...... ...... 标号1: ...... ...... ...... Gosub 语句格式: gosub 标号2 语句1 ...... ...... ...... 标号2: ...... ...... ...... Return 两者的相同处,都可以实现转移;区别在于,Gusub语句可以带...

网站首页 | 网站地图
All rights reserved Powered by www.nynw.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com