Visual Basic - ¡¡¡¡¡¡NECESITO AYUDA URGENTE!!!!!!

HOLA AMIGOS DEL FORO:
QUISIERA PLANTEARLES EL INCONVENIENTE QUE TENGO CON UNA SENCILLA APLICACION QUE HE CONFECCIONADO PARA UN CLIENTE:
LA APLICACION YA ESTA INSTALADA Y FUNCIONANDO; TIENE UN ACCESO DIRECTO EN EL ESCRITORIO PARA ACCEDER DE MANERA MAS RAPIDA; EL INCONVENIENTE SE PRESENTA CUANDO EL CLIENTE QUIERE ABRIR MAS DE UNA VEZ EL SISTEMA ATRAVEZ DEL ACCESO DIRECTO; ESTO TRAE COMO CONSECUENCIA QUE SE PRODUZCA UN ERROR EN TIEMPO DE EJECUCION Nº 3347 SI MAL NO RECUERDO QUE DICE QUE LA BASE DE DATOS YA ESTA ABIERTA.- COMO PUEDO SUBSANAR ESTE PROBLEMA A TRAVEZ DE CODIGO O DE CUALQUIER OTRA FORMA.-
DESDE YA MUCHAS GRACIAS POR SU ATENCION.-

Es necesario que lo abra mas de una vez la aplicación????
en tal caso manda un mensaje de que ya esta abierta la aplicación para que no te marque el error, sería en tu formulario principal:
Private Sub Form_Load()
If App.PrevInstance = True Then
MsgBox "Aplicación Abierta", vbInformation
End
End If
End Sub

Miguel:
Muchisimas gracias por tu consejo; lo voy a poner en practica.-
Un abrazo Adrián.-