Visual Basic.NET - una instancia

¿Como haríais para que solo se pudiese ejecutar una instancia de un programa?. Es decir, al tener un programa abierto e intentar abrirlo otra vez, de un mensaje informando que solo se puede tener una instancia abierta de ese programa.

Gracias

Prueba implementando esta función:

Function PrevInstance() As Boolean
Dim proceso As System.Diagnostics.Process
Return proceso.GetProcessesByName(proceso.GetCurrentProcess.ProcessName).GetUpperBound(0) > 0
End Function

Un saludo.

Muchisimas gracias amigo