发表评论(0)作者：, 平台：, 阅读：11694, 日期：2000-03-12

用SendKeys来捉屏


SendKeys 不能实现一些特殊的键， 如 Alt+PrintScr 。 不过使用 API ，可

以改变这样的状况。

声明：

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte,

ByVal Scan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)

使用：

'一个抓屏的例子

Const VK_SNAPSHOT As Byte = &H2C

' 把应用窗口图象放到剪贴板：

Call keybd_event(VK_SNAPSHOT, 0, 0, 0)

'?把整个屏幕抓到剪贴板：

Call keybd_event(VK_SNAPSHOT, 1, 0, 0)

可以用该方法抓 AVI 图象。