VB SENDKEYS的问题！关于NUM数字键的请教

来源：百度知道 编辑：UC知道 时间：2024/05/27 17:20:18
VB中 用SENDKEYS模拟NUM数字键中的“1”怎么写呢？
注意：要模拟NUM数字键中的“1”，不是普通的数字“1”
谢谢

SendKeys无法实现..要么用SendMessage或者PostMessage

给你写个简单的例子吧:
在窗体上建立一个command和一个text

Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long

Private Const WM_KEYDOWN = &H100

Private Sub Command1_Click()
'向text发送小键盘的"1"键(不一定是数字"1")
PostMessage Text1.hwnd, &H100, vbKeyNumpad1, 0
End Sub

SendKeys无法实现..要么用SendMessage要么用WinIo模拟...

你可以看看这里的代码
http://www.ghoffice.com/bbs/read-htm-tid-46331.html

netbartp回答正解,给我点分吧,老兄