[求助]如何控制同一个项目只能打开一次
如何控制同一个项目只能打开一次我做了一个项目,就是不能控制用户的打开次数。在同一个计算机上,能够同时打开多个同样的项目。
[此贴子已经被作者于2006-7-22 9:42:11编辑过]
Private Sub frmRDsend_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
If UBound(Diagnostics.Process.GetProcessesByName(Diagnostics.Process.GetCurrentProcess.ProcessName)) > 0 Then
'防止程序运行多个实例
MsgBox("雷达发报程序已经运行了!!!")
Application.Exit()
Else
Call myStart()
End If
End Sub