在 SAP 中使用 VBA 打印屏幕
如果你正在使用 SendKeys 则避免使用它。我在过去的项目中使用过它,它似乎不一致且容易出错。
你可以在模块顶部使用以下代码片段,并在需要时调用它。
Option Explicit Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal _bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long) Private Const KEYEVENTF_KEYUP = &H2 Private Const VK_SNAPSHOT = &H2C Private Const VK_MENU = &H12 Sub PrintScreen() keybd_event VK_SNAPSHOT, 1, 0, 0 End Sub
广告