【VB技巧】VB截取当前屏幕并保存为Bmp图片

admin
admin
admin
138635
文章
114
评论
2021年4月3日19:00:52评论156 views字数 860阅读2分52秒阅读模式

    VB截取当前屏幕并保存为24位Bmp图片，VB截取屏幕并保存为24位Bmp图片，VB截取屏幕保存为24位Bmp图片，VB截取屏幕保存为Bmp图片，VB截取屏幕保存为图片，VB截取屏幕存为24位Bmp图片，VB截取屏幕存为Bmp图片，VB截取屏幕并存为图片，VB截取当前屏幕，VB截取屏幕保存为24位Bmp图片，VB截取屏幕，VB截取屏幕存为24位Bmp，VB GetDC，GetDC，VB BitBlt，BitBlt。

VB截取当前屏幕并保存为Bmp图片：

Private Declare Function GetDC Lib "user32" (ByVal hwnd As Long) As Long '获取句柄
Private Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long '获取图片数据

Me.BorderStyle = 2 '窗体风格,否则截取不全
Me.AutoRedraw = True '开启自动重绘
BitBlt Me.hDC, 0, 0, Screen.Width, Screen.Height, GetDC(0), 0, 0, vbSrcCopy '获取屏幕数据
'SavePicture Me.Image, "c:a.bmp" '保存为图片,覆盖模式

文章来源于lcx.cc:【VB技巧】VB截取当前屏幕并保存为Bmp图片

相关推荐: 塞尔克的“生存报告”：没有胜利者，我们只是活下来了，伴随着许多噩梦

身为生存狂怎能错过这篇文章，强烈推荐： 没有胜利者，我们只是活下来了，伴随着许多噩梦——塞尔克 http://SHTFPlan.com的Mac Slavo最近在论坛里编辑贴出了Chris Kitze发布在Before Its News的帖子。原帖在生存者论坛里…

免责声明:文章中涉及的程序(方法)可能带有攻击性，仅供安全研究与教学之用，读者将其信息做其他用途，由读者承担全部法律及连带责任，本站不承担任何法律及连带责任；如有问题可邮件联系(建议使用企业邮箱或有效邮箱,避免邮件被拦截，联系方式见首页)，望知悉。
  • 左青龙
  • 微信扫一扫
  • weinxin
  • 右白虎
  • 微信扫一扫
  • weinxin
admin
  • 本文由 发表于 2021年4月3日19:00:52
  • 转载请保留本文链接(CN-SEC中文网:感谢原作者辛苦付出)：
                   【VB技巧】VB截取当前屏幕并保存为Bmp图片https://cn-sec.com/archives/319578.html
                  免责声明:文章中涉及的程序(方法)可能带有攻击性，仅供安全研究与教学之用，读者将其信息做其他用途，由读者承担全部法律及连带责任，本站不承担任何法律及连带责任；如有问题可邮件联系(建议使用企业邮箱或有效邮箱,避免邮件被拦截，联系方式见首页)，望知悉.

发表评论

匿名网友 填写信息