《ch10 控件数组与菜单》由会员分享，可在线阅读，更多相关《ch10 控件数组与菜单（11页珍藏版）》请在金锄头文库上搜索。
1、控件数组菜单第十部分 控件数组与菜单Visual Basic程序设计控件数组是指在同一窗体上拥有相同名称、相同 事件过程的同一类控件。控件数组中每个元素(控件)都 有相同的名称，用不同的Index属性(元素下标)确定。 控件数组中不同控件可以有各自不同的属性值(除Name 属性外)。 控件数组元素的Index不能超过32 767。 使用控件数组的好处在于减少事件过程的编码。 如，在窗体中添加10个命令按钮，标题依次为09 ，单击各按钮时在文本框中显示09数字。1 控件数组Visual Basic程序设计Private Sub Command1_Click(Index As Integer)Te
2、xt1 = Index End SubPrivate Sub Form_Load()For i = 0 To 9Command1(i).Caption = iNext End Sub1 控件数组Visual Basic程序设计一、创建控件数组 先向窗体中添加一个控件，选中后按Ctrl+C(复制) ，然后按粘贴，在对话框选择“是”创建控件数组。 控件数组元素的事件过程与普通控件相似，但参 数中多一个Index，用于区分哪个控件。二、举例 编制一个如图所示的计算器。(ex1001.exe)1 控件数组Visual Basic程序设计菜单(Menu)是Windows窗口的常见标准控件，允许 为每个窗
3、体创建一个独立的菜单。 菜单中包括菜单标题、访问键、主菜单、菜单项 、父菜单、子菜单(不能超过4级)、单选菜单、复选菜 单、分隔条、窗口菜单、灰化等概念。2 菜单Visual Basic程序设计一、菜单控件的属性 菜单中每个菜单项都是一个菜单控件。 1.Name属性 2.Index属性 菜单控件也可以组成控件数组。 3.Caption属性 菜单的标题文字，可以使用&定义菜单的访问键。 如果一个菜单的标题为“-”则作为分隔项使用。主菜单 或父菜单不能作为分隔项。 4.Enabled属性 决定菜单项是否可用(灰化)。2 菜单Visual Basic程序设计5.Checked属性 决定菜单项前面是否
4、有复选标记。 6.Visible属性 决定菜单项是否可见。 7.ShortCut属性 菜单项的快捷键，顶层菜单不能设置。运行时只 读。 二、创建菜单 当处于“查看对象”状态时，打开“菜单编辑器”，在 窗口中创建。 需要注意菜单项的次序和层次关系。2 菜单Visual Basic程序设计三、菜单控件的Click事件 菜单项只有一个Click事件。 例：通过菜单数组控制文本框的字体名称。(ex1002.exe)2 菜单Visual Basic程序设计四、弹出式菜单 弹出式菜单即“快捷菜单”，一般在鼠标右键单击后 出现。使用窗体对象的PopupMenu方法弹出菜单： PopupMenu 菜单名,fl
5、ags,x,y,默认项 该方法除“菜单名”参数外，其它都可以省略。 其中，菜单名是菜单编辑器中制作的含有子菜单 的菜单控件名。 X,y是菜单弹出的位置，省略时菜单弹出在鼠标附 近。 默认项是一个菜单名称，指明弹出菜单中哪一项 以粗体显示。 flags参数由两项之和构成，见下页：2 菜单Visual Basic程序设计2 菜单Visual Basic程序设计菜单弹单弹 出位置值值常量意义义0vbPopupMenuLeftAlign与x左对齐4vbPopupMenuCenterAlign与x中间对齐8vbPopupMenuRightAlign与x右对齐菜单单响应应行为为 值值常量意义义0vbPopupMenuLeftButton弹出后响应左键2vbPopupMenuRightButton弹出后左右键都响应在前一示例的基础上加入快捷菜单，如下图：Private Sub Text1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)If Button = 2 Then PopupMenu mnuFontName End Sub2 菜单Visual Basic程序设计
