[VB.Net]避免程式重複執行

最近使用圖控開發專案~偶爾還是想偷懶的想要用VBNet寫一些小程式來配合專案的執行


所以程式不想要有重複執行，於是找了些資料。
原來VB.Net內就已經有這個選項

其實也可以用程式與法來作判斷
參考網址:http://eos45.pixnet.net/blog/post/6508784

        '檢查程式是否已經開啟
        '取得目前程式的Process
        Dim thisProcess As Process = Process.GetCurrentProcess

 

        '以目前的process名稱去尋找目前電腦上所有執行的process
        '如果找到的數量超過 1 表示之前已經進行呼叫過
        Dim myProcess As Process() = Process.GetProcessesByName(thisProcess.ProcessName)
        If myProcess.Length > 1 Then

            '結束執行程式

            'MessageBox.Show("應用程式已開啟")

            'Return

            Exit Sub

        End If