for n = 0 to Activity.NumberOfViews -1
Dim v as view
v= activity.getview(n)
if v is panel then
dim p as panel
p = v
...
else if v is button then
...
else
...
end if
next
For i=0 To Activity.NumberOfViews - 1
Dim v As View
v = Activity.GetView(i)
If v Is EditText Then
Else If v Is Label Then
Else If v Is AutoCompleteEditText Then
End If
Next