Можно ли удалить элемент массива элементов управления?

Question

I Удалить элемент управления массива с помощью Unload и попытаться заменить элемент, используя следующий код

Private Sub mnudelete_Click() 
Dim i As Integer 
MsgBox (SelectedItemIndex) 
RoomIndex = SelectedItemIndex 
Unload frmData.lblRoom(RoomIndex) 
Unload frmData.brdrRoom(RoomIndex) 
For i = SelectedItemIndex To NumberOfRooms 
    lblRoom(i) = lblRoom(i + 1) 
    brdrRoom(i) = brdrRoom(i + 1) 
Next 
NumberOfRooms = NumberOfRooms - 1 
End Sub 

но произошла какая-то ошибка, можно выполнить удаление в массиве элементов управления? help me plz :)

Answer 1

Вы можете удалить элементы управления только в Control Array, если вы добавили их во время выполнения (попробуйте удалить тот, который вы добавили через конструктора, и вы получите сообщение об ошибке). Этот код должен работать:

Unload lblRoom(RoomIndex) 
Unload brdrRoom(RoomIndex) 

От MSDN:

Вы можете использовать оператор Unload для удаления какого-либо контроля, созданного с нагрузкой. Однако вы не можете использовать Unload для удаления элементов управления, созданных во время разработки, независимо от того, являются ли они частью массива управления.