VBScriptにおける、SortedListでの値の存在チェック方法について解説しています。
値の存在チェックは、下記のように「SortedListオブジェクト.ContainsValue(“値”)」と記述することで確認できます。
値が存在する場合は「True」、存在しない場合は「False」が返されます。
Option Explicit
' 連想配列を使用するための宣言
Dim sortedList
Set sortedList = CreateObject("System.Collections.SortedList")
' 要素の追加
sortedList.Add "200", "みかん"
sortedList.Add "100", "りんご"
sortedList.Add "300", "ぶどう"
' 値の存在チェック
If(sortedList.ContainsValue("りんご"))Then
MsgBox("値は存在します")
Else
MsgBox("値は存在しません")
End If


コメント