【VBScript】前0埋め、後ろ0埋め

2023年2月4日VBScript

前0埋め

VBScriptで、前0埋めをする方法です。

'前0埋め5桁
right(合わせる桁の文だけ"0"をつける & Cstr(数値) , 何桁に合わせるか)

'前0埋め5桁
right("00000" & Cstr(数値) , 5)

'前0埋め8桁
right("00000000" & Cstr(数値) , 8)

'前0埋め10桁
right("0000000000" & Cstr(数値) , 10)


'実行例 msgboxは確認用
msgbox right("00000" & Cstr(12),5)           ' 結果："00012"
msgbox right("00000" & Cstr(1234),5)         ' 結果："01234"
msgbox right("00000000" & Cstr(1234),8)      ' 結果："00001234"
msgbox right("0000000000" & Cstr(1234),10)   ' 結果："0000001234"

 

 

後ろ0埋め

VBScriptで、後ろ0埋めをする方法です。

'後ろ0埋め5桁
left(Cstr(数値) & 合わせる桁の文だけ"0"をつける , 何桁に合わせるか)

'後ろ0埋め5桁
left(Cstr(数値) & "00000", 5)

'後ろ0埋め8桁
left(Cstr(数値) & "00000000", 8)

'後ろ0埋め10桁
left(Cstr(数値) & "0000000000", 10)


'実行例 msgboxは確認用
msgbox left(Cstr(12) & "00000",5)           ' 結果："12000"
msgbox left(Cstr(1234) & "00000",5)         ' 結果："12340"
msgbox left(Cstr(1234) & "00000000",8)      ' 結果："12340000"
msgbox left(Cstr(1234) & "0000000000",10)   ' 結果："1234000000"