Question

点击后，我一直在处理并寻找提取任何给定子项文本的方法，并在textbox1中写入文本。

这是我到目前为止的代码，但似乎没有用。

Private Sub MenuStrip1_ItemClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolStripItemClickedEventArgs) Handles MenuStrip1.ItemClicked

    Dim result As String

    If AccionAToolStripMenuItem.Checked = True Then
        result = AccionAToolStripMenuItem.Text
        TextBox1.Text = result
    End If

End Sub

Answer 1

您使用的是错误的事件。 ItemClicked事件适用于菜单上的项目。您需要为每个子项添加一个事件：

Sub SomeToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SomeTSMenuItem.Click
    TextBox1.Text = Ctype(sender, ToolStripMenuItem).Text
End Sub

您可以为每个子项创建一个函数或处理同一函数上的每个事件：

Handles item1.Click, item2.Click, item3.CLick

Answer 2

尝试阅读e.ClickedItem.Text。

从Menustrip的单击子菜单项中提取文本

2 个答案: