Vb.net 运行时添加的快捷键ContextMenu.Item

Vb.net 运行时添加的快捷键ContextMenu.Item,vb.net,Vb.net,我需要向ContextMenu动态添加一个项目。 像这样: context1.Items.Add("Reserved", Nothing, AddressOf Reserved_Click) 然后,我想我的“保留”项目可以激发与快捷键(比如说)Ctrl+R一样,通过设计师定期添加快捷键 问题是:如何通过基于上例的代码向“保留”项添加快捷方式(Ctrl+R)?您可以直接在ToolStripMenuItem本身上添加此快捷方式。枚举便于指定正确的组合快捷方式 Dim tsItem As New T

我需要向ContextMenu动态添加一个项目。
像这样:

context1.Items.Add("Reserved", Nothing, AddressOf Reserved_Click)
然后,我想我的“保留”项目可以激发与快捷键(比如说)Ctrl+R一样,通过设计师定期添加快捷键


问题是:如何通过基于上例的代码向“保留”项添加快捷方式(Ctrl+R)?

您可以直接在
ToolStripMenuItem
本身上添加此快捷方式。枚举便于指定正确的组合快捷方式

Dim tsItem As New ToolStripMenuItem("Reserved", Nothing, AddressOf Reserved_Click)
tsItem.ShortcutKeys = DirectCast(Shortcut.CtrlR, Keys)
tsItem.ShortcutKeyDisplayString = "CTRL + R"

context1.Items.Add(tsItem)
或者,这也会起作用:

tsItem.ShortcutKeys = Keys.Control Or Keys.R

我说的是Winforms,对不起。