同一个程序在同一台机器上只允许被同时打开一个

Question

同一个程序在同一台机器上只允许被同时打开一个，我记得VB6是有一个函数或者关键字可以控制的，但是现在记不起来了，恳请兄弟说一下，谢谢了！

Answer 1

PrevInstance 属性
      返回一个值，该值指示是否已经有前一个应用程序实例在运行。
If App.PrevInstance Then
        MsgBox "已经有一个系统在运行!", vbOKOnly + vbInformation, "提示"
        End
 End If