Visual Basic - salir de programa

Life is soft - evento anual de software empresarial
 
Vista:

salir de programa

Publicado por raul (60 intervenciones) el 04/09/2001 03:38:11
Hola a todos,
Necesito saber como salir del programa usando la tecla escape: tengo la siguiente sentencia, no tengo barra de titulo en form.

Private Sub cUsuario_KeyPress(KeyAscii As Integer)
If KeyAscii = 27 Then
----- lo que necisto lo que va aqui como lo hago ???
End If
If KeyAscii = 13 Then
cClave.SetFocus
End If
KeyAscii = Asc(UCase(Chr(KeyAscii)))
End Sub

Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:salir de programa

Publicado por Athlon (76 intervenciones) el 04/09/2001 04:11:55
Así quedaría tu codigo:
Lo que te faltaba un simple "End":

Private Sub cUsuario_KeyPress(KeyAscii As Integer)
If KeyAscii = 27 Then
End
End If
If KeyAscii = 13 Then
cClave.SetFocus
End If
KeyAscii = Asc(UCase(Chr(KeyAscii)))
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar