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 逻辑型,项目是否靠右停放。
BaseControl 返回对应的底层.net对象,一般用户用不着。

StripItem只有一个方法:


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