2012年5月13日日曜日

[VBScript] Space関数


■構文
Space(number)

■説明
指定した数のスペースを返します
第一引数:スペースの数を指定

■サンプルコード
Option Explicit

'1桁~5桁の数字を出力する時、半角スペースを使い1の桁で揃えて出力する
Dim RndNumber
Randomize
RndNumber = Int(Rnd() * 30000) + 1

Wscript.Echo Space(5 - Len(CStr(RndNumber))) & RndNumber

0 件のコメント: