jueves, 9 de mayo de 2013

Iniciar evento de x Control mediante la tecla enter [ Visual Basic 6 ]

Cuando manejamos cantidades significativas de datos, y a la vez necesitamos ingresar texto hacia otro lado mediante un copy/paste o bien los saltos de líneas instantáneos que No siempre podemos tener, tengo un código simple que detecta la presión de la tecla enter para realizar determinadas acciones.

Si se le da un uso lógico  puede tener resultados significativos.

Private Sub RichTextBox1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
    'Acciones requeridas
    KeyAscii = 0

End If
End Sub



Por ejemplo acá se maneja la presión del enter cuando la misma es detectada, el código se maneja dentro del bloque If.
Donde KeyAscii nos devuelve el número y si es 13 (Enter) determina las acciones solicitadas.
Devolver a su posición = 0 del KeyAscii es opcional, ya que si queremos sencillamente que realize una accion determinada, no necesitamos quitarle el valor, sino podemos salir con Exit Sub.
Si de una función se trata con End Function.

NOTA: el evento KeyPress salta automáticamente al presionar cualquier tecla cuando el control tiene el foco, por lo que es el método inicial a futuros eventos.

No hay comentarios:

Publicar un comentario