1

我一直在处理并寻找一种在单击并在 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
4

2 回答 2

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
于 2013-02-12T16:38:56.787 回答
0

尝试阅读e.ClickedItem.Text。

于 2013-02-12T16:21:24.077 回答