Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If UBound(Diagnostics.Process.GetProcessesByName(Diagnostics.Process.GetCurrentProcess.ProcessName)) > 0 Then
MessageBox.Show("程序已经运行了")
End
End If
End Sub
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024