在 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

更新于:16-Dec-2019

732 次查看

开始你的 职业

完成课程,获得认证

开始学习
广告