5.5.3 Excel VBA的单选按钮和复选框举例

    该实例主要用来区分单选按钮与复选框的不同。
    (1)首先在窗体中添加2个单选按钮和2个复选框，再添加1个文本框和I个命令按钮。当用户选择了某几项后，单击命令按钮，则在文本框中显示当前选定了嘟些项。将命令按钮的Caption属性设N为“确定”，分别将4个选择控件的Caption属性设置为“选项I"、“选项2-、“选项3"、“选项4-。添
    加好控件的窗体如图5.24所示.图5.24创建好的窗体效果
    (2)双击“确定”按钮，在Command 1一lick事件中添加如下的代码:
    Private Sub Commandl Click()
    Textl.Text一，您选择7"
    ，如果选择了单选按钮1
    If Optionl.Value一True Then
    Textl.Text一Textl.Text+
    End If
    ，如果选择了单选按钮2
    If Option2.Value一True Then
    Textl.Text一Textl.Text+
    End If
    ，如果选择了复选框1
    If Checkl.Value一1 Then
    Textl.Text一Textl.Text+
    End If
    ，如果选择了复选框2
    If Check2.Value一1 Then
    Textl.Text .Textl.Text+
    End If
    End Sub
    ，清空文本框
    一选项1"
    .选项2"
    一选项3"
    .选硕9"
    (3)运行这一段程序，选择选项，单击按钮，即可看到在文本框中列出了当前选择的
    选项。图5.25所示是选择了单选按钮2及复选框1和2后的结果.由此可见，单选按钮只能且
    必须选一项，而复选框可以选择不定数目的选顶。
    说明:单选按妞在同一个容器中只能选择其中的一个选项，如果共实现几组单选
    按粗，且其中每一组都可以选择一个选项的功能，可以将每一组单选按妞放I在
    一个容器内，如Frame控件。