Как получить информацию от объекта, созданного с помощью JSON

Question

У меня есть строка JSON: {"jsonrpc":"2.0","result":[{"event":{"id":"27151641","name":"TSW Pegasus FC (Res) v Sun Hei SC (Res)","countryCode":"HK","timezone":"GMT","openDate":"2014-02-19T12:30:00.000Z"},"marketCount":14},{"event":{"id ":"27151646","name":"Humble Lions v Boys Town FC... и т.д. и т.п.

Так что бит результата является список пар событий/marketcount. Я использовал метод parse в модуле класса jsonlib, который я получил от http://code.google.com/p/vba-json/issues/attachmentText?id=15&aid=150001000&name=jsonlib.cls&token=31ObtlGBtaGXd2KR0QLyffX_x8Y:1359742317106

Это создает объект (jason_obj), который представляет бит результата выше. Теперь я хочу получить список идентификаторов для каждого события. Я могу использовать для каждого ... construct, чтобы возвращать каждую пару event/marketcount в качестве объекта, но я не могу понять, как добраться до поля id, которое находится где-то в объекте события. Я пытался использовать метод ToString, чтобы получить ключ, и от того, этот код должен работать, но это не делает:

For Each eventItem In jason_obj 
this_eventx = eventItem("event") 
this_id = this_eventx("id") 
Next 

Есть много о доступе объектов/коллекции не знаю. Может ли кто-нибудь помочь? Благодаря

Answer 1

объекты должны быть установлены и ссылки должны использовать пункт:

Для каждого eventItem в jason_obj

набор this_eventx = eventItem.item ("событие")

this_id = this_eventx.item ("идентификатор")

Следующая

НТН

Да, это было