vb.net - 以编程方式添加 ToolStrip 菜单项

Question

如何以编程方式添加 ToolStrip 菜单项？

Answer 1

以下对我有用，因为我想要的只是实现工具条生成的文本。

Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
    Dim NEOitem As String = TextBox6.Text
    ContextMenuStrip1.Items.Add(NEOitem)
End Sub

Answer 2

这是代码...用于添加非工具条默认控件.. Dim StripHost1 As New ToolStripControlHost(button1) ToolStrip1.Items.Add(StripHost1)

用于添加工具条菜单项（默认值，在设计时也允许）..

Friend WithEvents myToolStripButton As System.Windows.Forms.ToolStripButton
Me.myToolStripButton = New System.Windows.Forms.ToolStripButton
Me.MainToolStrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.myToolStripButton})