Visual Basic - como verificar si una base de datos ya esta abiert

hola amigos, tengo un programa en visual basic, y por cuestiones de seguridad quiero hacer algo para que una vez abierto el sistema desde el acceso directo, ya no se pueda abrir 2 veces la misma ventana si le vuelvo a dar clic en el acceso directo, como el podria hacer para checar eso o que opcion puedo hacer aparte de checar si ya esta abierta la base de datos?

En el inicio de la aplicacion pon algo asi

If App.PrevInstance Then
Beep
MsgBox ("La aplicación " & Programa & " ya está en ejecución")
End
End If