Do While int1<100000 And SmartTags("break02") = True

'statements

int1=int1+1

SmartTags("int1") = int1

'Please replace all sequences which are enclosed with '_' by your own code.

If SmartTags("break02") = False Then

'statements

Exit Do

End If

'DoEvents  '这个DoEvents不能用，提示“未找到名称为的'DoEvents'的VB_script或HMI_Tag对象”

Loop

想要通过按钮使得 SmartTags("break02") = False ，然后退出循环。

但是DoEvents不能使用，点击按钮没反应，不能讲SmartTags("break02")置0.

如何解决这个问题，使用按钮退出当前循环。

大神帮忙解答一下，万分感谢！