VB6 удаление объектов с формы
Формулировка задачи:
Здравствуйте, вот программирую тут небольшую игрушку на VB6. И возникла такая проблема: необходимо создавать объекты Image прямо в процессе работы программы. Для их создания у меня существует вот такой код:
И возникла проблема с их последующим поиском и удалением. То есть я нажимаю на кнопку, далее на игровое поле, и программа должна находить присутствующие в этом месте созданные таким образом объекты и удалять их. Подскажите как это реализовать.
Я пробовал делать с помощью массива, то есть кидать их все в один массив, но опять же, не знаю, каким боком его туда приткнуть.
Листинг программы
- Public Sub IshPos(index)
- Form1.Controls.Add "VB.Image", "Ish"
- With Form1!Ish
- .Top = Image1(index).Top
- .Left = Image1(index).Left
- PosL = Image1(index).Top
- PosT = Image1(index).Left
- .Picture = Form7.Man.Picture
- .Visible = True
- .BorderStyle = 0
- .ZOrder 0
- End With
- End Sub
Решение задачи: «VB6 удаление объектов с формы»
textual
Листинг программы
- ctrls = set Form1.Controls
- For Each ctrl In ctrls
- If ctrl.name = "Ish" Then
- 'удаляем
- ENd if
- Next
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д