Programación General > Visual Basic 6.0 e inferiores

 Validacion Del Keypress

(1/2) > >>

shekina:
:hola: Hola a todos .....como puedo validar que en un texbox al momento de introducir los datos, solo pueda aceptar Letras y no número muy agradecida :rolleyes:

juanjo:
ojala te sirva esto:

private sub text1_keypress(keyascii as integer)
if keyascii=13 then
     if isnumeric(text1) then
        msgbox "solo letras"
        text1.setfocus
     end if
end if

QliX=D!:
No el texto de arriba no sirve porque si te introducen A11 en el texbox lo tomaria como valido ya uqe A11 no es numerico.

tenes que hacer algo con like como esto:


--- Código: Text --- private sub text1_keypress(keyascii as integer)  if keyascii=13 then    if text1 like "*[0-9]*" then      msgbox "Hay por lo menos un numero en el cuadro de texto&#59;)"      text1.setfocus    end if  end ifend sub   B)

cpmario:
Hay formas más precisas de limitar los caracteres a escribir, este ejemplo solo permite que escribas letras mayúsculas en un textbox, también puedes escribir letras acentuadas.

Private Sub txtNombre_KeyPress(KeyAscii As Integer)
    Dim letters As String
    Dim strChar As String
    letters = "ABCDEFGHIJKLMNOPQRSTUVWXYZÑÁÉÍÓÚÜ "
    strChar = UCase(Chr$(KeyAscii))
    If KeyAscii = 8 Then
    ElseIf InStr(letters, strChar) Then
        KeyAscii = Asc(strChar)
    Else
        KeyAscii = 0
    End If
End Sub

---------------------
"Corrector Ortográfico de Notas", útil para revisar los textos en los programas.
Escrito en Visual Basic, con diccionario propio.

http://geocities.com/igmario/index2.html

Jose Arriagada:
Para que tanta complicacion, si existe el control Masked, que te permite configurar tu entrada de datos en el diseño de tu programa.
Solo basta indicar que reciba caracteres y punto.

Navegación

[0] Índice de Mensajes

[#] Página Siguiente