Vb.net 图像未显示-程序冻结

节目开始了。当我点击“开始”按钮时，原来的表单就如我所希望的那样消失了，但随后它就挂在那里了。没有图片显示。CPU温度升高，声音变大。它冻结了，我有时不得不按住CTRL+ALT+DELETE键才能退出程序

---

---

您有一对永不停止的Do While循环（Do TILL（Num=10）、Do While（Flag=0）），因此当程序点击它们时，它将进入一个永无止境的“无限循环”

你写道：

Do While (Flag = 0) Loop 执行时（标志=0） 环 。。。但是，在这两行之间需要一些代码来将Flag的值更改为0以外的值，否则计算机无法满足该条件，并且它将永远不节俭地循环。 例如 此假设示例将等待用户按Escape键：

Do While (Flag = 0) If UserPressedEscape() Then Flag = 1 Loop 执行时（标志=0） 如果用户按Escape（），则Flag=1 环 CPU会加热，冷却风扇会全速运转，因为程序正在疯狂循环，使用100%的CPU时间

（我假设您希望程序中的事件处理代码在循环运行时“在后台”执行，但实际上计算机一次只做一件事，因此它永远不会退出循环以运行事件处理程序。如果程序是“多线程的”那么这是可能的，但它的编写方式是“单线程”的，因此程序一次只按顺序执行一件事情，因此它永远不会退出循环）

Do While (Flag = 0) If UserPressedEscape() Then Flag = 1 Loop