該實例主要用來區分單選按鈕與復選框的不同。
(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控件。