关于单实例应用程序,该怎么解决

关于单实例应用程序
在程序事件里有MyApplication_StartupNextInstance事件,在此事件中写入结束代码可以避免程序多个实例运行,怎么实现如果本程序已经运行再次启动时自动激活已经运行程序的窗口?

------解决方案--------------------
Private Sub MyApplication_StartupNextInstance(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupNextInstanceEventArgs) Handles Me.StartupNextInstance
e.BringToForeground = True
End Sub