VBScript中SendKeys发送左ALT键的键值及左右ALT区分问询

首先明确：VBScript的SendKeys方法无法区分左ALT和右ALT。它提供的%（快捷键前缀）或{ALT}键值，发送的是系统默认的ALT键信号，不会区分左右按键的硬件差异。

如果必须发送左ALT键，需要通过调用Windows API实现，以下是可行的代码示例：

使用keybd_event API发送左ALT键 #

Set objShell = CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")
strTempVBS = objFSO.GetSpecialFolder(2) & "\temp_sendleftalt.vbs"

' 编写包含API调用的代码
strCode = "Private Declare Sub keybd_event Lib ""user32.dll"" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)" & vbCrLf & _
          "Const VK_LMENU = &HA4" & vbCrLf & _
          "Const KEYEVENTF_KEYUP = &H2" & vbCrLf & _
          "keybd_event VK_LMENU, 0, 0, 0" & vbCrLf & _
          "keybd_event VK_LMENU, 0, KEYEVENTF_KEYUP, 0" & vbCrLf

' 创建临时VBS文件执行（普通VBS无法直接声明API）
Set objFile = objFSO.CreateTextFile(strTempVBS, True)
objFile.Write strCode
objFile.Close
objShell.Run strTempVBS, 0, True
objFSO.DeleteFile strTempVBS

代码说明 #

• VK_LMENU是左ALT键的虚拟键码（右ALT对应的是VK_RMENU = &HA5）
• keybd_event函数先模拟按下左ALT，再模拟松开，完成一次完整的按键操作
• 普通VBS脚本无法直接声明Windows API，因此通过创建临时VBS文件执行的方式绕开限制

补充说明 #

如果只是需要用ALT键配合其他按键（比如ALT+F），SendKeys的%F语法完全可以满足需求，只有当必须单独区分左/右ALT硬件按键时，才需要用到API方法。

内容的提问来源于stack exchange，提问作者tcvd