BalloonCheckBox 对象

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

本主题中的某些内容可能不适用于某些语言。

代表“Office 助手”气球中的一个复选框。BalloonCheckBox 对象是BalloonCheckBoxes 集合中的一个成员。

使用 BalloonCheckbox 对象

CheckBoxes(index) 可返回一个BalloonCheckBox 对象,其中的index 是一个 1 到 5 的数字。一个气球中可有 1 到 5 个复选框,每个复选框在其Text 属性赋值后就会显示出来。

下面的示例创建一个有标题、文字和三个区域选项的气球。用户选中一个或多个复选框并单击“确定”按钮后,示例就调用指定的一个或多个过程。

With Assistant.NewBalloon
 .Heading = "Regional Sales Data"
 .Text = "Select your region"
 For i = 1 To 3
 .CheckBoxes(i).Text = "Region " & i
 Next
 .Button = msoButtonSetOkCancel
 .Show
 If .CheckBoxes(1).Checked Then
 runregion1
 End If
 If .CheckBoxes(2).Checked Then
 runregion2
 End If
 If .CheckBoxes(3).Checked Then
 runregion3
 End If
End With

说明

在用户清除气球之前,气球复选框将一直显示用户的选择。在用户单击标签旁的按钮后,气球标签立即返回与用户在Select 方法中的选择相对应的数字。若要将用户选择的数字值传递给Select 方法,则必须将气球类型设置为msoBalloonTypeButtons

Assistant
Balloon
BalloonCheckBoxes (BalloonCheckBox)
BalloonLabels (BalloonLabel)