vb.net - radmenu 添加点击事件以从代码后面触发代码后面的代码

Question

在我的母版页上，我有一个名为“myMenu”的telerek radmenu，看起来像这样：

在我使用母版页的 aspx 页面上，我试图更改按钮“门”上的链接，但以下内容不起作用。你能帮忙吗

Protected Sub Page_Load()

Dim H As RadMenu = DirectCast(myMenu.FindControl("House"), RadMenu)
Dim D As RadMenuItem = DirectCast(H.FindControl("door"), RadMenuItem)

D.click = LoadStuff()

End Sub


Private Sub LoadStuff()

'update something in vb.net

End Sub

Answer 1

你有几个选择。首先，我将完全按照您的要求回答问题。在这种情况下，您需要使用类似于在 c# 中使用 += 来分配事件处理程序的 AddHandler。

Protected Sub Page_Load()

    Dim H As RadMenu = DirectCast(myMenu.FindControl("House"), RadMenu)
    Dim D As RadMenuItem = DirectCast(H.FindControl("door"), RadMenuItem)

    AddHandler D.Click, AddressOf LoadStuff

End Sub


Private Sub LoadStuff(sender As Object, e As EventArgs)

    'update something in vb.net

End Sub

但是，如果您不是在代码中创建菜单，并且它已经在设计时构建，为什么不使用以下内容：

Protected Sub Page_Load()

End Sub


Private Sub door_Click(sender As Object, e As EventArgs) Handles door.Click

    'update something in vb.net

End Sub