Creating an array of checkboxlist

Hi,
 
I wish to create an array for my 5 CheckBoxList and verify in a loop wich checkbox has been selected.
I ahve create this piece of code, but  this line --> For Each li In CBList(i).Items
gives me the error. Public member 'Items' on type 'String' not found.
Any idea how to workaround this issue?
'Array for the checkboxes category to scan Dim CBList(0 To 4) As Object CBList(0) = "CBGrooming" CBList(1) = "CBGrowth" CBList(2) = "CBRequest" CBList(3) = "CBWorkups" CBList(4) = "CBServicing" 'Check which checkboxes has been selected and build a string. For i = 0 To 4 For Each li In CBList(i).Items If li.Selected Then strchklist += li.Value + " ...