2012年5月13日日曜日

[VBScript] IsArray関数,IsDate関数,IsEmpty関数,IsNumeric関数


■構文
IsArray(varname)
IsDate(expression)
IsEmpty(expression)
IsNumeric(expression)

■説明
IsArray…配列かどうか判定する。配列の時True。それ以外はFalseを返す。
IsDate…日付かどうか判定する。日付の時True。それ以外はFalseを返す。
IsEmpty…Empty値かどうか判定する。Empty値の時True。それ以外はFalseを返す。
IsNumeric…数値かどうか判定する。数値の時True。それ以外はFalseを返す。

■サンプルコード
Option Explicit

'IsArray
Dim aaa
Wscript.Echo IsArray(aaa) ' 0 (False)
aaa = Split("Excel,VBA", ",")
Wscript.Echo IsArray(aaa) '-1 (True)
Wscript.Echo "---"
   

'IsDate
Wscript.Echo IsDate("2010年11月8日") '-1 (True)
Wscript.Echo IsDate("10時30分25秒")  '-1 (True)
Wscript.Echo IsDate("2010.11.08")    ' 0 (False)
Wscript.Echo "---"


'IsEmpty
Dim bbb
Wscript.Echo IsEmpty(bbb) '-1 (True)
bbb = ""
Wscript.Echo IsEmpty(bbb) ' 0 (False) 空文字でも何かセットするとFalseになる
Wscript.Echo "---"


'IsNumeric
Wscript.Echo IsNumeric("123456")  '-1 (True)
Wscript.Echo IsNumeric("123,456") '-1 (True)
Wscript.Echo IsNumeric("\123456") '-1 (True)
Wscript.Echo "---"

0 件のコメント: