условие для:

Dim chcboxes() As CheckBox = {CheckBox1, CheckBox2, CheckBox3}
For i As Integer = 0 To chcboxes.Length

    If (chcboxes(i).CheckState = CheckState.Checked) Then
        cmd.CommandText = "insert into array_tbl(array_id,answer) values ('" & i & "'  , '" & CheckBox1.Text & "')"
        cmd.ExecuteNonQuery()

а:

Произошло необработанное исключение типа «System.IndexOutOfRangeException» в файле array.exe.

Дополнительная информация: индекс находился за пределами массива.

Ответы на вопрос(1)

Ваш ответ на вопрос