(Xojo Plugin) JSON: Access Array Values

Demonstrates how to access values in a JSON array.

Chilkat Xojo Plugin Download Xojo Plugin for Windows, Linux, Mac OS X, and ARM, ARM64

Dim json As New Chilkat.JsonObject

Dim jsonStr As String
jsonStr = "{ ""id"": 1, ""name"": ""A green door"", ""tags"": [""home"", 22, ""green""], ""price"": 125 }"

Dim success As Boolean
success = json.Load(jsonStr)
If (success <> True) Then
    System.DebugLog(json.LastErrorText)
    Return
End If

// Get the "tags" array, which contains "home", 22, "green"
Dim tagsArray As Chilkat.JsonArray
tagsArray = json.ArrayOf("tags")
If (json.LastMethodSuccess = False) Then
    System.DebugLog("tags member not found.")
    Return
End If

// Get the value at each array index. 
// Output will be:
// [0] = home
// [0] as integer = 0
// [1] = 22
// [1] as integer = 22
// [2] = green
// [2] as integer = 0

Dim arraySize As Int32
arraySize = tagsArray.Size
Dim i As Int32
For i = 0 To arraySize - 1

    Dim sValue As String
    sValue = tagsArray.StringAt(i)

    System.DebugLog("[" + Str(i) + "] = " + sValue)

    Dim iValue As Int32
    iValue = tagsArray.IntAt(i)
    System.DebugLog("[" + Str(i) + "] as integer = " + Str(iValue))

Next

// Note: The StringAt method returns the value as a string regardless of the type.

// The IntAt method returns the value as an integer.  If the value does not convert to 
// an integer, then 0 is returned