我的应用程序需要检查并在启动时查看它是否已在运行,因此它不会再次打开.我有一个系统托盘图标,可以使应用程序可见= False.效果很好.但是,如果应用程序已在运行,我需要确保用户查看notifyicon的系统托盘.
Private Sub mainWindowSmall_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim p() As Process
p = Process.GetProcessesByName("TSC Tool Box")
If p.Count > 0 Then
MessageBox.Show("The TSC Tool Box is already running. Check System tray!", _
"Warning !!!", MessageBoxButtons.OK, _
MessageBoxIcon.Error, MessageBoxDefaultButton.Button2)
Me.Close()
Else
totalOnLoad()
End If
End Sub
Run Code Online (Sandbox Code Playgroud)
VB.NET | 的WinForms
Joe*_*orn 12
此功能已内置于Windows窗体中.只需转到项目属性,然后单击"Single Instance Application"复选框.还有一个可以处理的StartupNextInstance事件.
归档时间: |
|
查看次数: |
14666 次 |
最近记录: |