在 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
廣告