在VB中如何动态产生菜单
编号：QA000227
建立日期: 1998年12月20日 最后修改日期：1999年3月3日
所属类别：
季龙:
在VB中如何动态产生菜单?
回答:
如果你说的“动态产生菜单”指的是动态弹出菜单，应该使用PopupMenu语句。如果你指是动态地增加菜单项，可以使用下面的办法。首先假定你的菜单中有一项mnuItems，要在它的下面增加新的菜单项。你可以在菜单设计窗口中设定Index属性为0。然后，在程序中使用下面的代码就可以增加菜单项了：
Load mnuItems(1)
mnuItems(1).Caption = "Item 1"
mnuItems(1).Visible = True
理论上，也可以使用Windows API中的InsertMenu等函数添加菜单，但由于当用户选择菜单时，难以获得相应的消息(可以使用Message Blaster、MsgHook等控件或子类技术)，所以很少使用。你可以参考QA000580 "VB5中动态建立带子菜单的菜单"以获得这方面的例子。
相关问题：
QA000098 "如何在VB程序运行时加入和删除控件"
QA003605 "如何用VB实现数据库菜单，即菜单存放在数据库中"
此问题由李海回答。
| |
|
|
| |
|
|
