怎么动态加入已有菜单控件
我在主窗体中建有一级菜单和二级菜单多个
如： 一级菜单：
File,Sytem,Edit,View,Tolls,Windows,Help.
二级菜单：
File--->Open,Save,Close
Sytem-->Exit.
......
我怎么样才能把这些菜单动态加进主系统框架中来
要求：随心所欲，想加哪个就加哪个菜单
主要是加一级菜单，一级菜单加进来，要保证一级菜单下的二级菜单也在。
且其它的一级菜单不能出现。
注：所有的菜单都在主页面中已建好。
小弟向各位大哥求教!
问题点数：50、回复次数：3Top
1 楼zhouxiaotan（夜雨悠扬）回复于 2006-03-13 14:48:08 得分 50
Dim a As New MenuItem
a.Text = "zhou"
Dim i As Integer
i = MainMenu1.MenuItems.Add(0, a)
MainMenu1.MenuItems(0).MenuItems.Add("dahai")
i += 1
Dim B As New MenuItem
B.Text = "xiao"
i = MainMenu1.MenuItems.Add(i, B)
i += 1Top
2 楼ou108（）回复于 2006-03-13 20:38:31 得分 0
zhouxiaotan(夜雨悠扬)
这位大哥
你的答案有点问题吧
不过我不知道怎么给分呀
Top
3 楼zhouxiaotan（夜雨悠扬）回复于 2006-03-13 22:07:55 得分 0
本页上面有一个管理按钮，点开就看到了
这段代码我测试过的，好用的，不过如果用在实际的时候，还需要变化一下的
比如使用循环什么的:>Top
