怎么才能防止VB编写好的应用程序被用户多次运行？

[dragonsou]

怎么才能防止VB编写好的应用程序被用户多次运行？

[TechnoFantasy]

在程序启动时通过
App.PrevInstance
语句判断是否已经运行，如果已经运行就退出当前的程序

[ladofwind]

If App.PrevInstance Then
MsgBox ("程序已经运行，不能再次装载。"), vbExclamation
Unload Me
End If

[88480]

在load事件中用
sub from_load()
if App.PrevInstance=true then
exit sub
end if
.......
.......
.......
end sub

[little_hero]

加分

[bdzwc]

APP.PREVINSTANCE

[langzhi]

相同的答案最好不要出现！反正又不得分。

[Mike_sun]

App.PrevInstance

[little_hero]

If App.PrevInstance Then
MsgBox "xxx已经运行!", vbOKOnly, "xxxxxx"
End
End If