Select Case True
Case RadioButton1.Checked
'Code for RadioButton1
Case RadioButton2.Checked
'Code for RadioButton2
Case RadioButton3.Checked
'Code for RadioButton3
Case Else
'None were selected
End Select