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