Dim parser As JSONParser
parser.Initialize("{"count":0,"next":null,"previous":null,"results":[]}")
Dim root As Map = parser.NextObject
Dim next As String = root.Get("next")
Dim previous As String = root.Get("previous")
Dim count As Int = root.Get("count")
Dim results As List = root.Get("results")