-2

ようこそ、次のような指定された形式のテキスト ファイルがあります。

"King": {
  "name": "Jack",
  "Age": "23",
  "ID": "001",
},

"Queen": {
  "name": "Lory",
  "Age": "19",
  "ID": "002",
  "Pass": "955",
},

{Toから "King" を読み、}, テキストに が含まれているかどうかを確認するにはどうすればよいです"Pass"か。

"Age"そして、どのようにof を置き換えることができますか。Kingそうすると、すべてAgeの単語が置き換えられるからです。

助けていただければ幸いです。私のちょっとした話で申し訳ありません。

4

1 に答える 1

3

これは JSON ファイルのように見えるので、JSON.NETなどの JSON パーサーを使用してファイルをロードし、解析して変更します。

例えば

（データには「含む」{}がないため、少し戦わなければならないため、解析時にそれらを追加し、シリアル化時にそれらを削除します）

' Adding a containing { }
Dim parsed As JObject = JObject.Parse("{ " & json & " }")
Dim king As JObject = DirectCast(parsed("King"), JObject)

king("Age") = 30

Dim pass As JToken

If king.TryGetValue("Pass", pass) Then
    ' has pass
End If

Dim json2 As String = JsonConvert.SerializeObject(parsed, Formatting.Indented)

' Now we remove the first and last { }
Dim ix As Integer = json2.IndexOf(ControlChars.Lf) + 1
Dim lastix As Integer = json2.LastIndexOf(ControlChars.Cr)

' The final text
Dim json3 As String = json2.Substring(ix, lastix - ix)
于 2013-08-07T06:58:50.490 に答える