vb 在form里做了一个很长的循环，怎么通过点击按钮终止循环

level 9

sfdksk 楼主

那个大侠解答下啊，最好举个例子我是菜鸟比较笨

2011年11月20日 07点11分 1

level 7

34mxd

Private DoStop As Boolean
Private Sub Command1_Click()
Do While DoStop = False
DoEvents
Loop
MsgBox "循环结束"
End Sub
Private Sub Command2_Click()
'终止
DoStop = True
End Sub

2011年11月20日 07点11分 2