« スクリプトから.NETを使って、文字の繰り返し関数を代替する。 | トップページ | スクリプトから.NETの書式指定を使って、Format()関数を代替する。 »

2008年8月15日 (金)

スクリプトから.NETを使って、右寄せ(左埋め)、LPad()、PadLeft()関数を代替する。

スクリプトから.NETのString型のPadLeft()は使えませんが、StringBuilderのAppendFormat()なら使えます。

Function LPad(s,n)
Dim sb
Set sb=CreateObject("System.Text.StringBuilder")
sb.AppendFormat "{0," & n & "}",s
LPad=sb.ToString()
End Function

« スクリプトから.NETを使って、文字の繰り返し関数を代替する。 | トップページ | スクリプトから.NETの書式指定を使って、Format()関数を代替する。 »