本人设计一个程序：test.exe(vb6)，在xp系统下运行这个程序（人工打开）。在此程序没有关闭的情况下，人工再打开此程序，则由于此程序有一段能侦测到此程序已经运行就不再重复运行此程序的代码，所以此程序不能再打开运行。那么，此种功能的代码如何写？

具体的代码如何写？谢谢。

找到了：
Private Sub Form_Load()
  If App.PrevInstance = True Then
   Unload Me
  End If
end sub