/VBA/Menus act like radio buttons vb.net

Menus act like radio buttons vb.net

' Uncheck all menu items in this menu except checked_item.
Private Sub CheckMenuItem(ByVal mnu As ToolStripMenuItem, _
    ByVal checked_item As ToolStripMenuItem)
    ' Uncheck the menu items except checked_item.
    For Each item As ToolStripItem In mnu.DropDownItems
        If (TypeOf item Is ToolStripMenuItem) Then
            Dim menu_item As ToolStripMenuItem = _
                DirectCast(item, ToolStripMenuItem)
            menu_item.Checked = (menu_item Is checked_item)
        End If
    Next item
End Sub

Source: vb-helper.com

Similar codes

0 vote216 views1 answer
Vba excel parser xml
VBA
8 votes276 views1 answer
Vba convert 2 bytes to an integer
VBA
5 votes215 views1 answer
Excel vba low byte from INTEGER
VBA
0 vote202 views1 answer
Vba find sub dictionary
VBA
15 votes269 views2 answers
Xl vba dynamic string array
VBA
0 vote219 views1 answer
Vba extract filename from path
VBA
4 votes193 views1 answer
Excel vba how to reset usedrange
VBA
0 vote221 views1 answer
Vbscript check if string is empty
VBA
15 votes253 views1 answer
Excel vba wait
VBA
0 vote203 views1 answer
Vb net check if file exists
VBA