dim conts as boolean '全局变量:是否继续循环
sub loops() '死循环子程序dodoeventsif conts=false then exit subloopend subprivate sub timer1_timer()
if (你想让他执行循环) and conts=false then conts=true:loops '这样如果没开始循环,就开始执行循环,如果已经开始就跳过
if (你想结束循环) then conts=falseend sub这样,你可以在Timer1的过程中加入判断,当结束时,因为改变了conts的值,程序执行至判断行自然就退出了。
Doevents语句可以释放Cpu给程序的其他部分
以上就是关于如何在VB中退出循环程序求解全部的内容,包括:如何在VB中退出循环程序求解、、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)