私は次の機能を持っています。
私が呼び出すgetQueryObject(jsonString)
と、collがオブジェクトを解析してから戻ります。への割り当てが機能しjsonObject
ていません。バリアブルの操作を開始するとjsonObject
、値は 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' への暗黙的な変換を禁止します。
どのような種類の変換を行っているかわかりません。