StripItem
WinForm.StripItem表示菜单项目,MemuItem,Button,SplitButton和Label等菜单项目的类型同为WinForm.StripItem。
Strip有个Items属性,这是一个集合,包括该菜单中的所有项目,通过该集合,可以获取菜单中指定名称的项目,例如:
Dim
sit As
WinForm.StripItem
= e.Form.Strips("工具栏1").Items("Print")
sit.Enabled
= False
再例如,禁用工具栏1中除保存按钮之外的所有按钮:
For
Each sit
As WinForm.StripItem
In e.Form.Strips("工具栏1").Items
If sit.Name
<> "Save" Then
sit.Enabled
= False
End
If
Next
StripItem的属性:
属性 | 说明 |
Name | 字符型,返回项目名称 |
Text | 字符型,返回或设置项目标题 |
ToolTip | 字符型,返回或设置项目的提示内容 |
Visible | 逻辑型,返回或设置项目是否可见 |
Enabled | 逻辑型,返回或设置项目是否可用 |
Checked | 逻辑型,返回或设置是否勾选项目,仅对MenuItem和Button有效。 |
Index | 整数型,返回项目的位置 |
ParentItem | 返回父菜单项目,如果不存在父项目,则返回Nothing。 |
Items | StripItem集合,返回MenuItem或SplitButton的子项目集合 |
DisplayText | 逻辑型,是否显示标题。 |
TextPosition | 返回或设置标题位置,TextPositionEnum枚举,候选值有Right和Bottom。 |
ShortcutKeys | 返回或设置项目的快捷键,仅对MenuItem有效。 |
DockToRight | 逻辑型,项目是否靠右停放。 |
Image | Image类型,返回或设置项目的图标。 |
BaseControl | 返回对应的底层.net对象,一般用户用不着。 |
StripItem只有两个方法: