vb1经典教程课件10.pptVIP

* Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then Form1.PopupMenu EDIT, , 500, 500, EDI(3) End If End Sub ? Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then Form1.PopupMenu EDIT, , , , EDI(3) End If End Sub * * * Private Sub Form_Resize() Text1.Move 0, Toolbar1.Height, Form1.ScaleWidth, Form1.ScaleHeight - Toolbar1.Height End Sub * Private Sub Form_Resize() Text1.Move 0, Toolbar1.Height, Form1.ScaleWidth, Form1.ScaleHeight - Toolbar1.Height End Sub * Private Sub Form_Resize() Text1.Move 0, Toolbar1.Height, Form1.ScaleWidth, Form1.ScaleHeight - Toolbar1.Height End Sub 菜单栏和工具栏的使用，为应用程序增色不少；也为用户使用软件提供了最大的便利条件。在VB中为应用程序制作菜单和工具栏非常方便，只要引用相应的控件即可。 §10.1　使用菜单 §10.2 使用工具栏 　　当一个应用软件中有众多可操作内容时，用菜单可使程序界面变得简洁、操作方便而直观。当然，菜单的内容依软件的不同而不同，但菜单的基本形式只有两种： 一、下拉式菜单 通常以菜单栏的形式出现在标题栏下面。 二、弹出式菜单 独立于菜单栏而显示在窗体上的浮动菜单，其菜单项取决于按下鼠标右键时指针所处的位置。 　　下拉式菜单通过左击菜单项打开，分为主菜单（菜单栏）和子菜单（最深可达5层）。菜单的设计要借助菜单编辑器来完成。 1．菜单编辑器 ① 打开“菜单编辑器”的三种方法： 选择“工具”菜单中的“菜单编辑器”。 单击工具栏中的“菜单编辑器” 右击窗体的空白处，选择“菜单编辑器” ② “菜单编辑器”的构成 属性区：10个属性 编辑区： 7个按钮 列表区： 列出已建立的菜单内容 ③“菜单”控件的主要属性 标题（Caption）：设置菜单项的标题，当标题是 “－”时，菜单项是一条分割线；用“＋字母”的方式可设置菜单的热键。 名称（Name）：设置菜单项的名称，以便在程序中引用。 索引（Index）：设置菜单控件数组的下标。 快捷键（ShortCut）：设置击活该子菜单项的快捷键。 复选（Checked）：设置菜单项前是否有复选标记“√”。 有效（Enabled）：设置菜单项有效或无效。 可见（Visible）：设置菜单项是否可见。 ④“菜单编辑器” 的编辑区 “ ”：把选定的菜单下移一个等级。共5个等级。 “ ”：把选定的菜单上移一个等级。 “ ”：把选定的菜单项在同级菜单内向上移动一个位置。 “ ”：把选定的菜单项在同级菜单内向下移动一个位置。 “下一个”：将焦点转移到下一个菜单项。 “插入”：在列表框的当前选定行上方插入一项。 “删除”：删除当前选定项。 ⑤“菜单编辑器” 的列表区 　　列表框显示菜单项的分级列表。将子菜单项缩进以指出它们的分级位置或等级。 　　如果菜单控件的前面没有内缩符号“····”，表明该控件建立的是主菜单，否则为子菜单。 ●实例：制作一个菜单栏，控制文本框中的文字效果：主菜单有：字体、字号、颜色、字型、关闭；除了关闭菜单项以外，其它菜单项中均有子菜单；相应的效果应在菜单项中有复选标记！ 2．菜单控件数组 ①作用： 　◆可动态增减菜单控件； 　◆简化程序、缩减程序代码。 ②创建方法： 　　在菜单编辑器中给菜单项起同一个名字，并设置其下标即可。 ③注意事项： 　◆同一个菜单控件数组中的各菜单项名称必须相同； 　◆控件数组元素的下标必须是升序； 　◆控件数组元素必须是连续的且在相同的子菜单内； ④实例： 　　在例9-2（简易文本编辑器）中加入菜单，并增加“编辑”功能。 3．菜单项的可用与不可用 　　 菜单可用与否应根据程序的运行状