在需要的地方加
End
直接退出程序
或者
System (此处填进程返回值)
Stop
都行
当然,最好考虑关闭自己的所有窗口 使用Unload Me'点自己的关闭按钮。
如果你不需要窗体,删掉他新建模块用
Sub Main()
'...
End Sub
执行完自动退出。
当然 调ExitProcess也是个办法,但是你真的希望连着VB的编辑器一起退出吗?
如果你不需要VB的编辑器,干脆把你的代码编译成EXE,想用多少遍用多少遍,还快。
调用API函数ExitProcess结束进程
声明函数:
Public Declare Sub ExitProcess Lib "kernel32" Alias "ExitProcess" (ByVal uExitCode As Long)
调用:
ExitProcess(0)
代码很长,我以前编写过,要用API函数。