Code: Select all
NewMap country.s()
AddMapElement(country(), "Canada", #PB_Map_NoElementCheck)
country() = "1"
AddMapElement(country(), "France", #PB_Map_NoElementCheck)
AddMapElement(country(), "Usa", #PB_Map_NoElementCheck)
AddMapElement(country(), "Canada", #PB_Map_NoElementCheck)
country() = "2"
AddMapElement(country(), "Mexico", #PB_Map_NoElementCheck)
AddMapElement(country(), "Germany", #PB_Map_NoElementCheck)
AddMapElement(country(), "Denmark", #PB_Map_NoElementCheck)
AddMapElement(country(), "Canada", #PB_Map_NoElementCheck)
country() = "3"
AddMapElement(country(), "Mexico", #PB_Map_NoElementCheck)
AddMapElement(country(), "England", #PB_Map_NoElementCheck)
AddMapElement(country(), "Ireland", #PB_Map_NoElementCheck)
AddMapElement(country(), "Scotland", #PB_Map_NoElementCheck)
If FindMapElement(country(),"Canada")
Debug MapKey(country())+" "+country()
result = NextMapElement(country())
While result
If MapKey(country()) = "Canada"
Debug MapKey(country()) + " " + country()
Else
Break
EndIf
result = NextMapElement(country())
Wend
EndIf
Debug ""
ForEach country()
Debug MapKey(country())
Next