Удаление программно созданных Label - Visual Basic .NET
Формулировка задачи:
Доброго времени суток!
Прошу помощи в удалении программно созданных Label. Создать получилось, а вот с удалением как то не задалось.
Создаю таким образом:
Потом в событии Button_Click пытаюсь удалить:
Возникает ошибка: "Ссылка на объект не указывает на экземпляр объекта"
Как правильно удалить?
Заранее признателен!
Решение задачи: «Удаление программно созданных Label»
textual
Листинг программы
Public Class Form1 Dim kolvo As Integer = 3 Dim mas() As Label Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load ReDim mas(0 To kolvo - 1) For i = 0 To kolvo - 1 mas(i) = New Label mas(i).Text = i + 1 mas(i).Left = 25 * i + 170 mas(i).Top = 30 mas(i).Height = 20 mas(i).Width = 20 mas(i).AutoSize = False mas(i).Visible = True Me.Controls.Add(mas(i)) Next End Sub Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click For Each lb As Label In mas lb.Dispose() Next End Sub End Class
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д