/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 vote330 views2 answers
Excel vba close without saving
VBA
0 vote334 views1 answer
Vba pass named range to function
VBA
0 vote357 views1 answer
Vba code for cutoff time
VBA
0 vote342 views1 answer
Excel vba show developer tab
VBA
5 votes929 views1 answer
Vlookup vba
VBA
0 vote360 views1 answer
Vba open report
VBA
0 vote381 views1 answer
Excel vba protect shapes
VBA
0 vote364 views1 answer
Vba html document reference
VBA
0 vote378 views1 answer
Vba parameter adodb null value
VBA
7 votes397 views1 answer
Excerl vba array to range
VBA