在VBA中, 選項按鈕是分組的, 在一組中只有一個按鈕處於選中或按下狀態。 在應用程式中要從幾個選項中選一個時, 就可以用到選頂按鈕控制項。
下面以一個“用選項按鈕設置表單字型大小和顏色”的實例來說明選項按鈕的使用。
1 新建表單並插入如下控制項:
Sub 設置字體格式()
frmFontsize.Show
End Sub
3 編寫表單代碼Private Sub opt10_Click()
txtFont.Font.Size = 10
End Sub
Private Sub opt15_Click()
txtFont.Font.Size = 15
End Sub
Private Sub opt20_Click()
txtFont.Font.Size = 20
End Sub
Private Sub opt25_Click()
txtFont.Font.Size = 25
End Sub
Private Sub optBlack_Click()
txtFont.ForeColor = vbBlack
End Sub
Private Sub optGreen_Click()
txtFont.ForeColor = vbGreen
End Sub
Private Sub optRed_Click()
txtFont.ForeColor = vbRed
End Sub
Private Sub optYellow_Click()
txtFont.ForeColor = vbYellow
End Sub
在表單frmFontsize調用後,
即可進行如下操作:
-End-