如何实现打印屏幕功能,指的是将屏幕图像打印纸上
如何实现打印屏幕功能,指的是将屏幕图像打印纸上
[解决办法]
截获屏幕还没研究过,但是打印图像要用到Graphics.DrawImage
_PrtDoc = New Printing.PrintDocument
AddHandler _PrtDoc.PrintPage, AddressOf PrtDoc_PrintPage
Private Sub PrtDoc_PrintPage(ByVal sender As Object, ByVal ev As Printing.PrintPageEventArgs)
Dim rc As New RectangleF(x1, y1, x2, y2)
ev.Graphics.DrawImage(img, rc)
End Sub