26/07/2010, 09:24
|
| | | Fecha de Ingreso: octubre-2009
Mensajes: 19
Antigüedad: 16 años Puntos: 1 | |
| Respuesta: ayudenme a terminar gracias de antemano
creo que esto te puede ayudar
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
MsgBox "llamo al procedimiento o funcion de consulta"
KeyAscii = 0
End If
End Sub |