2011年度计算机等级考试二级VB基础教程(8)

会计考友

　2.4 定制菜单　　1.菜单概述
　　Windows中的菜单一般由菜单条、菜单、菜单项、子菜单、弹出式菜单组成。
2 r  p, U) n1 u  |/ M* S9 N1 t5 r　　2.普通菜单的设计
( m" [8 x: B* n4 q6 q& m' P5 W　　(1)给菜单命名
; L# `  ~$ E& X　　菜单标题和菜单命令也有Caption和Name属性，设置了这两个属性就等于创建了菜单。Name是一个抽象名称，Caption是屏幕上可见的，可在Caption里加入 “&” 来设置热键。
　　(2)增加和删除菜单
2 G9 |0 b/ v2 c. B　　在Menu Editor中部有三个命令钮分别是下一个、插入、删除。插入可用来增加新的菜单。在这三个键下面的Caption列表框里选中菜单项(这时它的底色就变成深蓝色)，单击插入键，Visual Basic将上一个增亮菜单下推并增亮一空行，就可以输入新菜单名和标题了。删除键可用来删掉菜单。选中要删掉的菜单，单击Delete键就可以删掉它了。
　　(3)移动菜单标题
+ s9 x7 v) E# }& T　　有四种情况：向上移动，向下移动，向左缩排，向右缩排，选中某一菜单标题，安上下箭头，则这个菜单将上下移动到你喜欢的位置上，这也决定了它在界面中的位置。如果按左右箭头，情况则有所不同。由于菜单是分级的，所以，如果它没有缩排，则它是一个菜单标题;如果它缩排一次，那么它将变成一个菜单命令;如果缩排两次，那么它将成为一个子菜单命令。VB里可以总共设计四层子菜单。
: J" O- E9 o; G% f( J/ Q- ?! f- E8 L" ~　　(4)设置分离条
* A# @/ m; G5 D  p. T7 H　　分离条是指在菜单中将命令分组的线，VB将分离条也看成一个菜单项，它也需要Caption和Name属性，而且也有其它属性，分离条与菜单项的区别是分离条的Caption属性必须是连字号即减号。也就是，当设置了一个Caption属性为 “-” 的菜单项时，实际上就设置了一个分离条，分离条的名字可以是barFile1之类，以表明分离条的位置。
7 n( D: u! [' t: ]3 T) x1 m- n　　(5) 菜单的各种简单属性
　　在菜单编辑器里有许多确认框和一些文本框及一个下拉式的列表框，这些决定了菜单的各种属性。
　　1) Checked 复选属性
; ~8 l6 |1 C* E, q5 S- A0 e　　这个属性值设置为真，将在菜单命令左边产生一个打勾的确认标志。
　　2) Enabled有效属性
　　各种各样的用户会产生千奇百怪的操作，在许多Edit菜单里都会有不同形式的让菜单命令模糊的情况。Enabled属性为真，则菜单命令是清晰的，Enabled属性为假，则菜单命令是模糊的，这时用户就不能选中这个菜单项了。
8 }* W* x: g& [! a　　3) Visible 可见属性
　　对暂时不用的菜单， 如果把Visible属性设为假，则菜单根本不会出现在屏幕上。这样做比把Enabled属性设为假显得更加干脆!
+ r; n3 R$ R0 I7 Q4 G+ b  H" U8 j, f　　4) Index属性
. L# }9 w# O6 A1 ?　　可以生成菜单命令数组，用索引号区分开。例如向File菜单中添加一系列最近打开的文件名。添加菜单可用Load方法。以上属性可以在运行时设置，形成动态的菜单的情况。
4 v! a- \  \* R0 R9 q! z　　例如：
: b$ r( f' S! w. O, T　　mnuUndo.Enabled = False
- ?( H* P5 b1 s- t. G7 l　　mnuProperty.Visible = False
　　还可以改变Caption等属性。
　　mnuUndo.Caption = “Redo”
　　3. 生成弹出式菜单(或浮动菜单)
　　几乎每个Windows应用程序都提供弹出式菜单，用户可以右键单击窗体或控件取得这个菜单。弹出式菜单也属于普通菜单，只是不固定在窗体上，而是可以在任何地方显示。
0 [& P* X! B- ~1 k" q　　弹出式菜单用PopupMenu方法调用。假设已经用菜单编辑器生成了名为mnuedit的菜单，则可以在MouseUp事件加入如下代码就可以生成弹出式菜单：
; |7 F/ A2 D1 t3 V7 b　　If Button = 2 Then PopupMenu mnuedit