避免VisualBasic程式重複執行

 如何避免程式重複執行？（偵測是否存在前一副本，若有，則結束目前新啟動的程式）。使用者在啟動程式後，有時會將程式縮小在工作列上，之後要用時，又會重新啟動一次程式，資料庫程式有時會因此造成資料錯亂！若您不希望使用者重複啟動程式，您可以使用 APP 物件來判斷，方法如下： 

Private Sub Form_Load()Sub Form_Load() 
If App.PrevInstance Then ''檢視前一版本 
MsgBox "此程式已經在執行中！", 48 
End 
End If 
End Sub