在 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

Swarali Sree

更新于：16 - 12 - 2019

735 次浏览

开启你的 职业生涯

完成课程，获得认证

开始