Question

VB 编译后的EXE文件，同时多次点击后，在任务管理器中发现有多个EXE相同文件在运行。什么方法可避免？

如果是精确双击，任务管理器仅有一个EXE文件在运行。如果是多次双击，在任务管理器中发现有多个EXE相同文件在运行。什么方法可避免？

Answer 1

Form_load过程或Sub Main放入下列语句，防止程序多次启动：
If App.PrevInstance Then
MsgBox ( "程序已经运行，不能再次装载。 "), vbExclamation
End
End If

Answer 2

If App.PrevInstance = True Then
End
End If

Answer 3

Private Sub Form_Load()
If App.PrevInstance Then End
End sub