(VB.NET) JSON: Renaming and Deleting Members
Demonstrates renaming and deleting members.
This example uses the following JSON document:
{
"apple": "red",
"lime": "green",
"banana": "yellow",
"broccoli": "green",
"strawberry": "red"
}
Dim json As New Chilkat.JsonObject
Dim success As Boolean = json.Load("{""apple"": ""red"",""lime"": ""green"",""banana"": ""yellow"",""broccoli"": ""green"",""strawberry"": ""red""}")
If (success <> True) Then
Debug.WriteLine(json.LastErrorText)
Exit Sub
End If
' Rename "lime" to "lemon".
success = json.Rename("lime","lemon")
' Change the color to yellow:
success = json.SetStringOf("lemon","yellow")
' Rename by index. Banana is at index 2 (apple is at index 0)
success = json.RenameAt(2,"bartlett_pear")
' Delete broccoli by name
success = json.Delete("broccoli")
' Delete apple by index. Apple is at index 0.
success = json.DeleteAt(0)
json.EmitCompact = False
Debug.WriteLine(json.Emit())
|
