为什么在VBA中下列代码不能通过？

为什么在VBA中下列代码不能通过？我的意思其实也是很简单的，在rkdtxt失去焦点时或者是Enter、Esc键按下时，编辑模式结束，在VB中能通过，但是为什么在VBA却通不过呢？
Private Sub rkdtxt_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
  Case 13
   hiderkdtxt
  Case 27
   hiderkdtxt True
End Select
End Sub