Как программно создать кнопку

[gaidar]

В процессе работы когда? На сервере?

Dim ctrl As New Control()
MyWebForm.Controls.Add(ctrl)

Если на клиенте - то регистрируйте скрипт, которыйбудет генерировать клиентский код.

[hCORe]

Код: Выделить всё

Private Sub ClickEvt(ByVal sender As System.Object, _
ByVal e As System.EventArgs)
    Me.lbl01.Text = "Clicked!"
End Sub

Private Sub Page_Load(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles MyBase.Load
    Dim ctrl01 As New LinkButton
    ctrl01.Text = "Test01"
    ctrl01.ID = "cmdTEST01"
    Me.P01.Controls.Add(ctrl01)
    'добавить обработчик события
    AddHandler ctrl01.Click, AddressOf ClickEvt
End Sub

[hCORe]

Пойдет?

Код: Выделить всё

Private Sub ClickEvt(ByVal sender As System.Object, _
ByVal e As System.EventArgs)
    Me.lbl01.Text = "Clicked LinkButton with ID '" + sender.ID + "'!"
End Sub

Private Sub Page_Load(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles MyBase.Load
    Dim ctrl01 As New LinkButton
    Dim ctrl02 As New LinkButton
    ctrl01.Text = "Test01"
    ctrl02.Text = "Test02"
    ctrl01.ID = "cmdTEST01"
    ctrl02.ID = "cmdTEST02"
    Me.P01.Controls.Add(ctrl01)
    Me.P01.Controls.Add(ctrl02)
    'добавить обработчик события
    AddHandler ctrl01.Click, AddressOf ClickEvt
    AddHandler ctrl02.Click, AddressOf ClickEvt
End Sub