我在 JSON 中有以下文本結構：
{
"Results":{
"Burger King":{
"Location":"New York",
"Address":"Avenue Dalmatas, 20"
},
"Mcdonalds":{
"Location":"Los Angeles",
"Address":"Oscar Street, 50"
}
}
}
我設法獲得了城市和地址結果，但為此我需要在代碼中提及餐廳的名稱以獲取令牌字串。
Dim JSON As String = **json here**
Dim token As JToken
token = JObject.Parse(JSON.ToString())
Dim data = token.SelectToken("Results").SelectToken("Burger King").SelectToken("Location")
我的問題是，例如，如何在串列框中僅列出餐廳（漢堡王、麥當勞等）？所以我可以添加一些功能來檢查用戶選擇的地址和城市，我知道并且已經了解如何做，但是獲取僅包含餐廳名稱的令牌對我來說很困難。例如，如果我有一個新的餐廳名稱，我不想在代碼中手動包含。我嘗試了很多不同的方法，但我最后使用的方法如下：
Dim data = token.SelectToken("Results").SelectToken(0) 'i thought it would print 'Burger King'
'or this one
Dim data = token.SelectToken("Results")(0).ToString()
我嘗試了一些“For Each”回圈代碼，但我也沒有成功。我已經研究了無數關于如何做到這一點的方法，但沒有任何效果。我相信這是一些簡單的事情，我要么忽略要么完全忘記..請給我一盞燈！謝謝。
uj5u.com熱心網友回復：
我可以為您發布 c# 代碼，如果需要，您可以更輕松地將其翻譯為 VB
var jsonObject= JObject.Parse(json);
List<string> restaurantNames= ((JObject)jsonObject["Results"]).Properties()
.Select(x=>x.Name).Distinct().ToList();
結果
Burger King
Mcdonalds
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/402847.html
標籤：
上一篇：如何相互替換名稱控制元件
下一篇：在介面中定義類時如何實作？