Привет, всем
Как сформировать динамичный массив из названий отмеченных флажков на форме? Написал:
Но появляется ошибка №9 в строчке nst(y) = Flag.Caption: y = y + 1. Подскажите,пожалуйста, как правильно? Пример во вложенном файле.
Как сформировать динамичный массив из названий отмеченных флажков на форме? Написал:
Код |
---|
Private Sub CommandButton1_Click() y = 0 For Each Flag In Controls If Flag.Value = True Then nst(y) = Flag.Caption: y = y + 1 ReDim Preserve nst(y): Debug.Print nst(y) End If Next End Sub |