全キーを取得する

サンプルソース

Set objDic = CreateObject("Scripting.Dictionary")

objDic.Add "aaa", "伊藤"
objDic.Add "bbb", "田中"
objDic.Add "ccc", "鈴木"

aryTemp = objDic.Keys
For i = 0 To objDic.Count -1
    WScript.Echo "キー:" & aryTemp(i) & vbCrLf
Next

Set objDic = Nothing

解説

Scripting.Dictionaryは任意の形のデータを格納するディクショナリのオブジェクトです。
Keysで全てのキーを格納した配列を返します。



ディクショナリ操作




WSH(Windows Script Host) 講座




アクセスランキング


基本操作
日付操作
文字列操作
配列操作
システム操作
XML操作
ファイル操作
ディクショナリ操作
データベース操作


Copyright (C) WSH@Workshop All rights reserved.