怎么做到生成的EXE文件不能多开？
一般生成的可执行文件 你开几个就开几个 怎么做到 只能打开一个 如果多开 就显示 当前打开的
以下是引用Joforn在2007-3-16 22:18:08的发言：
Private Sub Form_Load()
If App.PrevInstance Then
MsgBox "对不起，你已经打开了一个" & App.EXEName & "程序，本程序不能重复运行！", vbCritical, Me.Caption
Unload Me
End If
End Sub
Private Sub Form_Load()
If App.PrevInstance Then
MsgBox "对不起，你已经打开了一个" & App.EXEName & "程序，本程序不能重复运行！", vbCritical, Me.Caption
Unload Me
End If
End Sub
就这样？？不行哦！
