如何在富文本框中創建上下文菜單

Question

如何在富文本框中創建上下文菜單。我想剪切，複製，粘貼選項，當我右鍵單擊富文本

Answer 1

從MSDN：

Private Sub InitializeMyContextMenu() 
    ' Create the contextMenu and the MenuItem to add. 
    Dim contextMenu1 As New ContextMenu() 
    Dim menuItem1 As New MenuItem("C&ut") 
    Dim menuItem2 As New MenuItem("&Copy") 
    Dim menuItem3 As New MenuItem("&Paste") 

    ' Use the MenuItems property to call the Add method 
    ' to add the MenuItem to the MainMenu menu item collection. 
    contextMenu1.MenuItems.Add(menuItem1) 
    contextMenu1.MenuItems.Add(menuItem2) 
    contextMenu1.MenuItems.Add(menuItem3) 

    ' Assign mainMenu1 to the rich text box. 
    richTextBox1.ContextMenu = contextMenu1 
End Sub 

Answer 2

這篇文章顯示瞭如何添加上下文菜單在運行文本框，還可以實現這與富文本框。試試這個 http://www.authorcode.com/add-contextmenu-with-cutcopy-and-paste-options-to-textbox-in-vb-net/