Vb.net 将剪贴板与MenuTreeToolStripItem一起使用

Vb.net 将剪贴板与MenuTreeToolStripItem一起使用,vb.net,Vb.net,下面是关于在菜单条项上按鼠标右键复制菜单项的代码。我还复制了不带格式的设置文本。我的问题是。它不是拍卖/复制到剪贴板,我不确定为什么 Private Sub MenuTreeToolStripMenuItem_MouseDown(sender As Object, e As MouseEventArgs) Handles MenuTreeToolStripMenuItem.MouseDown Select Case MouseButtons Case M

下面是关于在菜单条项上按鼠标右键复制菜单项的代码。我还复制了不带格式的设置文本。我的问题是。它不是拍卖/复制到剪贴板,我不确定为什么

Private Sub MenuTreeToolStripMenuItem_MouseDown(sender As Object, e As MouseEventArgs) Handles MenuTreeToolStripMenuItem.MouseDown
        Select Case MouseButtons

            Case MouseButtons.Left
                'Left click

            Case MouseButtons.Right
                'Right click
                My.Computer.Clipboard.SetText("This is a test string.", System.Windows.Forms.TextDataFormat.Rtf)

        End Select
    End Sub
'下面是alt版本

Private Sub MenuTreeToolStripMenuItem_MouseDown(sender As Object, e As MouseEventArgs) Handles MenuTreeToolStripMenuItem.MouseDown
    Select Case MouseButtons

        Case MouseButtons.Left
            'Left click

        Case MouseButtons.Right
            'Right click
            My.Computer.Clipboard.SetText("This is a test string")

    End Select
End Sub
修订守则

Private Sub MenuTreeToolStripMenuItem_MouseDown(sender As Object, e As MouseEventArgs) Handles MenuTreeToolStripMenuItem.MouseDown
    Select Case e.Button

        Case e.Button.Left
            'Left click

        Case e.Button.Right
            'Right click
            My.Computer.Clipboard.SetText("This is a test string.")
    End Select
End Sub

下面的代码非常适合我

Private Sub MenuTreeToolStripMenuItem_MouseDown(sender As Object, e As MouseEventArgs) Handles MenuTreeToolStripMenuItem.MouseDown

    Select Case e.Button

        Case Windows.Forms.MouseButtons.Left
            'Left click

        Case Windows.Forms.MouseButtons.Right
            'Right click
            My.Computer.Clipboard.SetText("This is a test string.")
    End Select
End Sub

System.Windows.Forms.TextDataFormat.Rtf据我所知,将文本设置到剪贴板不需要该参数,为什么要设置它?我一直在尝试其他建议,但我认为后者会更健壮,但我无法将剪贴板捕获不,你不需要它。你试过在那里设置断点吗?如果我添加一个断点,我会得到一条红线;无论是在这种情况下,还是如果我将其标注为if-then-end,如果我在上面显示了我的修订版,但没有对剪贴板进行任何更改,我是否应该在事件之外声明它?这就是我出错的地方,我没有声明窗口。表单最初只是经过测试,它在我这边工作,我感谢那里的反馈。