On Enter事件在列表框控件内无效（Access 2007 vba）

Question

我有一个显示搜索结果的列表框控件。我需要做的是当我在任何搜索结果上按Enter键时，我想要打开一个表单。我面临的问题是，它有效，但我需要点击＆＃34; Enter键＆＃34;两次。知道为什么吗？我也尝试将代码放在＆＃34; On Key Press＆＃34;事件，但由于某种原因，没有任何反应。

这是我的代码

Private Sub SearchResults_Enter()

 Dim stDocName As String
 Dim stLinkCriteria As String

 stDocName = "frmUpdateProc"
 stLinkCriteria = "[ProcedureName] = '" & Me![SearchResults] & "'"
 DoCmd.OpenForm stDocName

End Sub

非常感谢任何帮助。

由于

Answer 1

正如我之前提到的，Keydown活动有效。感谢@ pony2deer