VB语言教程——ch08.pptVIP

第8章 菜单与多文档界面的设计 本章要点： 菜单的设计 在运行时控制菜单 多文档界面的设计 8.1 菜 单 简 介 菜单 8.2 菜单编辑器简介 选择“工具”/“菜单编辑器”命令，或者单击工具栏中的“菜单编辑器”按钮，将出现 “菜单编辑器”对话框。 8.3 菜单的设计 菜单的设计过程可以分为两步： 第1步是使用菜单编辑器建立菜单 第2步是为菜单编写代码 8.3 菜单的设计 8.3.1 建立菜单 8.3 菜单的设计 8.3.1 建立菜单 使用菜单编辑器创建该菜单栏的步骤如下： （1）单击工具栏中的“菜单编辑器”按钮打开“菜单编辑器”对话框。确保“窗体”窗口为当前活动窗口，否则“菜单编辑器”按钮无效。 （2）在“标题”文本框中，输入“文件（F）”。其中F被设置为该菜单的访问键。 （3）在“名称”文本框中输入“MenFile”，其他各选项使用默认设置。 （4）单击“下一个”按钮，则菜单控件列表框中的光标条移到下一行。对应的“标题”文本框与“名称”文本框是空的，可从中输入另一个菜单控件。 （5）在“标题”文本框中输入“新建（N）”，再在“名称”文本框中输入“MenNew”。并在“快捷键”列表框中选择快捷键为Ctrl+N。 （6）单击右箭头按钮，则菜单控件“新建”向右缩进了一段距离，并且在其前加入4个点。这表明它成为“文件”菜单中的一个选项。4个点表示一个内缩符号，菜单编辑器就是通过内缩来判断菜单的层次的。 8.3 菜单的设计 8.3.1 建立菜单 （7）单击“下一个”按钮，内缩符号仍然存在，表明所创建的菜单控件仍然是“文件”菜单中的选项。依次为“文件”菜单创建“关闭”、分隔线和“退出”3个选项。 8.3 菜单的设计 8.3.1 建立菜单 （10）在“标题”文本框中输入“编辑（E）”，在“名称”文本框中输入“MenEdit”。 （11）与创建“文件”菜单中各选项的方法一样，为“编辑”菜单创建3个选项。 8.3 菜单的设计 8.3.1 建立菜单 （13）单击“确定”按钮，关闭“菜单编辑器”对话框，创建的菜单标题将显示在窗体上。在设计时，单击一个菜单标题可在其下拉菜单中显示所有选项。 8.3 菜单的设计 8.3.2 编写代码 Private Sub MenNew_Click() “新建”选项 Text1.Text = Text1.Visible = True End Sub Private Sub MenClose_Click() “关闭”选项 Text1.Visible = False End Sub Private Sub MenExit_Click() “退出”选项 End End Sub Private Sub MenColor_Click() “颜色”选项 DiaColor.Action = 3 Text1.ForeColor = DiaColor.Color End Sub Private Sub MenFont_Click() “粗体”选项 Text1.FontBold = True End Sub 8.3 菜单的设计 8.3.2 编写代码 Private Sub MenSize_Click(Index As Integer) “字号”选项 Select Case Index Case 0 Text1.FontSize = 14 “四号”字体 Case 1 Text1.FontSize = 18 “三号”字体 Case 2 Text1.FontSize = 20 “二号”字体 End Select End Sub 8.4 在运行时控制菜单 8.4.1 有效性控制 Enabled属性，用来设置菜单在程序运行时是否有效。 8.4 在运行时控制菜单 8.4.2 菜单项标记 Checked属性用来决定是否在菜单项上显示“√”标记。该属性的默认值为False，即不显示“√”标记。如果设置它的值为True，则显示“√”标记。 8.4 在运行时控制菜单 8.4.3 菜单项的隐藏与显示 Visible属性用来决定菜单项是否显示。该属性的默认值为True，即菜单项总是显示出来的。 8.5 快 捷 菜 单 Private Sub Com_MouseUp(Button As