Json 没有正确反序列化

Question

Json 字符串没有正确反序列化

玩过我的课程等，但 bfevent 总是返回 Nothing 已经尝试过 Public Property bfevent As BFEvent() 以防它需要能够获取多个值

很确定这很简单......

strcatalogue = "{ "jsonrpc": "2.0", "result": [{ "event": { "id": "29202748", "name": "Kings XI Punjab v Mumbai Indians", "countryCode": "GB", "timezone": "GMT", "openDate": "2019-03-30T10:30:00.000Z" }, "marketCount": 20 }, { "event": { "id": "29201119", "name": "Victoria v NSW Blues", "countryCode": "AU", "timezone": "GMT", "openDate": "2019-03-27T23:30:00.000Z" }, "marketCount": 2 }, { "event": { "id": "29202753", "name": "Chennai Super Kings v Rajasthan Royals", "countryCode": "GB", "timezone": "GMT", "openDate": "2019-03-31T14:30:00.000Z" }, "marketCount": 35 }], "id": 1 }"
Dim objJson = JsonConvert.DeserializeObject(Of BFEventList)(strCatalogue)


Public Class BFEvent
    Public Property id As String
    Public Property name As String
    Public Property countryCode As String
    Public Property timezone As String
    Public Property openDate As DateTime
End Class

Public Class BFResult
    Public Property bfevent As BFEvent
    Public Property marketCount As Integer
End Class

Public Class BFEventList
    Public Property jsonrpc As String
    Public Property result As BFResult()
    Public Property id As Integer
End Class

BFEvent = 没有

marketCount 工作正常，所以与 BFEvents 类有关

Answer 1

所以我重命名了我的类以引用 json 中的实际字符串值。所以 bfevent 现在是事件。我不确定这是否是“必需的”。将在我有工作代码的其他地方进行测试。

但我现在得到“关键字不是有效标识符”

Public Property Event As BFEvent()

带有下划线的事件。

这里没有错误

Dim Name As String = objJson.result(0).Event(0).name

但由于上述错误无法编译