Imports System
Public Class Test
Public Shared Sub Main()
Dim n As Integer = 9
Dim str As String = n.ToString("D2")
Console.WriteLine(str)
Console.WriteLine(18.ToString("D2"))
Console.WriteLine(721.ToString("D2"))
End Sub
End Class
' run:
'
' 09
' 18
' 721
'