Protected WithEvents panDetails As System.Web.UI.WebControls.Panel
...
Private Sub DrawForm
        Dim btnSave As New ImageButton
        AddHandler btnSave.Click, AddressOf btnSave_Click
        btnSave.ID = "btnSave"
        btnSave.ImageUrl = "./images/save.gif"
        panDetails.Controls.Add(btnSave)
End Sub
 
Private Sub btnSave_Click(ByVal sender As Object, ByVal e As _
  System.Web.UI.ImageClickEventArgs)
 
        MsgBox("Click")
 
End Sub