• Home
 · 
• Custom Controls/Forms/Menus
 · 
• A ten-line function that returns the index of a selected OptionButton in a collection. i.e : s = fn

A ten-line function that returns the index of a selected OptionButton in a collection. i.e : s = fn

A ten-line function that returns the index of a selected OptionButton in a collection. i.e : s = fnGetOptButtonChecked(Option1)

Rate A ten-line function that returns the index of a selected OptionButton in a collection. i.e : s = fn

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

    Dim octrTemp As OptionButton
    
    fnGetOptButtonChecked = -1
    
    For Each octrTemp In optButtonCollection
        If octrTemp.Value = True Then
            fnGetOptButtonChecked = octrTemp.Index
            Exit For
        End If
    Next

End Function