Android Question disable button with for next

Sub Globals
...
...
'creo un array di  button
    Private buttons() As Button
    buttons = Array As Button (Button1, Button2, Button3, etc)

and this sub:

[code]
Sub InizializzaBottoni
  
    For i=0 To 2
       
        buttons(i).Initialize("")
        buttons(i).Enabled=False
    
    Next

For i = 0 To Activity.NumberOfViews - 1
        If Activity.GetView(i) Is Button Then
            Activity.GetView(i).Enabled = False
        End If
    Next

Sub Globals
    'These global variables will be redeclared each time the activity is created.
    'These variables can only be accessed from this module.


    Dim myImage As Bitmap
    Private sfondo As ImageView
    Private logo As ImageView
            
    Private Button1 As Button
    Private Button2 As Button
    Private Button3 As Button
    Private Button4 As Button
    Private Button5 As Button
        
    
    'creo un array di  button
    Private buttons() As Button
    buttons = Array As Button (Button1, Button2, Button3, Button4, Button5)

Sub Globals
    'These global variables will be redeclared each time the activity is created.
    'These variables can only be accessed from this module.

    Private Button1 As Button
    Private Button2 As Button
    Private Button3 As Button
    Private Button4 As Button
    Private Button5 As Button
     
 
    'creo un array di  button
    Private buttons() As Button
    buttons = Array As Button (Button1, Button2, Button3, Button4, Button5)

End Sub


Sub Activity_Create(FirstTime As Boolean)
  
    Activity.LoadLayout("nameofyourlayout")

   disable_button

End Sub

Sub disable_button
for i = 0 to buttons.length - 1
buttons(i).enabled = false
next

End Sub

For i = 0 To Activity.NumberOfViews - 1
        If Activity.GetView(i) Is Button Then
            Activity.GetView(i).Enabled = False
        End If
    Next

Sub buttoOn(x As Byte)
    
    For i = 0 To x - 1
        If Activity.GetView(i) Is Button Then
            Activity.GetView(i).Enabled = True
            Log(Activity.GetView(i))
        End If
    Next

    
End Sub

Sub AccendiPulsanti
    
    
    Select levelFile
            
        Case 1
            'Button1.Enabled=True
            buttoOn(1)

For i = 0 To Activity.NumberOfViews - 1
        If Activity.GetView(i) Is Button Then
            if Activity.GetView(i).Tag = "button1" then
                        ....
            
        End If
    Next

Sub buttoOn(x As Byte)
    
    Dim y As Byte=1
    
    
    For i = 0 To Activity.NumberOfViews - 1
        If Activity.GetView(i) Is Button And x>=y Then
            If Activity.GetView(i).tag = "Button"&y Then
                Log(Activity.GetView(i))
                Activity.GetView(i).Enabled = True
                y=y+1
            End If
        End If
    Next

    
End Sub

Sub Globals
    Private Button1, Button2, Button3 As Button
    Private Buttons() As Button
End Sub

Sub Activity_Create(FirstTime As Boolean)
    Activity.LoadLayout("Main")
    Buttons = Array As Button (Button1, Button2, Button3)
    
    For i = 0 To Buttons.Length - 1
        Buttons(i).Enabled = False
    Next
End Sub