Vb.net 选中ToolStrip子菜单项

我试图在VB.Net中创建一个菜单，其中菜单中的一个项有一个子菜单，当用户将鼠标悬停在该菜单上时，该子菜单会向一侧弹出。换句话说，一个完全普通的子菜单，每个人都使用过一百万次

我的主菜单项属于ToolStripMenuItem类。通过使用项目的“下拉”成员，我可以接近我想要的行为。这将正确创建子菜单行为，但我还需要能够选中和取消选中子菜单中的项目。我已经将子菜单项的“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

---

尝试删除该子菜单变量，并按以下方式更改代码：

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

---

尝试删除该子菜单变量，并按以下方式更改代码：

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

---

成功了！我不知道为什么这个简单的答案这么难找到。谢谢成功了！我不知道为什么这个简单的答案这么难找到。谢谢