Android Question Checkboxes

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

    Private chklist As List
    Private chkarr(8) As CheckBox

    Private CheckBox1 As CheckBox
    Private CheckBox2 As CheckBox
    Private CheckBox3 As CheckBox
    Private CheckBox4 As CheckBox
    Private CheckBox5 As CheckBox
    Private CheckBox6 As CheckBox
    Private CheckBox7 As CheckBox
    Private CheckBox8 As CheckBox
End Sub

Sub Activity_Create(FirstTime As Boolean)
    'Do not forget to load the layout file created with the visual designer. For example:
    Activity.LoadLayout("EightCheckboxes")
    ' Fill Checkboxarray (Solution 1)
    chkarr(0) = CheckBox1
    chkarr(1) = CheckBox2
    chkarr(2) = CheckBox3
    chkarr(3) = CheckBox4
    chkarr(4) = CheckBox5
    chkarr(5) = CheckBox6
    chkarr(6) = CheckBox7
    chkarr(7) = CheckBox8
    '
    ' Trying Solution 1
    '
    ' Set all Textcolor to Blue
    For i = 0 To chkarr.Length-1
        chkarr(i).TextColor = Colors.Blue
    Next
  
  
  
  
    ' Fill Checkboxlist (Solution 2)
    chklist.Initialize
    chklist.Add(CheckBox1)
    chklist.Add(CheckBox2)
    chklist.Add(CheckBox3)
    chklist.Add(CheckBox4)
    chklist.Add(CheckBox5)
    chklist.Add(CheckBox6)
    chklist.Add(CheckBox7)
    chklist.Add(CheckBox8)
    '
    ' Trying Solution 2
    '
    ' The List contains OBJECTs. To use it as a Checkbox
    ' you first need to cast the Object to an checkbox
    '
    ' Here we´ll set all Checkboxes to checked
    For i = 0 To chklist.Size-1
        Dim chk As CheckBox = chklist.Get(i)
        chk.Checked = True
    Next
  
End Sub

Sub CheckBox_CheckedChange(Checked As Boolean)
    Dim CHeck As CheckBox = Sender
    Log (CHeck.Tag & " Was changed to " & Checked)
End Sub