Usuário com melhor resposta
Excluir o primeiro número quando for ZERO (0)

Pergunta
-
Seguinte eu recebo um conjunto de números variados 12346568, e quero que .. quando o primeiro número for 0 ele não envie para o banco. MAS só o primeiro 0 da esquerda tem que ser excluido, mas se tiver um 0 no meio do conjunto de números ele tem que ficar. Como eu faço?
Respostas
-
Rafael eu fiz assim mas ele continua apresentando o ZERO em uma label que tenho (lblPesquisar).
Dim conta
conta = Len(txtPesquisar.Text)
Dim lefts = Left(txtPesquisar.Text, 1)
If lefts = 0 Then
Select Case conta
Case 3
Dim um, dois As String
um = Left(txtPesquisar.Text, 1)
dois = Right(txtPesquisar.Text, 2)
Dim lblPesquisar
lblPesquisar = dois
Case 4
Dim um, tres As String
um = Left(txtPesquisar.Text, 1)
tres = Right(txtPesquisar.Text, 3)
Dim lblPesquisar
lblPesquisar = tres
End Select
End Ifcomo é em VB fica assim :
Dim ConjuntoNumeros As String = "0301214545454" ConjuntoNumeros = IIf(ConjuntoNumeros.StartsWith("0"), ConjuntoNumeros.Substring(1), ConjuntoNumeros)
Diego Almeida Barreto
System Analyst / Software Developer
- Sugerido como Resposta Diego de Almeida Barreto (Lewis) quinta-feira, 24 de outubro de 2013 22:01
- Editado Diego de Almeida Barreto (Lewis) quinta-feira, 24 de outubro de 2013 22:06
- Marcado como Resposta Renan Assunção sexta-feira, 25 de outubro de 2013 10:40
Todas as Respostas
-
usa a sua string.IndexOf('0');
ele vai retornar a 1ª posição onde for encontrada!
--Rafael Albuquerque
- Sugerido como Resposta Durval Ramos quinta-feira, 24 de outubro de 2013 22:32
- Não Sugerido como Resposta Durval Ramos quinta-feira, 24 de outubro de 2013 22:32
- Sugerido como Resposta Durval Ramos quinta-feira, 24 de outubro de 2013 22:32
- Não Sugerido como Resposta Durval Ramos quinta-feira, 24 de outubro de 2013 22:32
-
Rafael eu fiz assim mas ele continua apresentando o ZERO em uma label que tenho (lblPesquisar).
Dim conta
conta = Len(txtPesquisar.Text)
Dim lefts = Left(txtPesquisar.Text, 1)
If lefts = 0 Then
Select Case conta
Case 3
Dim um, dois As String
um = Left(txtPesquisar.Text, 1)
dois = Right(txtPesquisar.Text, 2)
Dim lblPesquisar
lblPesquisar = dois
Case 4
Dim um, tres As String
um = Left(txtPesquisar.Text, 1)
tres = Right(txtPesquisar.Text, 3)
Dim lblPesquisar
lblPesquisar = tres
End Select
End If -
Renan seja se isso atende:
string teste = "0301214545454"; teste = teste.StartsWith("0") ? teste.Substring(1) : teste;
Diego Almeida Barreto
System Analyst / Software Developer
- Sugerido como Resposta Diego de Almeida Barreto (Lewis) quinta-feira, 24 de outubro de 2013 21:53
- Editado Diego de Almeida Barreto (Lewis) quinta-feira, 24 de outubro de 2013 22:05
-
Rafael eu fiz assim mas ele continua apresentando o ZERO em uma label que tenho (lblPesquisar).
Dim conta
conta = Len(txtPesquisar.Text)
Dim lefts = Left(txtPesquisar.Text, 1)
If lefts = 0 Then
Select Case conta
Case 3
Dim um, dois As String
um = Left(txtPesquisar.Text, 1)
dois = Right(txtPesquisar.Text, 2)
Dim lblPesquisar
lblPesquisar = dois
Case 4
Dim um, tres As String
um = Left(txtPesquisar.Text, 1)
tres = Right(txtPesquisar.Text, 3)
Dim lblPesquisar
lblPesquisar = tres
End Select
End Ifcomo é em VB fica assim :
Dim ConjuntoNumeros As String = "0301214545454" ConjuntoNumeros = IIf(ConjuntoNumeros.StartsWith("0"), ConjuntoNumeros.Substring(1), ConjuntoNumeros)
Diego Almeida Barreto
System Analyst / Software Developer
- Sugerido como Resposta Diego de Almeida Barreto (Lewis) quinta-feira, 24 de outubro de 2013 22:01
- Editado Diego de Almeida Barreto (Lewis) quinta-feira, 24 de outubro de 2013 22:06
- Marcado como Resposta Renan Assunção sexta-feira, 25 de outubro de 2013 10:40
-
Renan,
Tente utilizar a conversão do seu número da seguinte forma:
string sValor = Decimal.Parse("0574258529982").ToString(); MessageBox.Show(sValor);
Espero ter ajudado.
Durval Ramos
MTA | MS Partner
Se foi útil não esqueça de votar e se resolveu seu problema, marque como resposta
- Sugerido como Resposta Durval Ramos quinta-feira, 24 de outubro de 2013 22:32