There are two problems within your code.
First, the outer If statement only gets true for labels, so no execution will be done for other types. Look at this formatted version of your code:
For I = 0 To Activity.NumberOfViews - 1
If Activity.GetView(I) Is Label Then
If Activity.GetView(I) Is EditText Then
Continue
End If
If Activity.GetView(I) Is Button Then
Continue
End If
Dim b As Label
b = Activity.GetView(I)
b.Color = Colors.Blue
End If
Next
Second, if you delete the outer If startement, e.g.
For I = 0 To Activity.NumberOfViews - 1
If Activity.GetView(I) Is EditText Then
Continue
End If
If Activity.GetView(I) Is Button Then
Continue
End If
Dim b As Label
b = Activity.GetView(I)
b.Color = Colors.Blue
Next
you are missing the meaning of the keyword
continue.
Continue stops executing the current iteration and continues with the next one.
So if you have found an EditText this if-clause gets true
If Activity.GetView(I) Is EditText Then
Continue
End If
and all following statements are skipped for the current iteration
If Activity.GetView(I) Is Button Then
Continue
End If
Dim b As Label
b = Activity.GetView(I)
b.Color = Colors.Blue
specci48