您需要添加一个处理程序
AddHandler cbo.newAction, AddressOf newAction
编辑:
这是我做的一个例子。我希望能够在每个页面的底部添加一行链接,而不必向每个页面添加HTML。所以我建立了一个控件来为我做这件事。它的一部分是添加一个LoginStatus控件
Protected Overrides Sub CreateChildControls()
Dim lb As New LoginStatus
With lb
.ID = "LoginStatus1"
AddHandler .LoggingOut, AddressOf LoginStatus1_LoggingOut
End With
Me.Controls.Add(lb)
End Sub
然后我的日志处理程序做了一点小魔术,以不打破我的URLrewriting。
Private Sub LoginStatus1_LoggingOut(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.LoginCancelEventArgs)
'sign out the logged in user
End Sub