static mu As object Dim sucess As Boolean = False mu = new System.Threading.Mutex(True, "dsdfhdfghf", sucess) If not sucess Then MessageBox.Show("程序已经在运行,不能重复打开!", "提示",MessageBoxButtons.Ok,MessageBoxIcon.Warning,0, Windows.forms.MessageBoxOptions.ServiceNotification) e.Cancel = True End If