Cita:
Iniciado por natu_06lumar
buenas noches lo que pasa es que tengo el siguiente codigo de un formulario
...
necectio saber como valido que en el campo cedula si se allan escrito numeros y en el campo nombre solo letras que no me permita numero lo mismo en en de cedula no me permita texto.
Buenos dias, te pongo el código del boton ingresar:
Código:
Private Sub btnregistrar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnregistrar.Click
Dim Caracter As Char
' comprobar que no haya ningún TextBox vacío.
Dim Text As Object
For Each Text In Me.Controls
If TypeOf Text Is TextBox Then
If Text.Text = "" Then
MsgBox("Hay que rellenar todos lo campos.")
Exit Sub
End If
End If
next text
' verificar cada carácter del campo cedula
For i As Integer = 1 To Len(TextBox1.Text)
Caracter = Mid(TextBox1.Text, i, 1)
If Char.IsLetter(Caracter) Then
MsgBox("El campo cedula sólo puede contener números")
Exit Sub
End If
Next i
' verificar cada caracter del campo nombre
For i As Integer = 1 To Len(TextBox2.Text)
Caracter = Mid(TextBox2.Text, i, 1)
If Char.IsNumber(Caracter) Then
MsgBox("El campo nombre NO puede contener números")
Exit Sub
End If
Next i
End Sub
Si lo vas a utilizar en otros procedimientos, es mejor que crees una función que devuelva un booleano y le pases el contenido de los TextBox.
Nota para AlexixLAG: La función
IsNumeric no existe en .NET