Checked ToolStrip子菜单项

Question

我试图在VB.Net中创建一个菜单，其中菜单中的一个项目有一个子菜单，当用户将鼠标悬停在菜单上时，它会向旁边展开。换句话说，一个完全普通的子菜单，每个人都用了一百万次。

我的主菜单项是类ToolStripMenuItem。我可以通过使用该项目的“DropDown”成员来接近我想要的行为。这会正确地创建子菜单行为，但我还需要能够检查和取消选中子菜单中的项目。我已将子菜单项“CheckOnClick”属性设置为True，但运行程序时仍未显示复选框。

是否有可能得到此行为？ ToolStripMenuItem可能吗？

下面的代码我现在有，它靠拢，但并没有给我复选框：

Dim mainItem As ToolStripMenuItem = New ToolStripMenuItem() 
mainItem.Text = "Click For Submenu" 

Dim subMenu As ToolStripDropDown = New ToolStripDropDown() 
For Each item As ToolStripMenuItem In listOfItems 
    item.CheckOnClick = True 
    subMenu.Items.Add(item) 
Next 

mainItem.DropDown = subMenu 

Answer 1

尝试摆脱那个子变量和更改代码是这样的：

For Each mi As ToolStripMenuItem In listOfItems 
    mi.CheckOnClick = True 
    mainItem.DropDownItems.Add(mi) 
Next