189 8069 5689

vb.net窗体内容 vb窗体控件有哪些

vb.net 如何把窗口内容作为图元(Meta)格式拷贝到剪切板中?

Dim p1 As New Point(0, 0)

成都创新互联长期为超过千家客户提供的网站建设服务,团队从业经验10年,关注不同地域、不同群体,并针对不同对象提供差异化的产品和服务;打造开放共赢平台,与合作伙伴共同营造健康的互联网生态环境。为北流企业提供专业的成都网站建设、成都网站制作,北流网站改版等技术服务。拥有10年丰富建站经验和众多成功案例,为您定制开发。

Dim p2 As New Point(My.Computer.Screen.WorkingArea.Width, My.Computer.Screen.WorkingArea.Height) '除工具栏全屏

Dim pic As New Bitmap(p2.X, p2.Y)

Using g As Graphics = Graphics.FromImage(pic)

g.CopyFromScreen(p1, p1, p2)

PictureBox1.Image = pic

End Using

Clipboard.SetImage(PictureBox1.Image)

截图到PictureBox1中显示,然后在把PictureBox1.image放到剪切板中

VB2010或VB.NET 怎么能将自身窗体的所有内容保存为图片

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

System.Windows.Forms.SendKeys.Send("%{PRTSC}")

Delay(0.1)

Dim bmp As Bitmap = CType(Clipboard.GetDataObject().GetData(DataFormats.Bitmap), Bitmap)

bmp.Save("c:\test1.jpg", System.Drawing.Imaging.ImageFormat.Jpeg)

End Sub

Private Sub Delay(ByVal tim As Single)

Dim t As Single = Microsoft.VisualBasic.Timer + tim

While t  Microsoft.VisualBasic.Timer

My.Application.DoEvents()

End While

End Sub

VB.NET窗体内容很多,会不会导致窗体最小化后在还原时很卡?

不会卡的,体一显示已经加载到内存了,所以最小化还原是一定不会卡的

不过窗体内容太多会导致以后修改时查找不方便

建议把不同项目分别写在模块中


网页题目:vb.net窗体内容 vb窗体控件有哪些
文章转载:http://cdxtjz.com/article/doopdsh.html

其他资讯