Truco de Visual Basic 6.0 - Comprobar si el programa ya está en ejecución

Crear un nuevo proyecto e insertar el siguiente código:

Private Sub Form_Load()
If App.PrevInstance Then
Msg = App.EXEName & ".EXE" & " ya está en ejecución"
MsgBox Msg, 16, "Aplicación."
End
End If
End Sub