如果已经运行，则阻止应用程序启动

Question

我的应用程序需要检查并在启动时查看它是否已在运行，因此它不会再次打开。我有一个系统托盘图标，可以使应用程序可见= 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

VB.NET |的WinForms

Answer 1

此功能已内置于Windows窗体中。只需转到项目属性，然后单击“Single Instance Application”复选框。您还可以处理StartupNextInstance事件。