none
Excluir o primeiro número quando for ZERO (0) RRS feed

  • 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?
    quinta-feira, 24 de outubro de 2013 12:55

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 If

    como é 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


    quinta-feira, 24 de outubro de 2013 22:00

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
    quinta-feira, 24 de outubro de 2013 13:02
  • 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
    quinta-feira, 24 de outubro de 2013 17:46
  • Renan seja se isso atende:

                string teste = "0301214545454";
    
                teste = teste.StartsWith("0") ? teste.Substring(1) : teste;



    Diego Almeida Barreto
    System Analyst / Software Developer


    quinta-feira, 24 de outubro de 2013 21:53
  • 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

    como é 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


    quinta-feira, 24 de outubro de 2013 22:00
  • 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
    quinta-feira, 24 de outubro de 2013 22:32