我试图制作一个包含书签的工具条项目,每个书签都应该转到该页面。如何使每个按钮工作?。
For Each b In New System.IO.DirectoryInfo("Bookmarks").GetFiles
BookmarksToolStripMenuItem.DropDownItems.Add(b.Name)
Next
答案 0 :(得分:1)
您应首先创建一个ToolStripMenuItem,然后添加处理程序并将其放到您的toolstripmenu对象中,而不是添加到toolstripmenu一个字符串对象。
For Each b In New System.IO.DirectoryInfo("Bookmarks").GetFiles
Dim menuItem As New ToolStripMenuItem(b.Name)
'Add any handlers here
'Click handler to your menuItem.
AddHandler menuItem.Click, AddressOf menuItem_Click 'CLICK EVENT HANDLER ALSO UNIQUE
'Add menuItem to ToolStripMenu
BookmarksToolStripMenuItem.DropDownItems.Add(menuItem)
Next
Private Sub menuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
'CODE TO HANDLE CLICK EVENT
End Sub
如果您不知道如何动态添加处理程序,请查看examples。