在窗体中用键盘输入完数据后需要关闭体时，按下“ESC”键后无有反映。得用鼠标点击关闭按钮才能将窗体关闭。如加入下面一段代码可使“ESC”键启作用：

示   例:

点击下载此附件

代   码:

Private Sub Form_Load()

DoCmd.GoToRecord acDataForm, Me.Name, acFirst

Me.KeyPreview = True '如不加，光标在文本中时按下“ESC”无反映

End Sub

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

If KeyCode = 27 Then

DoCmd.Close acForm, Me.Name

End If

End Sub