VarType( ? )
Option Explicit
Dim strAry
Dim strDate
Dim strEmpty
Dim strNull
Dim strNum
Dim strNum2
Dim strNum3
Dim strObj
Dim result
Dim strNon
strAry = Array( "acha" , "porute" , "piipo" )
strDate = Now
strEmpty = Empty
strNull = Null
strNum = 1.618033
strNum2 = "1.618033"
strNum3 = "1.618033acha"
Set strObj = CreateObject("WScript.Shell")
WScript.Echo "Type = " & VarType( strAry ) ' Type = 8204
WScript.Echo "Type = " & VarType( strEmpty ) ' Type = 0
WScript.Echo "Type = " & VarType( strNull ) ' Type = 1
| 値 | 定数 | 説明 |
|---|
| 0 |
vbEmpty |
Empty |
| 1 |
vbNull |
NULL |
| 2 |
vbInteger |
整数 |
| 3 |
vbLong |
整数（LONG） |
| 4 |
vbSingle |
小数（Single） |
| 5 |
vbDouble |
少数（Duble） |
| 6 |
vbCurrency |
通貨 |
| 7 |
vbDate |
日付 |
| 8 |
vbString |
文字列 |
| 9 |
vbObject |
オブジェクト |
| 10 |
vbError |
エラー |
| 11 |
vbBoolean |
ブール |
| 12 |
vbVariant |
バリアント |
| 13 |
vbDataObject |
非オートメーションオブジェクト |
| 17 |
vbByte |
バイト |
| 8024 |
vbArray |
配列 |