求一段VB代码，进来帮帮助。

Question

我的程序只有一个FORM，想程序实现
如果当前程序是已经开打的就不再打开，如果还没有打开的才打开。
求这个的代码，能实现我的要求的分全给提供者。

Answer 1

Option ExplicitPrivate Sub Form_Load()
 If App.PrevInstance Then
    End
 End If
End Sub

Answer 2

Private Sub Form_Load()
    If App.PrevInstance = True Then
        MsgBox "系统已启动，请按ALT+TAB键查找"
        Unload Me
        Exit Sub
    End If    
    
End Sub