/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

-1 vote179 views2 answers
Excel vba delete empty rows
VBA
0 vote176 views1 answer
Vba extract filename from path
VBA
0 vote171 views1 answer
Excel vba urlmon
VBA
8 votes248 views1 answer
Excel vba determine number of elements in a 2D array
VBA
5 votes180 views1 answer
Excel vba right word from Long Integer
VBA
2 votes172 views1 answer
Vba file from path
VBA
0 vote174 views2 answers
Vba remove line breaks
VBA
1 vote153 views1 answer
How to do error handling in access vba
VBA
0 vote205 views1 answer
Wpf dark title bar
VBA
0 vote172 views1 answer
Windows Forms dark title bar
VBA