「VBScript入門」 Scripting.Dictionary (辞書)で連想配列を作成する

2021年1月6日

書式
Addメソッド
Dictionary オブジェクトに新しいキー/アイテムのペアを追加します。
Existsメソッド
指定したキーが Dictionary オブジェクト内に存在するかどうかを示すブール値を返します。
使用例

Dim cftDy
Set cftDy = CreateObject("Scripting.Dictionary")

' 要素を追加
cftDy.Add "key01", "value:001"
cftDy.Add "key02", "value:002"
cftDy.Add "key03", "vlaue:003"
cftDy.Add "key04", "vlaue:004"

' 追加要素の参照
Wscript.echo cftDy("key01")
Wscript.echo cftDy("key02")
Wscript.echo cftDy("key03")
Wscript.echo cftDy("key04")

' キーが存在判定
If cftDy.Exists("key04") Then
    Wscript.echo "key04 exists"
End If

' オブジェクトを削除
cftDy.RemoveAll

実行結果
value:001
value:002
value:003
value:004
key04 exists

VBScript

Posted by arkgame