VB 怎么让000001加1后等于000002?

RT!
VB问题
数字的格式是六位,从1开始时000001,然后每次计算之后格式还是这样,如:000005，000013，000058，000132,总之格式是六位,数值不满六位前面就补零。
请问怎么计算？我本来想的是用left或者right函数提取,可惜不行,因为这一串字符大小不是固定的只有个位百位或者千位....

解决问题以后追加！

用 Format 函数，下面是个例子：
Private Sub Command1_Click()
Static n As Long
n = n + 1
Print Format(n, "000000")
End Sub

num=format(num,"0") 在用num相加试试。

num=format(num,"0") 在用num相加试试。 再看看别人怎么说的。