Exit 語(yǔ)句退出 Do...Loop、For...Next、Function 或 Sub 代碼塊。 Exit Do
Exit For
Exit Function
Exit Property
Exit Sub
Exit 語(yǔ)句的語(yǔ)法有以下幾種形式: 語(yǔ)句 | 描述 |
---|
Exit Do | 提供一種退出 Do...Loop 語(yǔ)句的方法。只能在 Do...Loop 語(yǔ)句中使用。Exit Do 將控制權(quán)轉(zhuǎn)移到 Loop 語(yǔ)句之后的語(yǔ)句。在嵌套的 Do...Loop 語(yǔ)句中使用時(shí),Exit Do 將控制權(quán)轉(zhuǎn)移到循環(huán)所在位置的上一層嵌套循環(huán)。 | Exit For | 提供一種退出 For 循環(huán)的方法。只能在 For...Next 或 For Each...Next 循環(huán)中使用。Exit For 將控制權(quán)轉(zhuǎn)移到 Next 之后的語(yǔ)句。在嵌套的 For 循環(huán)中使用時(shí),Exit For 將控制權(quán)轉(zhuǎn)移到循環(huán)所在位置的上一層嵌套循環(huán)。 | Exit Function | 立即從出現(xiàn)的位置退出 Function 過程。繼續(xù)執(zhí)行調(diào)用 Function 的語(yǔ)句后面的語(yǔ)句。 | Exit Property | 立即從所在的 Property 過程中退出。繼續(xù)執(zhí)行下面調(diào)用 Property 過程的語(yǔ)句。 | Exit Sub | 立即從出現(xiàn)的位置退出 Sub 過程,繼續(xù)執(zhí)行調(diào)用 Sub 的語(yǔ)句后面的語(yǔ)句。 |
下面例子舉例說明如何使用 Exit 語(yǔ)句: Sub RandomLoop
Dim I, MyNum
Do ' 設(shè)置死循環(huán)。
For I =1 To 1000 ' 循環(huán) 1000 次。
MyNum =Int(Rnd * 100) ' 產(chǎn)生隨機(jī)數(shù)。
Select Case MyNum ' 求隨機(jī)數(shù)的值。
Case 17: MsgBox "Case 17" Exit For ' 如果是 17 ,退出 For...Next 。
Case 29: MsgBox "Case 29" Exit Do ' 如果是 29 ,退出 Do...Loop 。
Case 54: MsgBox "Case 54" Exit Sub ' 如果是 54 ,退出 Sub 過程。
End Select Next Loop End Sub
要求版本 1 請(qǐng)參閱Do...Loop 語(yǔ)句 | For Each...Next 語(yǔ)句 | For...Next 語(yǔ)句 | Function 語(yǔ)句 | Sub 語(yǔ)句 返回首頁(yè) |