在VB中,如何强制退出循环结构

 我来答
zdingyun
2015-12-27 · 知道合伙人软件行家
zdingyun
知道合伙人软件行家
采纳数:15429 获赞数:48174
1982年上海业余工业大学化工系毕业 现退休

向TA提问 私信TA
展开全部

VB可使用Exit语句可强制退出循环结构。

Exit 语句,退出 Do...Loop、For...Next。 

语法

Exit Do

Exit For

Exit 语句示例

本示例使用 Exit 语句退出 For...Next
循环、Do...Loop 循环及子过程。

Sub ExitStatementDemo()
Dim I, MyNum
   Do            ' 建立无穷循环。
      For I = 1 To 1000   ' 循环 1000 次。
         MyNum = Int(Rnd * 1000)   ' 生成一随机数码。
         Select Case MyNum   ' 检查随机数码。
            Case 7: Exit For   ' 如果是 7,退出 For...Next 循环。
            Case 29: Exit Do   ' 如果是 29,退出 Do...Loop 循环。
            Case 54: Exit Sub   ' 如果是 54,退出子过程。
         End Select
      Next I
   Loop
End Sub
匿名用户
2013-07-18
展开全部
Dim IFStop As Boolean '//定义是否停止

Private Sub Command1_Click()
Dim i As Integer
For i = 0 To 10000
If IFStop = False Then '//如果IFstop为False时,既不停止时...
List1.AddItem i
DoEvents
Else '//如果IFstop为True时,既停止时...
Exit For '//退出循环
End If
Next i
End Sub

Private Sub Command2_Click()
IFStop = True '//停止
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
匿名用户
2013-07-18
展开全部
exit 循环语句

比如

for i = 1 to 2

exit for

next i
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
匿名用户
2013-07-18
展开全部
do...loop 用exit do
for...next 用exit for
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式