Try This One :
You must put all your Checkboxes in a Control Container like a PANEL, in here I used a Panel.
Dim ChckboxValue As String
For Each Control In Panel1.Controls
If TypeOf Control Is CheckBox Then
If CType(Control, CheckBox).Checked Then
ChckboxValue = CType(Control, CheckBox).Text
End If
End If
Next
Put your Query inside the Loop. In this code you don't need to declare the checkboxes inside an array.