首页 相关文章 如何截取屏幕画面

如何截取屏幕画面

  事实上,这是摸拟按下Print Screen的作法

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)Const theScreen = 1Const theForm = 0Private Sub Command1_Click()Call keybd_event(vbKeySnapshot, theForm, 0, 0)'若theForm改成theScreen则Copy整个ScreenDoEventsPicture1.Picture = Clipboard.GetData(vbCFBitmap)End Sub
[ 查看全文 ]

2016-02-19 标签:

如何截取屏幕画面的相关文章

手机页面
收藏网站 回到头部