VB6を使用して先行ゼロの数字、

StackOverflow https://stackoverflow.com/questions/1884358

  •  19-09-2019
  •  | 
  •  

質問

私は数に先行ゼロを追加することができますどのように？ たとえばます：

Dim stracctnumber as String
stracctnumber = 987654321

はstracctnumberが15文字未満の場合は、口座番号に先行ゼロを追加します。

最終的な数があるべきである

stracctnumber = "000000987654321"

誰も私を助けることができますか？

役に立ちましたか？

解決 

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

他のヒント

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

連結は、比較的「高価」であることに注意してください。これは表示のためだけであれば、むしろ根本的な値を修正するよりも、Format()機能を使用することを検討します。

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

この左にスペースを追加することです。

VBA Excelで素晴らしい作品.....

ライセンス： CC-BY-SA と 帰属
所属していません StackOverflow
scroll top