如何在 VBA / VB.NET 中逃脱无限循环

Question

这是一个有点愚蠢的问题，但我找不到任何答案。
可悲的是，我犯了一个非常可耻的错误，我不小心创建了一个无限循环。

Private Sub Textbox1_Change()
    Do While Len(Trim(Textbox1.Text)) > 4
       MsgBox "Please enter your birthyear in format of ####"
    Loop
End Sub

因为我想强制用户只输入 4 位数字，显然没有意识到我做了一个无限循环MsgBox，因为 一旦到达字符就不可能关闭，即使在您 QueryClose/OK 弹出的那个之后，>4它也会继续创建新的es MsgBox。

有没有办法可以取消它，而不完全关闭 Excel？可悲的是，我什至无法暂停以MsgBox模式形式打开的代码，也无法单击任何编辑器元素。

Answer 1

只需按Ctrl+ Alt+即可Pause/Break。

这会打断你的日常生活。

该Pause/Break按钮标准位于PageUp大多数键盘上的按钮上方