Написание Морского Боя на VB6, не получается связать массивы

Узнай цену своей работы

Формулировка задачи:

Досталась такая тема курсового, я в VB нубище, самоучители проштудировала, но проблем все еще много. На данный момент зависла на том, чтоб связать массив кнопок с масивом чекбоксов. Если проще: есть основная управляющая кнопка (Command1), 100 чекбоксов(массив CheckA11) и 100 кнопок(Массив A1). Сначала мы расставляем галочки. Потом нажимаем на основную кнопку. После этого нажатия те кнопки массива A1, чей индекс численно совпадает с индексом выбранных галочек, должны остаться видимыми. Те, что по индексу соответствуют не выбранным галочкам, должны стать невидимыми. Вот так я это написала:
Но, к сожалению, этот код не работает. То есть срабатывает только на A1(0) и CheckA11(0). На остальные 199 индексов не действует. Как это исправить? Буду очень признательна за ответ.

Решение задачи: «Написание Морского Боя на VB6, не получается связать массивы»

textual
Листинг программы
Private Sub Command1_Click()
dim Index as integer
for Index=0to 99
    A1(Index).Visible = CheckA11(Index).Value
next
end sub

Оцени полезность:

5   голосов , оценка 4.2 из 5
Похожие ответы