| |||
Validacion De Textbox Y Otros. Hola Estoy Trabajando En Visual Studio .net Y Tengo Unas Cajas De Texto (textbox) Pero Necesito Que En Una Se Ingresen Solo Numeros Y En La Otra Solo Letras..no Se Si Alguien Me Puede Ayudar. Muchas Gracias.. |
| ||||
Holo si estas trabajando en VB.Net lo puedes hacer de esta forma: Private Sub textbox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles textbo.KeyPress 'Lo anterior es el evento keypress de tu caja de texto, es decir solo pon desde el primer if hasta el endif If e.KeyChar.IsDigit(e.KeyChar) Then e.Handled = False ElseIf e.KeyChar.IsControl(e.KeyChar) Then e.Handled = False Else e.Handled = True End If End Sub Y listo ya con eso validas el ingreso SOLO numerico. Chaito y espero que te sirva |
| |||
Hola, si estas trabajando con vb.net te recomiendo q investigues este tema "Expresiones Regulares", yo las utlilizo en vb.6 para validar y todo ![]() Da una googleada para conocer mas. por ahora te recomiendo este link http://www.elguille.info/regexp/indice.aspx#introRegExp suerte ![]() |
| |||
Respuesta: Validacion De Textbox Y Otros. gracias por la infor. para VB.net 2005 quedaría así Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress 'Lo anterior es el evento keypress de tu caja de texto, es decir solo pon desde el primer if hasta el endif If Char.IsDigit(e.KeyChar) Then e.Handled = False ElseIf Char.IsControl(e.KeyChar) Then e.Handled = False Else e.Handled = True End If End Sub End Class |
| |||
Respuesta: Validacion De Textbox Y Otros. Hola... aqui tengo una funcion que valida solo numeros... Function valida(ByVal letra As String, ByRef v As Boolean) Dim n As Integer Dim x As Integer Dim a As Integer Dim c As Integer n = Len(letra) For x = 1 To n + 1 For a = 0 To 9 If Strings.Mid(letra, x, 1) = CStr(a) Then c = c + 1 End If Next Next If c = n Then v = True End If Return (v) End Function Y para luego aplicarla.... es así... Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged Dim u As Boolean valida(TextBox1.Text, u) If u = False Then MsgBox("INGRESE SOLO NÚMEROS", MsgBoxStyle.Information, "Información") TextBox1.Clear() End If End Sub esta validacion funciona con el VB.net 2005 no he probado con otro... |