[求助]學習VBS，guotx2010能提供跳出內(nèi)部循環(huán)的例子嗎？　[金字塔]

有時候，你并不想等到循環(huán)自己結(jié)束，可能是用戶輸入了錯誤的數(shù)據(jù)，過程遇到了錯誤或者可能是任務已經(jīng)完成并且沒有必要作更多的循環(huán)。你可以提前跳出循環(huán)，而不必等到條件正常結(jié)束。VB有兩種Exit語句：

n         Exit For語句用來提前退出For…Next或者For Each…Next循環(huán)

n         Exit Do語句立即退出任何VBA Do 循環(huán)

下面的過程示范如何使用Exit For語句提前跳出For Each…Next循環(huán)：

1.       在當前模塊里輸入下列過程：

Sub EarlyExit()

Dim myCell As Range

For Each myCell in Range("A1:H10")

If myCell.Value = "" Then

myCell.Value = "empty"

Else

Exit For

End If

Next myCell

End Sub