本主题中的某些内容可能不适用于某些语言。
返回或设置显示在“Office 助手”气球中的标题。String 类型,可读写。
可通过以下语法指定显示在气球标题中的图形:{type location sizing_factor},其中 type 是 bmp(位图)或 wmf(Windows 图元文件);location 是资源 ID 或路径及文件名;sizing_factor 指定 wmf 的宽度,对于 bmp 可省略此值。
气球标题同时支持带下划线的文字以及使用系统调色板的 16 种颜色之一的文字。若要在标题中显示带下划线的文字,请使用语法 {ul} 或 {ul 1};用 {ul 0} 可清除下划线。若要改变标题字符的颜色,请在字符串之前加上字符序列 {cf number},其中 number 是下表中所列的系统颜色值之一:
系统颜色值 | 对应颜色 |
---|---|
0 | 黑色 |
1 | 暗红 |
2 | 深绿 |
3 | 深黄 |
4 | 深蓝 |
5 | 深品红 |
6 | 深青 |
7 | 浅灰 |
248 | 灰 |
249 | 红 |
250 | 绿 |
251 | 黄 |
252 | 蓝 |
253 | 品红 |
254 | 青 |
255 | 白 |
如果指定了上述系统颜色值以外的其他数值,那么标题文字为黑色。
本示例创建并显示一个具有标题、文字和三个区域选项的气球。
With Assistant.NewBalloon
.Button = msoButtonSetOkCancel
.Heading = "Regional Sales Data"
.Text = "Select a region"
For i = 1 To 3
.CheckBoxes(i).Text = "Region " & i
Next
.Show
End With