DictionaryにAddしていなくてもItemが追加される【ExcelVBA】

'参照設定　Microsoft Scripting Runtime
Public Sub sample()
    Dim dic As Dictionary
    Set dic = New Dictionary
    
    '■isEmptyで確認すると要素が存在しないと、勝手にAddされてしまう。
    If IsEmpty(dic("aaa")) Then
        Debug.Print "要素が存在しません"
    Else
        Debug.Print "要素が存在します"
    End If

    '■Existsで存在確認して回避する
    If dic.Exists("bbb") = False Then
        Debug.Print "要素が存在しません"
    Else
        Debug.Print "要素が存在します"
    End If
End Sub