HanDs
管理员

[Visual Studio文章] 如何截取屏幕画面 





学习中请遵循国家相关法律法规,黑客不作恶。没有网络安全就没有国家安全

本站需要登陆后才能查看

事实上,这是摸拟按下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 = 1
Const theForm = 0

Private Sub Command1_Click()
Call keybd_event(vbKeySnapshot, theForm, 0, 0)
'若theForm改成theScreen则Copy整个Screen
DoEvents
Picture1.Picture = Clipboard.GetData(vbCFBitmap)
End Sub


学习中请遵守法律法规,本网站内容均来自于互联网,本网站不负担法律责任
如何 截取 屏幕 画面
#1楼
发帖时间:2016-7-9   |   查看数:0   |   回复数:0
游客组
快速回复