VB Code:
  1. Private Sub Command1_Click()
  2. If opta.Value = True Then
  3.    Label1.Caption = "10"
  4. ElseIf optb.Value = True Then
  5.    Label1.Caption = "11"
  6. Else
  7.    Label1.Caption = "12"
  8. End If
  9. End Sub