@trick - Olaf alluded to a problem with your hash table re: 100% compatibility with the scripting Dictionary object when he said: "(for that you will have to change your Item-Prop-Implementation)"
I think he was referring to the fact that the Dictionary Item property Let will perform an Add operation if the item doesn't already exist, whereas your class will raise an Error 5. See this test:
Code:Sub Test() Dim x As New Scripting.Dictionary x.Item("Test") = "Hello" Debug.Print x.Item("Test") Dim y As New clsTrickHashTable y.Item("Test") = "Goodbye" Debug.Print x.Item("Test") End Sub




Reply With Quote