在Windows应用程序中获取光标位置另一种形式

Question

我的应用程序中有两个表单我从master page.i一起调用两个表单。我在我的母版页中编写了代码 在顶部我声明这样 昏暗的形式作为新的FrmDelivary Dim frm1 As New FrmrecievedDelivaryRequest

在这样的toolstrip菜单事件中：     Dim frm1 As New FrmrecievedDelivaryRequest     frm1.Location = New Point（625,225）
    frm1.MdiParent =我     frm1.Show（）

Dim frm2 As New FrmDelivary
frm2.Location = New Point(965, 0)
frm2.MdiParent = Me 
frm.show() 

如果我按R我希望将光标移到FrmrecievedDelivaryRequest

的特定文本框中

如果我按D我想将光标移到FrmDelivary

的特定文本框中

我该怎么做？我在frmMaster_KeyDown事件中发生了类似的事情：但同一页面再次出现。我已经打开了FrmDelivary的实例，所以我不想再显示相同的页面。我想把光标位置放到这个表单的特定文本框

If e.KeyCode = Keys.A Then

    form.Show()
    form.txtTicket.Focus()
    Cursor.Position = form.txtTicket.Location
end if

我正在使用vb.net windows应用程序

Answer 1

之后

frm1.Show()

地方

frm1.txtTicket.Focus()

我认为你不需要Cursor.Position调用

Answer 2

将frm1和frm2变量设置在代码窗口的顶部，以便可以从所有Subs访问它们。在KeyDown事件中，输入

If e.KeyCode = Keys.A Then
    frm1.Show()
    frm1.txtTicket.Focus()
    Cursor.Position = frm1.txtTicket.Location
end if

问题是您使用“AS NEW frmDelivery”语句实例化表单的新副本。