BalloonCheckboxes 集合对象

Assistant Balloon BalloonCheckBoxes (BalloonCheckBox) BalloonLabels (BalloonLabel)

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

一个 BalloonCheckbox 对象的集合。该对象代表“Office 助手”气球中所有的复选框。

使用 BalloonCheckboxes 集合

用 Checkboxes 属性可返回 BalloonCheckboxes 集合。

用 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

显示气球后，将不能再向 BalloonCheckBoxes 集合中添加或删除复选框。

说明

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