VB,不退出程序,如何强制退出DO循环。

发布网友发布时间：2022-04-23 22:56

共5个回答

热心网友时间：2023-10-12 21:27

个人意见，因你提供的说明不详细
有2个疑点：
1、一般do 循环是完全执行完了，再执行其他的代码，你应该是没法在do循环的过程中再执行其他的代码，但具体情况具体分析(如循环中有判断等待就另说)，这没详细说。
2、何谓强制

个人认为可以添加一个全局变量来中断循环。
'在通用---声明中添加一个全局变量
Public Point As Boolean
'----------------------
Private Sub Form_Load()
Point = False
End sub
'----------------------
Do While condition
Statements
if Point=True then
exit do
end if
Loop
Point=False
'----------------------
Private Sub Command1_Click()
Point=True
End sub

热心网友时间：2023-10-12 21:27

一般情况下，程序进入循环后是不能随便停止的，但是，如果你在循环体中加入一句代码DoEvents就不同了，这样，程序可以随时停止或者进行其它工作。

热心网友时间：2023-10-12 21:28

在循环内加判断语句，即如果你按了某按钮，则执行 exit do操作

热心网友时间：2023-10-12 21:28

楼上正解

热心网友时间：2023-10-12 21:29

exit do