Issue with Dictionary.Exists

[Gringoire]

Hello guys,
it seems a stupid issue but I can't go out of this even after googling for a while. Here is my code:

Option Explicit
Private m_timeList As Scripting.Dictionary
'Timer class

Private Sub Class_Initialize()
    Set m_timeList = New Scripting.Dictionary
End Sub

Function blockStart(nome As String)
    'Start time
    m_timeList.Add getTime, nome
End Function

Function blockStop(nome As String)
    'Stop time
    m_timeList.Add getTime, nome & "§"
End Function

After running the code some time to fill the m_timeList dictionary, this is what Immediate windows say:

?m_timeList.Items(1)
prova1§
?m_timeList.Keys(1)
 1194768,0593771 
?m_timeList.Items(2)
prova2
?m_timeList.Keys(2)
 1194768,059384 
?m_timeList.Exists("prova2")
False
?m_timeList.Exists(m_timeList.Items(2))
False
?m_timeList.Exists("prova1§")
False

For sure the Keys "prova2" or "prova1§" exist, because i can print it, but when i use .Exists, it always returns FALSE.
For sure I'm doing some conceptual error but I do not understand which one...

thanks for your help.

 

[Domenic]

The Dictionary object is case-sensitive. Could this be the issue?

 

[Gringoire]

Sorry for disturbing you for the silly mistake.
I just added the Key at the Item place and Item at the Key place!
However the pause from coding I got to write this post gave me the right view to see the error.

Sometime even just writing down the issue in the forum is a help by itself!

 

[Domenic]

That's great, I'm glad you were able to solve your issue.

Cheers!