Visual Basic 6.0

JSON Append String Array

See more JSON Examples

Demonstrates how to append an array of strings from a string table object.

Note: This example uses the AppendStringTable method, which was introduced in Chilkat v9.5.0.67

Visual Basic 6.0

Dim json As New ChilkatJsonObject
json.EmitCompact = 0

success = json.AppendString("abc","123")

Dim st As New ChilkatStringTable
success = st.Append("a")
success = st.Append("b")
success = st.Append("c")
success = st.Append("d")

success = json.AppendStringArray("strArray",st)

Debug.Print json.Emit()

' Output:

' 	{
' 	  "abc": "123",
' 	  "strArray": [
' 	    "a",
' 	    "b",
' 	    "c",
' 	    "d"
' 	  ]
' 	}