我有以下功能。
当我调用getQueryObject(jsonString)
它时,它使 coll 解析对象然后返回。分配给jsonObject
没有工作。当我开始对jsonObject
bariable 进行操作时,它的值nothing。我运行 Debug 并遵循代码,并且jsonObject
ingetQueryObject
没有失败。return 表示它返回对象。
我是 VB 的新手,有什么我想念的吗?
Public Function getInformation(jsonString as string) as string
Dim jsonObject As JObject
jsonObject = getQueryObject(jsonString)
'Operate on object here.
End Function
Private Function getQueryObject(jsonString as string) As JObject
Dim jsonObject As JObject
Try
jsonObject = JObject.Parse(jsonString)
Catch ex As Exception
jsonObject = New JObject
End Try
Return jsonObject
End Function
多一点信息。打开Option strict后,我开始收到错误消息。Option Strict On 不允许从“Newtonsoft.Jsont.Linq.Token 到 Newtonsoft.Json.Linq.JObject”的隐式转换。
我不知道我在哪里进行任何类型的转换。