网上下的VB.NET截屏程序，试过好用，哪位大侠给详细解释一下！另外，怎么把截图加载到Picturebox里？

VB.NT用的是触发事件，一按就会触发，要不你加个timer控件，延迟一秒

我们拥有10多年网页设计和网站建设经验，从网站策划到网站制作，我们的网页设计师为您提供的解决方案。为企业提供做网站、成都网站设计、微信开发、微信小程序定制开发、手机网站开发、成都h5网站建设、等业务。无论您有什么样的网站设计或者设计方案要求，我们都将富于创造性的提供专业设计服务并满足您的需求。

标题的问题：你先把图片保存，再加载

vb.net 2008 如何将指定的窗体截图并保存

INTOUCH自带的就有，打印屏幕的命令

自己写个时间条件运行那命令就可以了

PRINTSCREEN这个命令 具体怎么用 看下帮助

希望我的回答对你有所帮助

如有其他问题，可以继续追问，您的采纳是我前进的动力！

vb.net 截屏 ，获取活动窗口

'模块中

Declare Function GetDC Lib "user32" (ByVal hwnd As Long) _

As Long

Public Declare Function ReleaseDC Lib "user32" (ByVal hwnd As Long, ByVal hdc As Long) As Long

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

'form1中

Private Sub Command1_Click()

Dim hDCtmp As Long, picWidth As Double, picHeight As Double

Dim x As Double

Dim y As Double

x = Val(Text2.Text)

y = Val(Text3.Text)

picWidth = Val(Text3.Text)

picHeight = Val(Text4.Text)

hDCtmp = GetDC(0)

BitBlt Picture1.hdc, 0, 0, picWidth, picHeight, hDCtmp, x, y, vbSrcCopy

ReleaseDC 0, hDCtmp

End Sub

目的: 将屏幕按照指定坐标和大小进行截取成图,在picture1显示

问题: 大小是相同了,为什么截取的坐标不对,只是屏幕上的左上

相信大家都用过QQ截图功能。不过很多人并没有真正掌握好它的用法。将QQ截图与其它截屏和制图软件配合使用，会有意想不到的效果。

获取颜色的RGB值

我们在编辑图片或网页的时候，经常需要获取某种颜色的“RGB值”，所以很多人都安装了第三方的颜色吸取工具。其时用QQ截图键即可获取屏幕上任意颜色的RGB值。

当按下“Ctrl+Shift+A”弹出“截图”提示框时，提示框中的“当前像素RGB”即为当前鼠标屏幕位置的颜色RGB值，将鼠标移动到你想查看的屏幕颜色上即可获得相应的RGB值（如图1）。

图1精确截取图片大小

有时我们对要使用的截图尺寸有严格要求，比如论坛签名或QQ头像等。用QQ截图键可以按尺寸精确截取，一步到位无需再进行后期裁剪了。

按下QQ截图键，按住鼠标不放选取截取范围时，在鼠标上方会有一个信息框显示当前范围的详细信息，其中“矩形大小”就是以像素来表示的图片的尺寸大小，括号内的数字分别表示的是长和高（如图2）。松开鼠标调整截图框时，对照“矩形大小”就可以按需要的尺寸来精确截图范围，然后用鼠标点住截图框将截图框拖到要截取的图片上，双击即可获得所需尺寸的图片了。

图2图片拼贴好帮手

大部分的截图软件一次只能截取一张图片，当要截取多张图片并进行拼贴组合时，就需要一张一张截取全部保存后再进行拼贴操作，非常麻烦。

我们知道用QQ截图键截取的图片可以在任一个可以粘贴图片的程序中使用，这样只需用截图软件进行一次截图操作，剩下的图片用QQ截图键来截取，然后依次粘贴到截图软件的窗口中即可快速进行拼贴操作了，是不是很方便啊。

小提示：QQ截图键无需打开聊天窗口即可使用，截取的图片在任一可粘贴图片的程序窗口中如画图、Word等，使用“粘贴”命令即可使用

请问：在vb.net2015中，如何编写截图程序？

Me.Refresh()

Dim memory As Image = New Bitmap(Me.Width, Me.Height)

Dim g As Graphics = Graphics.FromImage(memory)

g.CopyFromScreen(Me.Left, Me.Top, 0, 0, New Size(Me.Width, Me.Height)) '这里是截屏核心代码

Dim FilePath As String = ""

Dim d As New SaveFileDialog

d.Filter = "JPEG图像|*.JPEG"

If d.ShowDialog = Windows.Forms.DialogResult.OK Then

FilePath = d.FileName

If FilePath = "" Then Exit Sub

'If FilePath.Substring(FilePath.Length - 1, 1)  "\" Then FilePath = FilePath  "\"

Else

Exit Sub

End If

d.Dispose()

memory.Save(FilePath)

MessageBox.Show("图像已经保存到： "  FilePath, "截图成功", MessageBoxButtons.OK, MessageBoxIcon.Information)

分享文章：VB.net如何截屏 vb 截图
当前路径：http://chengdu.cdxwcx.cn/article/hehdhh.html