Is there any easy way to convert an integer (eg. 1) to a embeded zero string
(eg. 00001)?

Benson
VB2005

i think that the following 2 lines must do de trick

Dim s As String = String.Empty

s.PadLeft(5, "0"c)



Best regards,

Sergio E.



"Benson" <(E-Mail Removed)> escribió en el mensaje
news:%(E-Mail Removed)...
> Is there any easy way to convert an integer (eg. 1) to a embeded zero
> string (eg. 00001)?
>
> Benson
> VB2005
>

On 2007-02-08, Benson <(E-Mail Removed)> wrote:
> Is there any easy way to convert an integer (eg. 1) to a embeded zero string
> (eg. 00001)?
>
> Benson
> VB2005
>
>
Console.WriteLine (String.Format ("{0:00000}", 1))

HTH

--
Tom Shelton

Or you could
Dim x As Int32 = 1Debug.Print(x.ToString("D5"))

"Benson" <(E-Mail Removed)> wrote in message
news:%(E-Mail Removed)...
> Is there any easy way to convert an integer (eg. 1) to a embeded zero
> string (eg. 00001)?
>
> Benson
> VB2005
>

"Benson" <(E-Mail Removed)> wrote in message
news:%(E-Mail Removed)...
> Is there any easy way to convert an integer (eg. 1) to a embeded zero
> string (eg. 00001)?

Dim i As Integer = 1
Dim s As String

s = i.ToString.PadLeft(5,"0")

Cheers.

Was supposed to be 2 lines. Posted before I was finished editing.

Dim x As Int32 = 1
Debug.Print(x.To String("DO"))

Spellchecker goofed up the code. I think you get the point but here it is
again just for grins.
Dim x As Int32 = 1

Debug.Print(x.ToString("D5"))


"gadgeteer" <(E-Mail Removed)> wrote in message
news:(E-Mail Removed)...
> Was supposed to be 2 lines. Posted before I was finished editing.
>
> Dim x As Int32 = 1
> Debug.Print(x.To String("DO"))

Thanks all of you. I try String.Format ("{0:00000}", 1)) with success.

Benson.

"gadgeteer" <(E-Mail Removed)>
???????:11A8B473-F77A-4F1D-8863-(E-Mail Removed)...
> Spellchecker goofed up the code. I think you get the point but here it is
> again just for grins.
> Dim x As Int32 = 1
>
> Debug.Print(x.ToString("D5"))
>
>
> "gadgeteer" <(E-Mail Removed)> wrote in message
> news:(E-Mail Removed)...
>> Was supposed to be 2 lines. Posted before I was finished editing.
>>
>> Dim x As Int32 = 1
>> Debug.Print(x.To String("DO"))
>

Might as well make this comment too.

This syntax works as well.

1.ToString("000000")

==============
Clay Burch
Syncfusion, Inc.