Replace não mete o 0 [Resolvido]

[PJM]

Mais uma vez, aqui estou eu com uma dúvida  😛

Pessoal é o seguinte, eu quero fazer um replace em que o 0 apareça, mas este não faz o mesmo.

Aqui fica o código:

            If i < 10 Then
                nome = Replace(nome, "**", "0" + i)
                ListBox3.Items.Add(nome)
            Else
                nome = Replace(nome, "**", i)
                ListBox3.Items.Add(nome)
            End If

O problema é que se o i for < 10 não aparece o zero, por exemplo tenho isto: Cliente nr**

Ele em vez de aparecer Cliente nr01 aparece Cliente nr1.

Alguém sabe como resolver?

Cumprimentos.

[anolsi]

Experimenta fazer

"0" & i.Tostring

em vez de

"0" + i

[PJM]

Deu, thanks.

Esse código o que faz é converter o i (contador) em string correcto?

Porque ele estava a assumir como integer, logo 0+1=1. Estou a pensar correctamente?

Cumprimentos e obrigado

[anolsi]

Deu, thanks.

Esse código o que faz é converter o i (contador) em string correcto?

Porque ele estava a assumir como integer, logo 0+1=1. Estou a pensar correctamente?

Cumprimentos e obrigado

Exactamente.

Embora acho que simplesmente substituísses o + por & ele faria a conversão implícita (sem tu veres). E aconselho-te a usar sempre o & em vez do +, porque é mais lógico, e essa capacidade do + apenas se mantêm por compatibilidade.

[jpaulino]

"0" + i.ToString()

ou

"0" &  i

também funcionam ...

Se utilizares o "Option Strict On" aí sim terias de converter para string. Mais seguro é mesmo o "&"

[PJM]

Ah ok obrigado pela dica  😛