如何检测vb2005程序已经运行

为了防止同一个vb2005应用程序被运行多次，如何在测试该程序已经被运行？？ --------------------编程问答-------------------- 项目——属性——生成单个实例应用程序 --------------------编程问答-------------------- bool isrun;
Dim mutex As New System.Threading.Mutex(True, Application.ProductName, isrun)
If isrun Then
Application.EnableVisualStyles()
Application.SetCompatibleTextRenderingDefault(False)
Application.Run(New FrmMain())
Else
MessageBox.Show("程序已经运行", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information)
Application.[Exit]()
End If

补充：.NET技术 ,  VB.NET