Dim parser As JSONParser
parser.Initialize($"[{"idclientes":"1","nombre":"francodlh","clave":"franco"},{"idclientes":"3","nombre":"francodlh","clave":"franco"}]"$)
Dim root As List = parser.NextArray
For Each colroot As Map In root
Dim clave As String = colroot.Get("clave")
Dim idclientes As String = colroot.Get("idclientes")
Dim nombre As String = colroot.Get("nombre")
Next