BeforeOpenProject事件:
Static mu As Object
Dim sucess As Boolean = Falsemu = new System.Threading.Mutex(True, "dsdfhdfghf", sucess)If not sucess Then MessageBox.Show("只能打开一次!") e.Cancel = TrueEnd If