ActiveX 文档的菜单设计
使用 Visual Basic“菜单编辑器”可为 ActiveX 设计器创建菜单。支持 ActiveX 文档的容器将自动合并用容器的“帮助”菜单创建的任何“帮助”菜单。
提示作者信息
当用户发现您的文档时─ 不论是通过浏览器、配联程序、还是其它应用程序─ 他可能不会立即认出它。因此,最好对所创建的每个 ActiveX 文档都添加一个“关于”菜单。
还要知道,除非 ActiveX 文档把其“帮助”菜单和容器的“帮助”菜单合并,某些容器将不能正确地显示它们的菜单。
要将 About 框和容器的“帮助”菜单合并,请按照以下步骤执行:
- 单击“工程”菜单的“添加窗体”。
- 双击“添加窗体”对话框的“带有系统信息的关于对话框”图标,添加““关于”对话框”窗体到工程中。
- 设置与 ActiveX 文档相适应的窗体和 Label 控件的 Caption 属性。
- 在“工程资源管理器”窗口双击 UserDocument,显示其设计器。
- 单击 UserDocument 设计器选中它,然后单击“工具”菜单上的“菜单编辑器”,显示“菜单编辑器”对话框。
- 单击“标题”框并键入 &Help。
- 单击“名称”框并键入 mnuHelp。
- 单击“协调位置”框,并单击“居右”。
- 单击“下一个”按钮来创建一个新的菜单项。
- 在“标题”框中键入 "About" 和 ActiveX 文档的名称。
- 在“名称”框中键入 mnuAbout。
- 单击面向右的箭头按钮,以缩排菜单项。
- 单击“确定”。
- 双击 ActiveX 设计器,显示其“代码”窗口。
- 把下面的代码添加到 mnuAbout 的 Click 事件中:
Private Sub mnuAbout_Click()
frmAbout.Show vbModal
End Sub