如何实现仅用回车键增加记录

winner

我想实现:录入姓名,年龄后,按回车,光标移到姓名的文本框中,如此循环增加记录,整个过程完全不用鼠标,不知能否实现这一功能?

现在光标移到按钮处,再按回车,它总是停留在按钮上,想办法把光标移到文本框处即可,该怎样实现呢?请大家帮帮忙!

一点通

再增加一句代码就行了

Private Sub Command4_Click()
On Error GoTo Err_Command4_Click


    DoCmd.GoToRecord , , acNewRec
    Me.姓名.SetFocus

Exit_Command4_Click:
    Exit Sub

Err_Command4_Click:
    MsgBox Err.Description
    Resume Exit_Command4_Click
   
End Sub