If App.PrevInstnace Then  
MsgBox "Ya está abierta esta aplicación"
End
End If