防止程序同时多个启动的问题：如何在previnstance探测到程序已经启动的时候，调用启动了的那个程序？

Question

我暂时用的笨办法是下面的代码（在form-activate中）：
'防止程序同时多个启动
If App.PrevInstance = True Then
         Unload Me
         MsgBox "程序已经启动，请单击右下脚图标！", vbInformation + vbOKOnly, "消息"
         Exit Sub
   End If
请教高手：如何调用previnstance？

Answer 1

Private Sub Form_Load()
    If App.PrevInstance Then
        End'结束当前进程
    End If
End Sub

Answer 2

发消息，或Finwindow查找然后激活那个窗口

Answer 3

请问viena(维也纳nn实心木头人-石欠HYZ-JR2nd) ,能共享一下“findwindow”和“激活那个窗口”的具体代码吗？小弟很急！其他高手接着顶啊