Public function Ereignis()
	response.Write("TTT")
end function
Sub Page_Load(Src As Object, E As EventArgs)
	if Not IsPostBack() then ShowList
 
	Dim LinkB as New Linkbutton
	LinkB.Text="Test"
	AddHandler LinkB.onCommand , AddressOf Ereignis
	Test.Controls.Add (LinkB)
End Sub

Compiler Error Message: BC30390: _
  'System.Web.UI.WebControls.LinkButton.Protected Overridable Sub OnCommand(e 
' As System.Web.UI.WebControls.CommandEventArgs)' is not accessible in this _
context because it is 'Protected'.

____________________________________