自定义函数如何引用到系统原来参数

xinbao

我定义了个一个自定义函数myKeypress
把文本框的OnKeypress事件设为=myKeyPress(keyascii)
我想把文本框原来的按键事件中的KeyAscii参数引用过来
想在我的自己定义函数中检测到按钮，但不能实现，请高手指教。

xinbao

窗体上加一个文本框，名称为txtTest
程序如下：
Option Compare Database
Option Explicit

Private Sub Form_Load()
  txtTest.OnKeyPress = "=myKeyPress(KeyAscii)"
  
End Sub

Private Function myKeyPress(KeyAscii As Integer)
  MsgBox KeyAscii
End Function

出错

zhengjialon

像这种要发MDB上来，至少代码要贴上来。

xinbao

急急！！，请帮助