Dictionary に指定したキーが存在するかを確認する方法

Option Explicit
 
Sub test()
    'Dictionary　の初期化
    Dim dicColors As Object
    Set dicColors = CreateObject("Scripting.Dictionary")
    
    'キーと値を追加。
    dicColors.Add "red", "赤"
    dicColors.Add "blue", "青"
    dicColors.Add "pink", "桃"
    
    'キーに blue が存在するかを確認
    If dicColors.Exists("blue") Then
        Debug.Print "キーに blue は存在します。"
    Else
        Debug.Print "キーに blue は存在しません。"
    End If
     
    'キーに green が存在するかを確認
    If dicColors.Exists("green") Then
        Debug.Print "キーに green は存在します。"
    Else
        Debug.Print "キーに green は存在しません。"
    End If
End Sub