mybreak:Do While 条件 DoEvents '这里不加DoEvents有蔽烂时会跳出困难 Gosub mybreak 'Goto语句也行，我哗缓喜欢用Gosub跳到标签Loop'乱并模Exit Do语句会中断Do循环继续执行后面的语句，如果断点在前面还得用Gosub或者Goto
exit dogoto
用GOTO跳转语句就可以了额。
exit do 实现中断
