2009-12-10 83 views
4

如何將前導零添加到數字中? 例如:帶前導零的數字,使用vb6

Dim stracctnumber as String 
stracctnumber = 987654321 

如果stracctnumber是少於15個字符,然後添加前導零到帳號。

最後的數字應該是

stracctnumber = "000000987654321" 

誰能幫助我?

回答

12
stracctnumber = Format(stracctnumber, String(15, "0")) 
+1

僅適用於數字「stracctnumber」。 「對(...,15)'適用於任何字符串。 – wqw 2009-12-11 10:08:09

+2

@wqw - 問題是「如何將前導零添加到**號**」 – MarkJ 2009-12-11 12:17:13

+5

@MarkJ:不要相信它!閱讀代碼:'Dim stracctnumber as String' – wqw 2009-12-12 15:07:53

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

請注意,連接相對'昂貴'。如果這只是爲了顯示,而不是修改基礎值,請考慮使用Format()函數。

+0

事情是可能發生的變化。有時它會喜歡10次,它會12或13或9 仍然有效? – pbrp 2009-12-10 22:07:24

+0

試一試,看看。 – pavium 2009-12-10 22:26:17

-1

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

這是添加空格離開。

在VBA Excel中工作偉大.....