Question

vb 中模拟键盘输入1怎么写

我不知道那键盘代码写哪个好，键盘1的代码要怎么写，前面要定义什么常量么？请高人指教。

这是模拟键盘输入F1的部分代码:
Public Const WM_KEYDOWN = &H100
Public Const WM_KEYUP = &H101
Public Const WM_CHAR = &H102
Public Const VK_A = &H41
PostMessage HW, WM_KEYDOWN, VK_F1, 0& '按下F1
PostMessage HW, WM_UP, VK_F1, 0& '弹起F1

Answer 1

假定写一段代码在触发窗体的keypress事件中
private sub form1_keypress(KeyAscii as integer)
dim a(1 to 10)
a(1)=chr(KeyAscii)'---------------------上面是存储字符，下面是删除。
a(1)=val("")
end sub
另外,站长团上有产品团购,便宜有保证

Answer 2

只是要按下`1？直接sendkeys"1"

Answer 3

用sendmessage

追问

我是模拟后台，用postmessage。

追答

t1 = Combo1.Text '需要按下的
PostMessage hwd, WM_KEYDOWN, Asc(t1), MakeKeyLparam(Asc(t1), WM_KEYDOWN) '按下
PostMessage hwd, WM_KEYUP, Asc(t1), MakeKeyLparam(Asc(t1), WM_KEYUP) ' 弹起

上面的你应该看得懂。