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只有一个方法:


本页地址:http://www.foxtable.com/webhelp/scr/3220.htm