VB如何使程序只运行一个实例
展开全部
设置程序启动项为sub main函数，建一个模块，里面写好main函数，如下：
Sub Main()
If App.PrevInstance = True Then
Call MsgBox("程序已经在运行", vbCritical)
End
End If
end sub
或者更简单点，在你启动时调用的窗体的form_load事件里最前面，加上If App.PrevInstance = True Then END就行
Sub Main()
If App.PrevInstance = True Then
Call MsgBox("程序已经在运行", vbCritical)
End
End If
end sub
或者更简单点，在你启动时调用的窗体的form_load事件里最前面，加上If App.PrevInstance = True Then END就行
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
