Microsoft(R) Visual Basic(R) Scripting Edition Exit 语句 | 语言参考 起始页|版本 1

请参阅

##### 描述

> 退出 Do...Loop、For...Next、Function 或 Sub 代码块。

##### 语法

> Exit Do

> Exit For

> Exit Function

> Exit Sub

> Exit 语句的语法有以下几种形式：

> 语句 | 描述
> Exit Do | 提供一种退出 Do...Loop 语句的方法。只能在 Do...Loop 语句中使用。Exit Do 将控制权转移到 Loop 语句之后的语句。在嵌套的 Do...Loop 语句中使用时，Exit Do 将控制权转移到循环所在位置的上一层嵌套循环。
> Exit For | 提供一种退出 For 循环的方法。只能在 For...Next 或 For Each...Next 循环中使用。Exit For 将控制权转移到 Next 之后的语句。在嵌套的 For 循环中使用时，Exit For 将控制权转移到循环所在位置的上一层嵌套循环。
> Exit Function | 立即从出现的位置退出 Function 过程。继续执行调用 Function 的语句后面的语句。
> Exit Sub | 立即从出现的位置退出 Sub 过程，继续执行调用 Sub 的语句后面的语句。

> 下面例子举例说明如何使用 Exit 语句:

>     Sub RandomLoop
>       Dim I, MyNum
>       Do                           ' 设置死循环。
>         For I = 1 To 1000          ' 循环 1000 次。
>           MyNum = Int(Rnd * 100)   '产生随机数。
>           Select Case MyNum        '求随机数的值。
>             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

(C) 1998 Microsoft Corporation. All rights reserved. Terms of Use.