我做的VB程序，要让他在中途停止，有什么方法？

如果你是循环，可以用类似以下代码：

Option Explicit

Dim blnExit as boolean

Private Sub Command1_Click() '这段代码中循环相当于你要处理的事务
do while blnExit=false
DoEvents
loop
End Sub

Private Sub Command2_Click() '当点击这个按钮时就退出上面的循环（即你要处理的事务）
blnExit=true
End Sub

其它的也能用这样的思路。。

是不是调试程序进入死循环出不来了？在VB中按Ctrl+break(和pause在一起的键)，不行ctrl+alt+del

用跳出语句可以么？
EXIT ...

VB上的"运行"\"结束".

拿实例吧..都不知道你需要结束的是什么了..