none
Codigo para validar textbox, solo permita ingresar letras, borrar y espacio

    Pregunta

  • Hasta e momento voy asi y me permite solo las letras y el borrar pero no me permito la tecla espacio, alguien puede colaborarme

     Private Sub TextBox12_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox12.KeyPress


            If Char.IsLetter(e.KeyChar) Then
                e.Handled = False
            ElseIf Char.IsControl(e.KeyChar) Then
                e.Handled = False
            Else
                e.Handled = True
            End If
        End Sub

           
    sábado, 20 de agosto de 2016 20:20

Respuestas

  • JhonParra,

    Puedes hacer lo siguiente:

    Private Sub txtOnlyLetters_KeyPress(sender ...)
    	If Not Char.IsLetter(e.KeyChar) _
                         AndAlso Not Char.IsControl(e.KeyChar) _
                         AndAlso Not Char.IsWhiteSpace(e.KeyChar) Then
    		e.Handled = True
    	End If
    End Sub
    


    Espero que la información proporcionada te haya sido de utilidad, quedo atento a tus comentarios.
    sábado, 20 de agosto de 2016 20:32

Todas las respuestas

  • JhonParra,

    Puedes hacer lo siguiente:

    Private Sub txtOnlyLetters_KeyPress(sender ...)
    	If Not Char.IsLetter(e.KeyChar) _
                         AndAlso Not Char.IsControl(e.KeyChar) _
                         AndAlso Not Char.IsWhiteSpace(e.KeyChar) Then
    		e.Handled = True
    	End If
    End Sub
    


    Espero que la información proporcionada te haya sido de utilidad, quedo atento a tus comentarios.
    sábado, 20 de agosto de 2016 20:32
  • Muchas gracias, esta perfecto
    sábado, 20 de agosto de 2016 20:55
  • aqui esta este codigo 
     Private Sub txtnombres_KeyPress(sender As Object, e As KeyPressEventArgs) Handles txtnombres.KeyPress
        
    /*Solo numeros*/   
     If Char.IsNumber(e.KeyChar) Then
                e.Handled = False
            ElseIf Char.IsControl(e.KeyChar) Then
                e.Handled = False
            ElseIf Char.IsSeparator(e.KeyChar) Then
                e.Handled = False
            Else
                e.Handled = True
            End If
    /*Solo letras*/
            If Char.IsLetter(e.KeyChar) Then
                e.Handled = False
            ElseIf Char.IsControl(e.KeyChar) Then
                e.Handled = False
            ElseIf Char.IsSeparator(e.KeyChar) Then
                e.Handled = False
            Else
                e.Handled = True
            End If
    
    End Sub
    esas funciones te permiten solo numero o solo letra eliminar y espacio...saludos..espero te sirva
    lunes, 5 de noviembre de 2018 17:27