Private Function json_ParseObject(json_String As String, ByRef json_Index As Long, ByRef json_Length As Long) As Dictionary
Dim json_Key As String
Dim json_NextChar As String
Set json_ParseObject = Scripting.Dictionary
End Function
instead of using early binding. we can use late binding. so that user don't have to goto option > reference and select Scripting.Runtime library
Private Function json_ParseObject(json_String As String, ByRef json_Index As Long, ByRef json_Length As Long) As Object
Dim json_Key As String
Dim json_NextChar As String
Set json_ParseObject = CreateObject("Scripting.Dictionary")
End Function
instead of using early binding. we can use late binding. so that user don't have to goto option > reference and select Scripting.Runtime library