怎么避免vb中重复执行同一个exe多次，造成系统任务栏重复

来源：百度知道 编辑：UC知道 时间：2024/06/04 04:46:58
怎么避免vb中重复执行同一个exe多次，造成系统任务栏重复
比如我做了个 工程.exe，我每次点击都弹出一个窗口，造成我在系统任务栏里面一个个增加，而实质上只需要一个。
能否作个判断，当一个程序在运行时，不新增进程？
谢谢啦~~~
楼下的能否说的清楚一点呀？？
能否列出具体的代码啊~~~~
小弟跪求了。。。。

Dim Response
If App.PrevInstance Then
Response = MsgBox("程序已经运行，不能再次装载!", vbOKOnly + vbExclamation, "警告")
end if
If Response = vbOK Then
Unload Me
Exit Sub
End If

直接在程序开始的时候得到进程列表。看看里面有没有你写的程序的进程。如果是由的话。就报错，说不能同时运行两个程序。或者是直接退出不就行了。
网上也有别的代码。自己搜搜，很多的。