首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

有关VB.NET动态加载菜单的有关问题,请高手指教

2012-01-15 
有关VB.NET动态加载菜单的问题,请高手指教!本人需要用vb.net编程,从一个SQLSERVER数据表中读取其配置信息,

有关VB.NET动态加载菜单的问题,请高手指教!
本人需要用vb.net编程,从一个SQLSERVER数据表中读取其配置信息,并把读取的信息加载到winform的菜单中。如数据表中有多条数据,每条数据有两个字段,分别为“用户系统名称”和“系统简称”,读取后,把数据加载到窗体的菜单中,“用户系统名称”为菜单的显示,即菜单的text,“系统简称”为菜单的名称,即菜单的name。同时,动态加载的菜单项都可以有点击事件,请问如何编程。

请高手指教,谢谢了!!

[解决办法]

VB code
'objMenuList是从数据库里查出来的结果,这里假设一个Name, 一个Text属性For Each item In objMenuList    Dim objToolScriptMenuItem As ToolStripMenuItem = New ToolStripMenuItem    objToolScriptMenuItem.Text = item.MenuText    objToolScriptMenuItem.Name = item.MenuName    AddHandler objToolScriptMenuItem.Click, AddressOf ToolStripMenuItem_Click    Me.MenuStrip1.Items.Add(objToolScriptMenuItem)Next------------------------Private Sub ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)    Dim obj As ToolStripMenuItem = DirectCast(sender, ToolStripMenuItem)    MsgBox(obj.Name & ":" & obj.Text)End Sub 

热点排行