vba goto语句范例

“Go to ”就是去到哪儿的意思。Go to 语句是将程序转到指定的标签的语句位置，然后继续往下执行。

Go to 语句通常用来作错误处理。下面为大家介绍该语句的示例。

下面的代码功能是：求1到100自然数之和。

Dim Lsum As Long, i As Long

i = 1

x: "为go to 语句设置的标签，必须以英文状态下的冒号结尾

Lsum = Lsum + i

i = i + 1

If i <= 100 Then GoTo x "如果i<=100,则程序跳到标签X处

MsgBox "1到100的自然数和为：" & Lsum

所属专题:

如果您觉得本文或图片不错，请把它分享给您的朋友吧！