For i = 0 To COUNTRIES.Size -1
Dim m As Map
m = COUNTRIES.Get(i)
x = m.Get("id")
'Posicion Imagen
img(x).Initialize(x)
img(x).Gravity = Gravity.FILL
lbl(x).Initialize(x)
lbl(x).TextColor = Colors.Black
sclPrincipal.Panel.AddView(img(x),l,t,w,h)
sclPrincipal.Panel.AddView(lbl(x),l+w+3dip,t,w,h)
t = t + 27%y
Next