Question

vbs中组合键用什么命令？

vbs中组合键用什么命令？
格式是什么？

我是新手，什么都不懂，谢谢。

Answer 1

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Long) As Integer
Dim a

Private Sub Form_Load()
Timer1.Interval = 1
Timer1.Enabled = False
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
a = Asc(Text1.Text)
Timer1.Enabled = True
End If
End Sub

Private Sub Timer1_Timer()

If GetAsyncKeyState(a) Then MsgBox "热键调用成功！！", vbOKOnly
End Sub
这是设置热键的以个例子，你可以改一下呀