14/05/2009, 14:10
|
| | | Fecha de Ingreso: marzo-2006
Mensajes: 78
Antigüedad: 19 años, 2 meses Puntos: 0 | |
| Respuesta: como sacar el beep....
el beep se produce cada vez que presiono la tecla enter, ya que mis text pa que se puedan validar los programe en el evento keypress del estos (text)
ej:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
If Text1 = "" Then
MsgBox "INGRESE EL NOMBRE, POR FAVOR"
Text1.SetFocus
Else
Text1 = UCase(Text1)
Combo2.Enabled = True
Combo2.SetFocus
End If
End If
End Sub
entonces al presionar enter para pasar al otro text se produce el beep... |