PostMessage 问题

Private Sub PostKey(HWnd As Long, KeyCode As KeyCodeConstants)
    PostMessage HWnd, WM_KEYDOWN, KeyCode, 0&
    PostMessage HWnd, WM_KEYUP, KeyCode, 0&
End Sub


Call PostKey(Wnd, Asc("A")) '没反应
Call PostKey(Wnd, vbKeyA)   '正常

通过Debug.Print发现，Asc("A")与vbKeyA是一样的。
想不明白，Asc("A")与vbKeyA有什么本质的区别。vbKeyA就通过，Asc("A")就失败 --------------------编程问答-------------------- http://download.csdn.net/detail/veron_04/2813308 --------------------编程问答-------------------- 补充说明：
Private Sub PostKey(HWnd As Long, KeyCode As KeyCodeConstants)
   PostMessage HWnd, WM_KEYDOWN, KeyCode, 0&
   PostMessage HWnd, WM_KEYUP, KeyCode, 0&
End Sub



Call PostKey(Wnd, vbKeyA) '正常


目的就是想实现：Call PostKey(Wnd, 变量)
但无法使用变量代替常数，使用变量就没反应。。。 --------------------编程问答-------------------- 已经试验很久了，但还是没找到解决的方法。来人啊。。。 --------------------编程问答-------------------- Private Sub PostKey(HWnd As Long, KeyCode As Long)
--------------------编程问答-------------------- Private Sub PostKey(HWnd As Long, KeyCode As KeyCodeConstants)
   PostMessage HWnd, WM_KEYDOWN,byval KeyCode, 0&
   PostMessage HWnd, WM_KEYUP,byval KeyCode, 0&
 End Sub --------------------编程问答-------------------- 想实现什么 --------------------编程问答-------------------- 支持一下5楼。应该要加个byval

是不是Asc("A")与vbKeyA类型不同。这个我直接写65的。。。

补充：VB ,  API