关于菜单的问题？急.....

Question

已用vb菜单编辑器做好一个菜单：
————
文件（menufile）
...添加（menuadd）
————
我想按下按纽，可以将文本框中内容（text1.text="学生信息表"）加入菜单中 效果如下：
————
文件（menufile）
...添加（menuadd）
...学生信息表
————

Answer 1

设计菜单时，设计好够多的子菜单，程序启动时先隐藏，需要时显示、添加：
Option ExplicitPrivate Sub Add_Click()
    New1.Visible = True
    New1.Caption = Text1.Text
End SubPrivate Sub Form_Load()
    New1.Visible = False
End Sub

Answer 2

转贴：对于动态添加有两种方法：
一：菜单数组
先定义一个菜单，它的Index为0
添加：Load 菜单名(索引)
卸载：UnLoad 菜单名(索引)二：用菜单API
先用GetMenu取得窗体菜单的句柄
然后用GetSubMenu取得弹出式菜单的句柄
再用AppendMenu、InsertMenu添加菜单
最后还有响应“WM_COMMAND”消息，以处理菜单点击
具体方法参见http://www.helpwork.net/book/html/user/download.asp?id=135（超星格式）中562页的程序