【VBScript】連想配列 – Hashtable(順序性なし,.NET使用) 全ての要素の削除

VBScriptにおける、Hashtableの全ての要素を削除する方法について解説しています。

下記のように「Hashtableオブジェクト.Clear」と記述することで、全ての要素を削除することが可能です。

全要素の削除後にキーの存在チェックをしているため、実行結果は常に「キーは存在しません」と表示されます。

Option Explicit

' 連想配列を使用するための宣言
Dim hashtable
Set hashtable = CreateObject("System.Collections.Hashtable")

' 要素の追加
hashtable.Add "りんご", "100円"
hashtable.Add "みかん", "80円"
hashtable.Add "メロン", "300円"

' 全ての要素を削除
hashtable.Clear

' キーの存在チェック
If(hashtable.ContainsKey("りんご"))Then
    MsgBox("キーは存在します")
Else
	MsgBox("キーは存在しません")
End If