JSONの複雑な入れ子内部の値を取りたい。 - DOBON.NETプログラミング道掲示板

DOBON.NETプログラミング道掲示板

HOME HELP 新規作成新着記事ツリー表示スレッド表示トピック表示発言ランクファイル一覧検索過去ログ

■35407 / 親階層)

　JSONの複雑な入れ子内部の値を取りたい。

□投稿者/ けい一般人(5回)-(2023/05/08(Mon) 15:13:41)

環境/言語:[VB.NET2022、Windows10]　
分類:[.NET]　

お世話になります。

VB.NET2022のForm1にButton1とTextBox1を配置します。

Button1を押すと、System.Text.jsonでJSONファイル（test.json）を読み込み、
その中の項目の値をTextBox1に表示させます。

JSONファイルがやや複雑で、値を取れる場合と取れない場合とがあり、
取れない場合の改善方法を教えていただきたいと思っております。

コードは以下の通りです。

（コード）
-----------------------------------------------------------
Imports System.IO
Imports System.Runtime
Imports System.Text

Public Class Form1

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

Dim enc As Encoding = Encoding.UTF8
Dim jsonStr As String = ""
Dim jsonFilePath As String = "C:\test.json"

Using sr As New System.IO.StreamReader(jsonFilePath, enc)
jsonStr = sr.ReadToEnd()
End Using

Dim jsonNode = System.Text.Json.Nodes.JsonNode.Parse(jsonStr)
TextBox1.Text = ＜（下記参照）＞'・・・・・・・・・・・・Ａ

End Sub

End Class

-----------------------------------------------------------
また、JSONファイルの内容は、
以下のようになっています。
-----------------------------------------------------------
{
"ResultInfo": {'・・・・・・・・・・・・・・・・・・・・・・Ｂ
"Count": 1,
"Total": 1,
"Start": 1,
"Status": 200,
"Description": "",
"Copyright": "",
"Latency": 0.017
},'・・・・・・・・・・・・・・・・・・・・・・・・・・・・・Ｃ
"Feature": ['・・・・・・・・・・・・・・・・・・・・・・・・・・・Ｄ
{
"Id": "8d8acd6f1e7d81d5d10a9a18e8e927ec",
"Gid": "",
"Name": "\u3012234-0054",
"Geometry": {
"Type": "point",
"Coordinates": "139.58691098,35.37690957"
},
"Category": [
"\u90F5\u4FBF\u756A\u53F7",
"\u753A\u57DF\u90F5\u4FBF\u756A\u53F7"
],
"Description": "Yahoo!\u90F5\u4FBF\u756A\u53F7\u691C\u7D22",
"Style": [],
"Property": {
"Uid": "1831ff4e59f55c19370fc71002827b41f317f341",
"CassetteId": "3ee7f7f5fe1ef2267e319b15168e37d3",
"Country": {
"Code": "JP",
"Name": "\u65E5\u672C"
},
"Address": "\u795E\u5948\u5DDD\u770C\u6A2A\u6D5C\u5E02\u6E2F\u5357\u533A\u6E2F\u5357\u53F0",
"GovernmentCode": "14111",
"AddressMatchingLevel": "6",
"PostalName": "\u795E\u5948\u5DDD\u770C\u6A2A\u6D5C\u5E02\u6E2F\u5357\u533A\u6E2F\u5357\u53F0",
"Station": [
{
"Id": "23365",
"SubId": "2336501",
"Name": "\u6D0B\u5149\u53F0",
"Railway": "JR\u5728\u6765\u7DDA",
"Exit": "\u51FA\u53E3",
"ExitId": "5999",
"Distance": "1123",
"Time": "14",
"Geometry": {
"Type": "point",
"Coordinates": "139.596374,35.378634"
}
},
{
"Id": "23157",
"SubId": "2315701",
"Name": "\u6E2F\u5357\u53F0",
"Railway": "JR\u5728\u6765\u7DDA",
"Exit": "\u51FA\u53E3",
"ExitId": "5628",
"Distance": "1316",
"Time": "16",
"Geometry": {
"Type": "point",
"Coordinates": "139.576543,35.375218"
}
},
{
"Id": "23158",
"SubId": "2315801",
"Name": "\u6E2F\u5357\u4E2D\u592E",
"Railway": "\u6A2A\u6D5C\u5E02\u55B6\u5730\u4E0B\u9244\u30D6\u30EB\u30FC\u30E9\u30A4\u30F3",
"Exit": "2",
"ExitId": "5630",
"Distance": "3334",
"Time": "41",
"Geometry": {
"Type": "point",
"Coordinates": "139.591038,35.401302"
}
}
],
"OpenForBusiness": "",
"Detail": {
"PcUrl1": "http://www.post.japanpost.jp/cgi-zip/zipcode.php?zip=234-0054"
}
}
}
]'・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・Ｅ
}

-----------------------------------------------------------

上記のＡのところで、
下記のように書いた場合、
成功するものと失敗するものとがあります。

（成功）

TextBox1.Text = jsonNode("ResultInfo").ToString
Ｂ～Ｃが取得される。

TextBox1.Text = jsonNode("ResultInfo").Item("Latency").ToString
"Latency"の値が表示される。

TextBox1.Text = jsonNode("Feature").ToString
Ｄ～Ｅが取得される。

（失敗）

TextBox1.Text = jsonNode("Feature").Item("Id").ToString
「System.InvalidOperationException: 'The node must be of type 'JsonObject'.'」

TextBox1.Text = jsonNode("Property").ToString
TextBox1.Text = jsonNode("Station").ToString
「System.NullReferenceException: 'Object reference not set to an instance of an object.'System.Text.Json.Nodes.JsonNode.this[string].get が Nothing を返しました。」

という具合です。

JSONファイルの内容自体は、Visual Studio Code上で、
特に構文的間違いは出てきません。

jsonNode("Feature")の内部の各項目の値を取得するには、どのように書けばよいか、ご教示ください。

よろしくお願い申し上げます。

マルチポストを報告

違反を報告

上記関連ツリー
前の記事(元になった記事)	次の記事(この記事の返信)
親記事	→Re[1]: JSONの複雑な入れ子内部の値を取りたい。 /Hongliang
JSONの複雑な入れ子内部の値を取りたい。 / けい (23/05/08(Mon) 15:13) #35407 ←Now
`└` Re[1]: JSONの複雑な入れ子内部の値を取りたい。 / Hongliang (23/05/08(Mon) 21:24) #35408
`└` Re[2]: JSONの複雑な入れ子内部の値を取りたい。 / けい (23/05/09(Tue) 10:38) #35409
`└` Re[3]: JSONの複雑な入れ子内部の値を取りたい。 / けい (23/05/09(Tue) 15:28) #35410 解決済み!
上記ツリーを一括表示 / 上記ツリーをトピック表示
上記の記事へ返信

入力内容にタグは利用できません。
引用部分（行頭に「>」や「■」が付いている部分）が全体の 80% 以上のコメントは投稿できません。

半角カナは使用しないでください。文字化けの原因になります。
削除キーを覚えておくと、自分の記事の編集・削除ができます。
記事中に No*** のように書くとその記事にリンクされます(No は半角英字/*** は半角数字)。
- 使用例)
- No123 → 記事No123の記事リンクになります(指定表示)。
- No123,130,134 → 記事No123/130/134 の記事リンクになります(複数表示)。
- No123-130 → 記事No123～130 の記事リンクになります(連続表示)。

投稿前に必ずお読みください

初めて投稿される方は、必ず「書き込みのルールについて（12/4/2更新）」をお読みください。読むのが面倒、ルールを守りたくないという方は、「お気楽掲示板」へ投稿してください。
質問を投稿する場合は、「質問をする際のアドバイス」を参考にしてください。
投稿は、明記のない限り、パブリックドメインになります。
マルチポストされた投稿を報告する時は匿名で投稿し、マルチポストされている場所を併記してください。以下のリンクをクリックしていただくと、自動で下のフォームが埋まりますので、その後「送信」ボタンを押してご投稿ください。
- マルチポストの報告をする
- マルチポストの報告をするが、マルチポスト先の投稿が嫌がらせである（元の投稿者とは別人が行なっている）可能性が高い（投稿日時に開きがあり、こちらの投稿の方が早い場合は、その可能性が高いです）

Name	/
E-Mail	/
Title	/
URL	/
Comment/ 通常モード->　図表モード-> (適当に改行して下さい/半角10000文字以内) ■No35407に返信(けいさんの記事) > お世話になります。 > > VB.NET2022のForm1にButton1とTextBox1を配置します。 > > Button1を押すと、System.Text.jsonでJSONファイル（test.json）を読み込み、 > その中の項目の値をTextBox1に表示させます。 > > JSONファイルがやや複雑で、値を取れる場合と取れない場合とがあり、 > 取れない場合の改善方法を教えていただきたいと思っております。 > > コードは以下の通りです。 > > （コード） > ----------------------------------------------------------- > Imports System.IO > Imports System.Runtime > Imports System.Text > > Public Class Form1 > > Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click > > Dim enc As Encoding = Encoding.UTF8 > Dim jsonStr As String = "" > Dim jsonFilePath As String = "C:\test.json" > > Using sr As New System.IO.StreamReader(jsonFilePath, enc) > jsonStr = sr.ReadToEnd() > End Using > > Dim jsonNode = System.Text.Json.Nodes.JsonNode.Parse(jsonStr) > TextBox1.Text = ＜（下記参照）＞'・・・・・・・・・・・・Ａ > > End Sub > > End Class > > ----------------------------------------------------------- > また、JSONファイルの内容は、 > 以下のようになっています。 > ----------------------------------------------------------- > { > "ResultInfo": {'・・・・・・・・・・・・・・・・・・・・・・Ｂ > "Count": 1, > "Total": 1, > "Start": 1, > "Status": 200, > "Description": "", > "Copyright": "", > "Latency": 0.017 > },'・・・・・・・・・・・・・・・・・・・・・・・・・・・・・Ｃ > "Feature": ['・・・・・・・・・・・・・・・・・・・・・・・・・・・Ｄ > { > "Id": "8d8acd6f1e7d81d5d10a9a18e8e927ec", > "Gid": "", > "Name": "\u3012234-0054", > "Geometry": { > "Type": "point", > "Coordinates": "139.58691098,35.37690957" > }, > "Category": [ > "\u90F5\u4FBF\u756A\u53F7", > "\u753A\u57DF\u90F5\u4FBF\u756A\u53F7" > ], > "Description": "Yahoo!\u90F5\u4FBF\u756A\u53F7\u691C\u7D22", > "Style": [], > "Property": { > "Uid": "1831ff4e59f55c19370fc71002827b41f317f341", > "CassetteId": "3ee7f7f5fe1ef2267e319b15168e37d3", > "Country": { > "Code": "JP", > "Name": "\u65E5\u672C" > }, > "Address": "\u795E\u5948\u5DDD\u770C\u6A2A\u6D5C\u5E02\u6E2F\u5357\u533A\u6E2F\u5357\u53F0", > "GovernmentCode": "14111", > "AddressMatchingLevel": "6", > "PostalName": "\u795E\u5948\u5DDD\u770C\u6A2A\u6D5C\u5E02\u6E2F\u5357\u533A\u6E2F\u5357\u53F0", > "Station": [ > { > "Id": "23365", > "SubId": "2336501", > "Name": "\u6D0B\u5149\u53F0", > "Railway": "JR\u5728\u6765\u7DDA", > "Exit": "\u51FA\u53E3", > "ExitId": "5999", > "Distance": "1123", > "Time": "14", > "Geometry": { > "Type": "point", > "Coordinates": "139.596374,35.378634" > } > }, > { > "Id": "23157", > "SubId": "2315701", > "Name": "\u6E2F\u5357\u53F0", > "Railway": "JR\u5728\u6765\u7DDA", > "Exit": "\u51FA\u53E3", > "ExitId": "5628", > "Distance": "1316", > "Time": "16", > "Geometry": { > "Type": "point", > "Coordinates": "139.576543,35.375218" > } > }, > { > "Id": "23158", > "SubId": "2315801", > "Name": "\u6E2F\u5357\u4E2D\u592E", > "Railway": "\u6A2A\u6D5C\u5E02\u55B6\u5730\u4E0B\u9244\u30D6\u30EB\u30FC\u30E9\u30A4\u30F3", > "Exit": "2", > "ExitId": "5630", > "Distance": "3334", > "Time": "41", > "Geometry": { > "Type": "point", > "Coordinates": "139.591038,35.401302" > } > } > ], > "OpenForBusiness": "", > "Detail": { > "PcUrl1": "http://www.post.japanpost.jp/cgi-zip/zipcode.php?zip=234-0054" > } > } > } > ]'・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・Ｅ > } > > ----------------------------------------------------------- > > 上記のＡのところで、 > 下記のように書いた場合、 > 成功するものと失敗するものとがあります。 > > （成功） > > TextBox1.Text = jsonNode("ResultInfo").ToString > Ｂ～Ｃが取得される。 > > TextBox1.Text = jsonNode("ResultInfo").Item("Latency").ToString > "Latency"の値が表示される。 > > TextBox1.Text = jsonNode("Feature").ToString > Ｄ～Ｅが取得される。 > > （失敗） > > TextBox1.Text = jsonNode("Feature").Item("Id").ToString > 「System.InvalidOperationException: 'The node must be of type 'JsonObject'.'」 > > TextBox1.Text = jsonNode("Property").ToString > TextBox1.Text = jsonNode("Station").ToString > 「System.NullReferenceException: 'Object reference not set to an instance of an object.'System.Text.Json.Nodes.JsonNode.this[string].get が Nothing を返しました。」 > > という具合です。 > > JSONファイルの内容自体は、Visual Studio Code上で、 > 特に構文的間違いは出てきません。 > > jsonNode("Feature")の内部の各項目の値を取得するには、どのように書けばよいか、ご教示ください。 > > よろしくお願い申し上げます。 > > >
File	/ アップ可能拡張子=> /.gif/.jpg/.png/.zip 1) 太字の拡張子は画像として認識されます。 2) 画像は初期状態で縮小サイズ250×250ピクセル以下で表示されます。 3) 同名ファイルがある、またはファイル名が不適切な場合、　　ファイル名が自動変更されます。 4) アップ可能ファイルサイズは1回20KB(1KB=1024Bytes)までです。 5) ファイルアップ時はプレビューは利用できません。 6) スレッド内の合計ファイルサイズ:[0/300KB] 残り:[300KB]
Icon	/ (画像を選択/サンプル一覧)
削除キー	/ (半角8文字以内)
解決済み! BOX/ 解決したらチェックしてください!（スレッドを閉じる目的ではチェックしないでください!）
クリエイティブ・コモンズ・ライセンスを Comment の末尾に挿入するには、以下のリンクをクリックしてください。（Javascript で挿入しているだけです。）表示（CC BY） \| 表示-改変禁止（CC BY-ND） \| 表示-継承（CC BY-SA） \| 表示-非営利（CC BY-NC） \| 表示-非営利-改変禁止（CC BY-NC-ND） \| 表示-非営利-継承（CC BY-NC-SA）
プレビュー/　クッキーに保存しない/

HOME HELP 新規作成新着記事ツリー表示スレッド表示トピック表示発言ランクファイル一覧検索過去ログ

- Child Tree -