ActiveX 文档的菜单设计

使用 Visual Basic“菜单编辑器”可为 ActiveX 设计器创建菜单。支持 ActiveX 文档的容器将自动合并用容器的“帮助”菜单创建的任何“帮助”菜单。

提示作者信息

当用户发现您的文档时─ 不论是通过浏览器、配联程序、还是其它应用程序─ 他可能不会立即认出它。因此,最好对所创建的每个 ActiveX 文档都添加一个“关于”菜单。

还要知道,除非 ActiveX 文档把其“帮助”菜单和容器的“帮助”菜单合并,某些容器将不能正确地显示它们的菜单。

要将 About 框和容器的“帮助”菜单合并,请按照以下步骤执行:

  1. 单击“工程”菜单的“添加窗体”。

  2. 双击“添加窗体”对话框的“带有系统信息的关于对话框”图标,添加““关于”对话框”窗体到工程中。

  3. 设置与 ActiveX 文档相适应的窗体和 Label 控件的 Caption 属性。

  4. 在“工程资源管理器”窗口双击 UserDocument,显示其设计器。

  5. 单击 UserDocument 设计器选中它,然后单击“工具”菜单上的“菜单编辑器”,显示“菜单编辑器”对话框。

  6. 单击“标题”框并键入 &Help

  7. 单击“名称”框并键入 mnuHelp

  8. 单击“协调位置”框,并单击“居右”。

  9. 单击“下一个”按钮来创建一个新的菜单项。

  10. 在“标题”框中键入 "About" 和 ActiveX 文档的名称。

  11. 在“名称”框中键入 mnuAbout

  12. 单击面向右的箭头按钮,以缩排菜单项。

  13. 单击“确定”。

  14. 双击 ActiveX 设计器,显示其“代码”窗口。

  15. 把下面的代码添加到 mnuAbout 的 Click 事件中:
    Private Sub mnuAbout_Click()
    frmAbout.Show vbModal
    End Sub