Validação de CPF

[Liberdade 0]

Bom dia.. Eu peguei um código de validação de cpf no site mas não está passando quando o cpf é INVÁLIDO (dá erro)..

 

Quando eu digito o cpf de maneira correta funciona, mas se o cpf é inválido dá erro.

 

segue o código..

 

Public Class valida_CPF	Private dadosArray() As String = {"111.111.111-11", "222.222.222-22", "333.333.333-33", "444.444.444-44", _												  "555.555.555-55", "666.666.666-66", "777.777.777-77", "888.888.888-88", "999.999.999-99"}	Private Const msgErro As String = "Dados Inválidos"	Private bValida As Boolean	Private sCPF As String	Public Property cpf() As String		Get			Return sCPF		End Get		Set(ByVal Valor As String)			bValida = ValidaCPF(Valor)			If bValida Then				sCPF = Valor			Else				Throw (New System.ArgumentException(msgErro, "Numero do CPF"))			End If		End Set	End Property	Public ReadOnly Property isCpfValido() As Boolean		Get			bValida = ValidaCPF(cpf)			If bValida Then				Return True			Else				Return False			End If		End Get	End Property	Private Function ValidaCPF(ByVal CPF As String) As Boolean		Dim i, x, n1, n2 As Integer		CPF = CPF.Trim		For i = 0 To dadosArray.Length - 1			If CPF.Length <> 14 Or dadosArray(i).Equals(CPF) Then				Return False			End If		Next		'remove a maskara		CPF = CPF.Substring(0, 3) + CPF.Substring(4, 3) + CPF.Substring(8, 3) + CPF.Substring(12)		For x = 0 To 1			n1 = 0			For i = 0 To 8 + x				n1 = n1 + Val(CPF.Substring(i, 1)) * (10 + x - i)			Next			n2 = 11 - (n1 - (Int(n1 / 11) * 11))			If n2 = 10 Or n2 = 11 Then n2 = 0			If n2 <> Val(CPF.Substring(9 + x, 1)) Then				Return False			End If		Next		Return True	End FunctionEnd Class

Isso está dendo de uma classe..

 

Isso está dentro do botão Validar..

Public Class Form1	Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click		Dim cpf1 As New valida_CPF		cpf1.cpf = TextBox1.Text		If cpf1.isCpfValido() Then			MsgBox("CPF valido")		Else			MsgBox("CPF Inválido")		End If	End SubEnd Class

Ahh.. gostaria também de tirar os pontos.. ou seja.. validar quado a pessoa digitar sem os pontos e o tracinho.. pois esse código eu irei incorporar um um outro que varrer um arquivo inteiro e sai verificando se os cpf´s são válidos ou não.. e esse cpf´s são todos sem os pontos e traço.

Grata

 

Letícia

[Liberdade 0]

Eu já resolvi..GrataLetícia

[Coelhão 0]

Boa noite pessoal, estou tendo a mesma dificuldade da Letícia, será que alguem pode me passar a solução??

[Lab Design 0]

O metodo abaixo retorna so os numeros de um cpf, cep, rg ou qualquer string numérica que precise tirar formação.

 

public static string onlyNumbers(string toNormalize)

{

List<char> numbers = new List<char>("0123456789");

StringBuilder toReturn = new StringBuilder(toNormalize.Length);

CharEnumerator enumerator = toNormalize.GetEnumerator();

 

while(enumerator.MoveNext())

{

if(numbers.Contains(enumerator.Current))

toReturn.Append(enumerator.Current);

}

 

return toReturn.ToString();

}

[quintelab 91]

Caso não tenha conseguido resolver, poste qual o erro.

 

Abraços...

[Coelhão 0]

O erro que esta dando é que indica que o parâmetro "Numero do CPF" é inválido na seguinte linha:

 

 

Throw (New System.ArgumentException(msgErro, "Numero do CPF"))

 

 

Obrigado

[quintelab 91]

Mas qual é a mensagem de erro??

 

Abraços...

[Coelhão 0]

A mensagem é essa

 

Parametro inválido: Numero do CPF

 

entendeu??

 

 

abraço

[quintelab 91]

Pelo que li da função, essa parte do código:

If bValida Then
	 sCPF = Valor
Else
	 Throw (New System.ArgumentException(msgErro, "Numero do CPF"))
End If

Esse bValida retorna true ou false, ou seja se o CPF for inválido ele gera esse Exception, isso é normal.

Quando o CPF é válido da o erro também?

 

Abraços...

[Coelhão 0]

Não qdo o cpf é válido não dá erro.

 

Só qdo o cpf é inválido que esta dando erro.

 

Obrigado e desculpe a demora, fui viajar

 

Abraços

[quintelab 91]

Cara mas o código foi feito pra isso, quando for um CPF Inválido gerar uma Exception, se você não quer isso, basta trocar o código que esta no seu Else.

 

Abraços...