设置快捷键

Question

我有一个工具条，如果我点击工具条中，将OPE两个单独的页面，我定的代码在工具条是这样的：

Dim frm As New frmKeyAssignBoard 
     frm.Location = New Point(0, 0) 
     frm.MdiParent = Me 
     frm.Show() 
    Dim frm1 As New FrmrecievedDelivaryRequest 
     frm1.Location = New Point(365, 0) 
     frm1.MdiParent = Me 
     frm1.Show() 

其实这两种形式都是我的儿童窗体,,打开这两个窗体后，我想设置shorcut键，我的意思是如果我点击K光标应该专注于frmKeyAssignBoard中的特定文本框，如果我点击R光标应该专注于FrmrecievedDelivaryRequest中的特定文本框..
可以实现这一点，我正在使用vb.net代码

Answer 1

试试这个：重写ProcessCmdKey方法在你的主窗体中d处理事件。

你说你想快捷键K和R键，我想你的意思按Ctrl +ķ和按Ctrl +[R

Protected Overrides Function ProcessCmdKey(ByRef msg As Message, keyData As Keys) As Boolean 
    Select Case keyData 
     Case (Keys.Control Or Keys.K) 
      ' focus on particular text box in frmKeyAssignBoard 
      Return True 
     Case (Keys.Control Or Keys.R) 
      ' focus on particular text box in FrmrecievedDelivaryRequest 
      Return True 
     Case Else 

    End Select 

    Return MyBase.ProcessCmdKey(msg, keyData) 

End Function