Create dynamic Json

[darie.leolea (Dean)]

@ppr

myJObject = New JObject()
myJObject.Add(New JProperty("key1","samplestring"))
myJObject.Add("key2","samplestring")
myJObject.Add(New JProperty("key3",New JArray()))
myJObject("key3").Value(Of JArray).Add(New JObject({New JProperty("key4","V1"),New JProperty("key5","V2"),New JProperty("key6","V3")}))

Dim otherJO As JObject = New JObject()
otherJO.Add("key4", "V1")
otherJO.Add("key5", "V2")
otherJO.Add("key6", "V3")
myJObject("key3").Value(Of JArray).Add(otherJO)

Thank you very much ! But how cand I adapt this assuming that I have a for each and I need to add one more property each time ?

When “For each” ends I need to have the main json and 100 properties added during the iterations.