11 lines
316 B
Plaintext
11 lines
316 B
Plaintext
Dim m1 As Map = CreateMap("name": "Rocket Skates", "price": 12.75, "color": "yellow")
|
|
Dim m2 As Map = CreateMap("price": 15.25, "color": "red", "year": 1974)
|
|
Dim merged As Map
|
|
merged.Initialize
|
|
For Each m As Map In Array(m1, m2)
|
|
For Each key As Object In m.Keys
|
|
merged.Put(key, m.Get(key))
|
|
Next
|
|
Next
|
|
Log(merged)
|