Browse DevX
Sign up for e-mail newsletters from DevX

Tip of the Day
Language: VB7
Expertise: beginner
Jan 5, 2004



Building the Right Environment to Support AI, Machine Learning and Deep Learning

GetSelectedRadioButtonValue - Retrieving the value of the selected RadioButton

' Return the Tag value of the selected RadioButton from the input array of 
' controls.
' This is useful when you have many radio buttons, with a value associated to 
' each one, and want to select the value of the checked option. Instead of 
' writing something like this:
'    If RadioButton1.Checked Then
'       myVal = 10
'    ElseIf RadioButton2.Checked Then
'       myVal = 20
'    ElseIf RadioButton3.Checked Then
'       myVal = 30
'    End If
' you can set the radiobuttons' Tag property to 10, 20 and 30 respectively,
'  and then write:
'    myVal = GetSelectedRadioButtonValue(RadioButton1, RadioButton2,
'  RadioButton3)

Function GetSelectedRadioButtonValue(ByVal ParamArray radioButtons As _
    RadioButton()) As Object
    For Each btn As RadioButton In radioButtons
        If btn.Checked Then Return btn.Tag
End Function
Marco Bellinaso
Comment and Contribute






(Maximum characters: 1200). You have 1200 characters left.



Thanks for your registration, follow us on our social networks to keep up-to-date