Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Название темы: Visual Basic 2008
Показать сообщение отдельно

Ветеран


Сообщения: 3320
Благодарности: 916

Профиль | Отправить PM | Цитировать


Основная часть динамики уже написана, осталось приделать динамическое добавления событий и поставленная задача будет выполнена
Код: Выделить весь код
        For x As Integer = 0 To TabControl.TabCount - 1
            Dim b As New Button
            AddHandler b.Click, AddressOf Button_Click
REM...дальше код с предыдущего поста
        Next

    End Sub
REM этих строчек не было ранее, именно они отвечают за действия кнопок
    Protected Sub Button_Click(ByVal sender As Object, ByVal e As EventArgs)
        If TypeOf (sender) Is Button Then ' check to make sure that the sender is actually a Button
            MsgBox(TabControl.SelectedTab.Text.ToString())
        End If
    End Sub
Ссылки по вопросу
как узнать имя объекта вызвавшего событие?
How to: Consume Events in a Windows Forms Application
Set dynamic control's properties

И немного истории How To Dynamically Add Controls to a Form with Visual Basic 6.0

Отправлено: 12:37, 23-07-2008 | #180

Название темы: Visual Basic 2008