Button 类
一个由插件创建的工具栏按钮。由 Toolbar.AddButton 返回;通过 WithEvents 持有以接收 OnClick 通知。按钮的 Caption 和 IconData 在运行时可变——标题可以反映状态,图标可以反映切换。
vb
Private WithEvents RefreshButton As Button
Private Sub Host_OnProjectLoaded()
Set RefreshButton = Host.Toolbars(0).AddButton("MyAddIn.Refresh", "Refresh project", _
LoadResData("refresh.png", "ICONS"))
End Sub
Private Sub RefreshButton_OnClick()
Host.CurrentProject.Save
End Sub属性
Caption
按钮的标题。String。当设置了 IconData 时,标题在悬停时显示为工具提示。当 IconData 为空时,标题以内联方式显示为按钮文本。可读/写。
语法:button.Caption [ = value ]
IconData
图标图形,为 Byte() 数组——通常是嵌入的 PNG / ICO 资源的字节。传入 Empty 以移除图标并回退到以内联方式显示 Caption。可读/写。
语法:button.IconData [ = bytes ]
- bytes
- 一个 Byte() 数组(或 Empty)。Variant。
ID
通过 Toolbar.AddButton 创建按钮时分配的唯一 ID。String,只读。
事件
OnClick
当用户点击按钮时触发。
语法:button_OnClick()