数字即为
1、2、3、4、5、6、7、8、9、10、11、12........
如果是1到9
则补成01、02、03、04、05、06、07、08、09
遇到10以上,就不用补
请问要怎么实现呢?
数字即为
1、2、3、4、5、6、7、8、9、10、11、12........
如果是1到9
则补成01、02、03、04、05、06、07、08、09
遇到10以上,就不用补
请问要怎么实现呢?
Module Module1
Sub Main()
Dim a1 As Long = 5
Dim s As String = a1.ToString("00")
Console.WriteLine(s)
Dim a2 As String = "5"
Dim s2 As String = a2.PadLeft(2, "0")
Console.WriteLine(s2)
End Sub
End Module