带前导零的数字，使用VB6

Question

我如何添加前导零到多少？ 例如：

Dim stracctnumber as String
stracctnumber = 987654321

如果stracctnumber是少于15个字符，然后添加前导零到帐户号码。

最终数目应

stracctnumber = "000000987654321"

谁能帮我？

Answer 1

stracctnumber = Format(stracctnumber, String(15, "0"))

Answer 2

strAcct = Right("000000000000000" & strAcct, 15)

请注意级联是相对“昂贵”。如果这仅仅是用于显示，而不是修改基础值，可以考虑使用Format()功能。

Answer 3

B8 = Format((Format(B2, "###,###")), "@@@@@@@")

这是添加空格到左。

在VBA的Excel工作很大.....