Converting to string with preceding zero

[John]

Hi

I would like to convert a number to string but with a preceding zero if the
number is less than 10.

How can I accomplish this?

Thanks

Regards

[Jay B. Harlow [MVP - Outlook]]

John,
What kind of number: Integer or Float?

For Integer (Byte, Short, Integer, Long) you can use the "D" format
specifier, with the number of digits to display:

Dim i as Integer = 9
Dim s As String = i.ToString("D2")

i = 100
s = i.ToString("D2")

For Float (Decimal, Single, Double) you will need to 'manually' do this with
string manipulations (String.PadLeft may help).

Hope this helps
Jay

"John" <jo**@nospam.infovis.co.uk> wrote in message
news:%2******************@tk2msftngp13.phx.gbl...

Hi

I would like to convert a number to string but with a preceding zero if the number is less than 10.

How can I accomplish this?

Thanks

Regards

[Patrick Steele [MVP]]

In article <##**************@tk2msftngp13.phx.gbl>,
jo**@nospam.infovis.co.uk says...

Hi

I would like to convert a number to string but with a preceding zero if the
number is less than 10.

How can I accomplish this?

String.Format

http://tinyurl.com/mcnc

--
Patrick Steele
Microsoft .NET MVP
http://weblogs.asp.net/psteele

[Herfried K. Wagner [MVP]]

"John" <jo**@nospam.infovis.co.uk> schrieb:

I would like to convert a number to string but with a preceding zero
if the number is less than 10.

\\\
MsgBox(Format(10, "00"))
MsgBox(Format(9, "00"))
MsgBox(Format(-1, "00"))
MsgBox(Format(-10, "00"))
///

--
Herfried K. Wagner
MVP · VB Classic, VB.NET
http://www.mvps.org/dotnet

[One Handed Man [ OHM ]]

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click

Dim aNumber As Decimal = 10.567D

Dim myString As String

If aNumber < 10 Then

myString = Microsoft.VisualBasic.Format(aNumber, "0.##")

Else

myString = Microsoft.VisualBasic.Format(aNumber, "000.##")

End If

MessageBox.Show(myString)

End Sub
--
Regards - One Handed Man

Author : Fish .NET & Keep .NET
=========================================
This posting is provided "AS IS" with no warranties,
and confers no rights.
"John" <jo**@nospam.infovis.co.uk> wrote in message
news:%2******************@tk2msftngp13.phx.gbl...

Hi

I would like to convert a number to string but with a preceding zero if the number is less than 10.

How can I accomplish this?

Thanks

Regards

[Armin Zingler]

"John" <jo**@nospam.infovis.co.uk> schrieb

I would like to convert a number to string but with a preceding zero
if the number is less than 10.

How can I accomplish this?

dim i as integer = 5
dim s as string

s = i.tostring("00")
--
Armin

[Jay B. Harlow [MVP - Outlook]]

Armin,
Doh!

I forgot about the custom format. It will work with Single, Double &
Decimal!

Thanks
Jay

"Armin Zingler" <az*******@freenet.de> wrote in message
news:eT**************@tk2msftngp13.phx.gbl...

"John" <jo**@nospam.infovis.co.uk> schrieb

I would like to convert a number to string but with a preceding zero
if the number is less than 10.

How can I accomplish this?

dim i as integer = 5
dim s as string

s = i.tostring("00")
--
Armin