Validar un textBox para solo numeros
Publicado por Carlos Misael azabache (7 intervenciones) el 24/06/2008 03:45:07
El siguiente código es para que en un textBox podamos ingresar solo números si quieres ingresar solo enteros le pones al momento de utilizar la función que decimales sea igual a false caso contrario le pones true.
Primero debemos pegar la siguiente funcion
Segundo en el evento Key Press de nuestro textBox digitar lo siguiente:
e.Handled = txtNumerico(txtCosto, e.KeyChar, true)
En este caso permitira el acceso de numeros con su punto decimal
Espero que este codigo le sirva a alguien el rato que necesite una funcion que haga esto no la encontre. Cualquier consulta o falla del código haganmela llegar
Primero debemos pegar la siguiente funcion
1
2
3
4
5
6
7
8
9
10
11
12
13
Public Function txtNumerico(ByVal txtControl As TextBox, ByVal caracter As Char, ByVal decimales As Boolean) As Boolean
If (Char.IsNumber(caracter, 0) = True) Or caracter = Convert.ToChar(8) Or caracter = "." Then
If caracter = "." Then
If decimales = True ThenIf txtControl.Text.IndexOf(".") <> -1 Then Return True
Else : Return TrueEnd If
End If
Return False
Else
Return True
End If
End Function
Segundo en el evento Key Press de nuestro textBox digitar lo siguiente:
e.Handled = txtNumerico(txtCosto, e.KeyChar, true)
En este caso permitira el acceso de numeros con su punto decimal
Espero que este codigo le sirva a alguien el rato que necesite una funcion que haga esto no la encontre. Cualquier consulta o falla del código haganmela llegar
Valora esta pregunta
0
