codice:
For i = 0 to Ubound(CheckBoxArray)
  valore = CheckBoxArray(i)
Next