CommandBarControl 对象

优质
小牛编辑
128浏览
2023-12-01

全部显示

CommandBars (CommandBar)
CommandBarControls (CommandBarControl)
CommandBarButton
CommandBarComboBox
CommandBarPopup

代表一个命令栏控件。CommandBarControl 对象是CommandBarControls 集合中的成员。CommandBarControl 对象与CommandBarButtonCommandBarComboBox 以及CommandBarPopup 对象具有同样的属性和方法。

注意 若要为自定义命令栏控件编写 Visual Basic 代码,可使用CommandBarButtonCommandBarComboBoxCommandBarPopup 对象。若要为容器应用程序中的内置控件写代码,而该控件又不能用上述三个对象中的任意一个表示,那么可使用CommandBarControl 对象。

使用 CommandBarControl 对象

Controls(index) 可返回一个CommandBarControl 对象;此处index 是该控件的索引号。(该控件的Type 属性必须是msoControlLabelmsoControlExpandingGridmsoControlSplitExpandingGridmsoControlGridmsoControlGauge。)

注意 声明为CommandBarControl 的变量可取的值为:CommandBarButtonCommandBarComboBoxCommandBarPopup

FindControl 方法也可返回一个CommandBarControl 对象。以下示例查找一个msoControlGauge 类型的控件。如果找到,那么显示该控件的索引号及其所在命令栏的名称。在本示例中,变量lbl 代表一个CommandBarControl 对象。

Set lbl = CommandBars.FindControl(Type:= msoControlGauge)
If lbl Is Nothing Then
 MsgBox "A control of type msoControlGauge was not found."
Else
 MsgBox "Control " & lbl.Index & " on command bar " _
 & lbl.Parent.Name & " is type msoControlGauge"
End If