Foros del Web - Ver Mensaje Individual - ingresar solo numeros en un campo de texto

chaval · #1 (**permalink**) 03/12/2006, 17:08

Estoy practicando algo de VB6 (jamas lo habia usado) e hice una aplicación que lee y graba de una BD en access con DAO. Ahora queria validar los datos antes de guardarlos en la BD y para verificar que no esten vacios, en el boton de Guardar puse el siguiente código:

Código:

Private Sub cmdGuardar_Click()

If (txtNombre = "") Or (txtApellido = "") Or (txtTelefono = "")  Then
     MsgBox "Faltan datos.", vbCritical, "Atención"
Else
     'resto del código
End If

End Sub

lo que querria hacer ahora es verificar que en "txtTelefono" solo se ingresen números y en las fqs encontre:

Código:

If ((KeyAscii < 48 Or KeyAscii > 57) And (KeyAscii < 44 Or KeyAscii > 44)) Then
		 If (KeyAscii <> 8) Then KeyAscii = 0
	 End If

pero no me sirvió, ¿alguien me puede dar una mano?

gracias
El Chaval