ContextMenuStrip 中添加子菜单

ContextMenuStrip 中添加二级菜单

代码如下：


Dim AAA As Windows.Forms.ContextMenuStrip = New Windows.Forms.ContextMenuStrip()


Dim BBB As ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem


Dim CCC As ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem




CCC.Name = "CCC"


CCC.Text = "CCC"




BBB.Name = "BBB"


BBB.Text = "BBB"




BBB.DropDownItems.AddRange(New ToolStripItem() {CCC})




AAA.Items.Add(BBB)




Me.ContextMenuStrip = AAA