使用Tab键跨多个子表单从一个字段移动到另一个字段

Question

我有一个包含9个unbound mainForm的continuous SubForms。我使用SubForm1作为代理父母，并将mainForm上的一个文本框链接到ID的SubForm1。这个ID然后用作其他8个parentField的child subForms。这种安排非常有效，并且在数据输入/数据编辑的记录中移动非常快。但是，当我想使用TAB按钮从一个textBox in SubForm1移动到另一个textBox in 'SubForm2时，我遇到了挑战。我现在必须使用Ctl + Tab移动表格。我知道这是因为多个SubForms正在发生，但对我的用户，我想给人一种感觉，好像它只是一个屏幕。我的用户期望网络体验只使用Tab按钮移动控件。有没有办法，我可以实现它而不使用Ctl按钮？

Answer 1

例如，如果您知道何时将在子窗体1的最后一条记录中，则可以检查keyDown事件并关注下一个子窗体。

这样的事情：

Private Sub last_control_KeyDown(KeyCode As Integer, Shift As Integer)
On Error Resume Next
If Shift  = 0 Then ' this is tab , then go to next subform
subForm2.setFocus
End If
End Sub