欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

Exit 語句

退出 Do...Loop、For...Next、Function 或 Sub 代碼塊。

Exit Do

Exit For

Exit Function

Exit Property

Exit Sub

Exit 語句的語法有以下幾種形式：

語句	描述
Exit Do	提供一種退出 Do...Loop 語句的方法。只能在 Do...Loop 語句中使用。Exit Do 將控制權(quán)轉(zhuǎn)移到 Loop 語句之后的語句。在嵌套的 Do...Loop 語句中使用時，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 之后的語句。在嵌套的 For 循環(huán)中使用時，Exit For 將控制權(quán)轉(zhuǎn)移到循環(huán)所在位置的上一層嵌套循環(huán)。
Exit Function	立即從出現(xiàn)的位置退出 Function 過程。繼續(xù)執(zhí)行調(diào)用 Function 的語句后面的語句。
Exit Property	立即從所在的 Property 過程中退出。繼續(xù)執(zhí)行下面調(diào)用 Property 過程的語句。
Exit Sub	立即從出現(xiàn)的位置退出 Sub 過程，繼續(xù)執(zhí)行調(diào)用 Sub 的語句后面的語句。

下面例子舉例說明如何使用 Exit 語句:

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

請參閱

Do...Loop 語句 | For Each...Next 語句 | For...Next 語句 | Function 語句 | Sub 語句