Dim mypic(10) As Label
.
.
For x=0 To 9
mypic(x).Initialize("")
mypic(x).Tag=x
Activity.AddView(mypic(x), 0, x*s, Activity.Width , 5)
Next
.
.
mypic(i).Width = 1
- or with this (works as is only if you have no other views in the activity)
B4X:
Dim lbl As Label
lbl = Activity.GetView(i)
lbl.Width = 1