请大侠指点指点

Question

Private sub Page_load()
...
dim objcell as tablecell
objcell=new tablecell
dim objLinkbutton as LinkButton
with objLinkbutton
   .text="Message"
   .id="linkbutton1"
   '如何在此处给LinkButton控件添加Click事件?
end with
objtablecell.controls.add(objlinkbutton)
...
end sub

Answer 1

'动态按钮点击事件的添加例子Private WithEvents btnObj As CommandButtonPrivate Sub btnObj_Click()
   MsgBox "This is a dynamically added button."
End Sub

Answer 2

LinkButton是个什么控件呢？
试试看楼上的方法行不行