VB用API模拟截屏键PrintScreen
Posted 一个码农的蹉跎岁月
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了VB用API模拟截屏键PrintScreen相关的知识,希望对你有一定的参考价值。
很多人用 SendKeys "{PRTSC}" 模拟截屏键 PrintScreen 的时候提示<错误:‘70‘ 拒绝的权限>,于是经常遇到人问...干脆写下来
‘声明 Private Declare Sub keybd_event Lib "user32" Alias "keybd_event" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long) Private Const VK_SNAPSHOT = &H2C ‘截屏 Call keybd_event(VK_SNAPSHOT, 0, 0, 0) ‘设置粘贴板图像为窗体背景 If Clipboard.GetFormat(vbCFBitmap) Then Set Me.Picture = Clipboard.GetData
以上是关于VB用API模拟截屏键PrintScreen的主要内容,如果未能解决你的问题,请参考以下文章