《my第9章菜单》-公开课件.pptVIP

第9章 第2讲 菜单 学习目标： 学会使用菜单编辑器建立菜单 掌握菜单项的增减与控制 9.2 菜单的设计与应用－相关概念 9.2 菜单的设计与应用－相关概念 9.2 菜单的设计与应用－使用菜单编辑器 9.2 菜单的设计与应用－使用菜单编辑器 9.2 菜单的设计与应用－设计下拉菜单 9.2 菜单的设计与应用－设计下拉菜单 9.2 菜单的设计与应用－设计弹出菜单 9.2 菜单的设计与应用－设计弹出菜单 * * * 1. 菜单的类型 下拉菜单：常以菜单栏的形式出现在标题栏下面。 弹出菜单(快捷菜单)：独立于菜单栏而显示在窗体上的浮动菜单，其菜单项取决于按下鼠标右键时指针所处的位置。 返回目录 2. VB中的菜单控件 菜单和菜单项均看作是菜单控件 菜单控件两个最重要的属性 名称(Name)：程序代码中用来引用菜单控件 标题(Caption)：出现在控件上的文本 菜单控件只响应Click事件 返回目录 打开菜单编辑器： “工具→菜单编辑器” 工具栏“菜单编辑器”按钮 1. 常用属性 标题：设置Caption属性 字符前加，该字符成为访问键 只输入一个减号- ，创建分隔条 名称：设置Name属性 注：对分隔条，也需定义名称 索引(Index)：用于菜单控件数组 快捷键 、 复选(Checked) 有效(Enabled)、 可见(Visible) 返回目录 2. 编辑菜单控件 返回目录 如果菜单控件的前面没有内缩符号“····”，表明该控件建立的是主菜单，否则为菜单命令或子菜单。 方法：先通过菜单编辑器设计菜单，然后编写各菜单控件的Click事件过程。 [例1] 创建简易编辑器 (1) 设计菜单 返回目录 [例1] 创建简易编辑器 (2) 设计界面 菜单下面绘制两条直线(两个Line控件)，一条为黑色，一条为白色。 黑线的Y1和Y2属性设为0 白线的Y1和Y2属性设为10 文本框Text1： MultiLine设为True ScrollBars设为3 (3) 编写菜单控件的Click事件过程 返回目录 用PopupMenu方法可显示弹出式菜单 [对象.]PopupMenu 菜单控件名称 若“对象”缺省，则在当前窗体中显示弹出菜单 通常，按下鼠标右键时显示弹出菜单，例如： Private Sub Form或控件名称_MouseUp (Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then 如果按的是鼠标右键 PopupMenu 菜单名 显示弹出菜单 End If End Sub 返回目录 [例2] 弹出菜单设计 (1) 打开例12.1所建立的工程 (2) 添加如下的事件过程： Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then PopupMenu mnuEdit 弹出名称为mnuEdit的菜单 End If End Sub 注：若要创建一个不显示在菜单栏中的弹出菜单，设计菜单时，需取消主菜单的“可见”复选框。 返回目录 * * * *