網(wǎng)上下的VB.NET截屏程序，試過好用，哪位大俠給詳細解釋一下！另外，怎么把截圖加載到Picturebox里？

VB.NT用的是觸發(fā)事件，一按就會觸發(fā)，要不你加個timer控件，延遲一秒

創(chuàng)新互聯(lián)擁有網(wǎng)站維護技術和項目管理團隊，建立的售前、實施和售后服務體系，為客戶提供定制化的成都網(wǎng)站設計、網(wǎng)站制作、網(wǎng)站維護、雅安電信機房解決方案。為客戶網(wǎng)站安全和日常運維提供整體管家式外包優(yōu)質服務。我們的網(wǎng)站維護服務覆蓋集團企業(yè)、上市公司、外企網(wǎng)站、商城網(wǎng)站開發(fā)、政府網(wǎng)站等各類型客戶群體，為全球上千余家企業(yè)提供全方位網(wǎng)站維護、服務器維護解決方案。

標題的問題：你先把圖片保存，再加載

請問：在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("圖像已經(jīng)保存到：?"??FilePath,?"截圖成功",?MessageBoxButtons.OK,?MessageBoxIcon.Information)

VB截取屏幕

[DllImport("user32.dll", EntryPoint = "GetDC")]

public static extern IntPtr GetDC(IntPtr hWnd);

[DllImport("user32.dll", EntryPoint = "ReleaseDC")]

public static extern IntPtr ReleaseDC(IntPtr hWnd, IntPtr hDC);

[DllImport("user32.dll", SetLastError = true)]

static extern IntPtr FindWindowEx(IntPtr hwndParent, IntPtr hwndChildAfter, string lpszClass, string lpszWindow);

[DllImport("user32.dll", SetLastError = true)]

static extern IntPtr FindWindow(string lpClassName, string lpWindowName);

先找到你要截圖的那個窗體的 句柄 然后根據(jù)這個句柄得到改窗體的DC 創(chuàng)建一個bitmap 然后填充 得到的bitmap后 顯示到picturebox里面

本文題目：vb.net的截圖原代碼 vbs截圖代碼
轉載來源：http://www.chinadenli.net/article28/ddoijcp.html

成都網(wǎng)站建設公司_創(chuàng)新互聯(lián)，為您提供營銷型網(wǎng)站建設、微信公眾號、微信小程序、定制網(wǎng)站、網(wǎng)站內鏈、定制開發(fā)

廣告

聲明：本網(wǎng)站發(fā)布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經(jīng)允許不得轉載，或轉載時需注明來源： 創(chuàng)新互聯(lián)