Можно ли удалить элемент массива управления?
Удаляю элемент массива управления, используя 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
но произошла какая-то ошибка, возможно ли выполнить удаление в управляющем массиве? помогите мне плз:)
1 ответ
Вы можете удалить элементы управления в массиве элементов управления только в том случае, если вы добавили их во время выполнения (попробуйте удалить элемент, добавленный вами через конструктор, и вы получите ошибку). Этот код должен работать:
Unload lblRoom(RoomIndex)
Unload brdrRoom(RoomIndex)
Из MSDN:
Вы можете использовать оператор Unload для удаления любого элемента управления, созданного с помощью Load. Однако нельзя использовать Unload для удаления элементов управления, созданных во время разработки, независимо от того, являются ли они частью массива элементов управления.