[VBScript] TypeName関数

>Blog Top Page >[VBScript] Top Page >[VBScript] 関数 一覧

■構文
TypeName(varname)

■説明
変数の型を返します。
第一引数：変数を指定します。

■サンプルコード

view plainprint?

1. Option Explicit  
2.   
3. Dim Str1: Str1 = "文字列"  
4. Wscript.Echo TypeName(Str1) 'String  
5.   
6. Dim Str2()  
7. Wscript.Echo TypeName(Str2) 'String() 文字列の配列  
8.   
9. Dim num1: num1 = 123  
10. Wscript.Echo TypeName(num1) 'Integer  
11.   
12. Dim num2: num2 = 1234567  
13. Wscript.Echo TypeName(num2) 'Long  
14.   
15. Dim yymmdd: yymmdd = Date  
16. Wscript.Echo TypeName(yymmdd) 'Date  
17.   
18.   
19. Set obj = CreateObject("Scripting.Dictionary")  
20. Wscript.Echo TypeName(obj) 'Dictionary  
21. 'ExcelVBAは型宣言があるので宣言しただけで型は決まるが  
22. 'VBScriptは型宣言がないので、値を代入することで型が決まるので  
23. '値を代入するまではEmptyを返す。  

Option Explicit

Dim Str1: Str1 = "文字列"
Wscript.Echo TypeName(Str1) 'String

Dim Str2()
Wscript.Echo TypeName(Str2) 'String() 文字列の配列

Dim num1: num1 = 123
Wscript.Echo TypeName(num1) 'Integer

Dim num2: num2 = 1234567
Wscript.Echo TypeName(num2) 'Long

Dim yymmdd: yymmdd = Date
Wscript.Echo TypeName(yymmdd) 'Date


Set obj = CreateObject("Scripting.Dictionary")
Wscript.Echo TypeName(obj) 'Dictionary
'ExcelVBAは型宣言があるので宣言しただけで型は決まるが
'VBScriptは型宣言がないので、値を代入することで型が決まるので
'値を代入するまではEmptyを返す。

>Blog Top Page >[VBScript] Top Page >[VBScript] 関数 一覧