-1
A
回答
1
Declare Auto Function SendMessage Lib "user32" (_
ByVal hWnd As IntPtr, _
ByVal Msg As Integer, _
ByVal wParam As IntPtr, _
ByVal lParam As Integer) As Integer
Private Enum EDrawingOptions As Integer
PRF_CHECKVISIBLE = &H1
PRF_NONCLIENT = &H2
PRF_CLIENT = &H4
PRF_ERASEBKGND = &H8
PRF_CHILDREN = &H10
PRF_OWNED = &H20
End Enum
Private Function PrintPanel()
Const WM_PRINT As Integer = &H317
Dim myBmp As Bitmap
Dim myGraphics As Graphics
Dim hdc As System.IntPtr
myBmp = New Bitmap(_
Me.FormsDispPanel.DisplayRectangle.Width, _
Me.FormsDispPanel.DisplayRectangle.Height)
myGraphics = Graphics.FromImage(myBmp)
myGraphics.DrawRectangle(Pens.White, New Rectangle(0, 0,
Me.FormsDispPanel.DisplayRectangle.Width, Me.FormsDispPanel.DisplayRectangle.Height))
hdc = myGraphics.GetHdc
'"FormsDispPanel" is your PAnel to print
Call SendMessage(FormsDispPanel.Handle, WM_PRINT, hdc, _
EDrawingOptions.PRF_CHILDREN Or _
EDrawingOptions.PRF_CLIENT Or _
EDrawingOptions.PRF_NONCLIENT Or _
EDrawingOptions.PRF_OWNED)
myGraphics.ReleaseHdc(hdc)
myBmp.Save("d:\out.bmp")
myGraphics.Dispose()
myGraphics = Nothing
myBmp = Nothing
End Function
相关问题
- 1. 如何在asp.net中打印标签或面板的内容?
- 2. vb.net 2010如何打印面板的内容?
- 3. 打印页面内容
- 4. AJAX - 打印页面内容
- 5. 打印页面内容
- 6. 如何打印TPanel内容?
- 7. 如何打印iframe内容
- 8. 漂亮的打印面板中的服务XML内容SAPIU5/Javascript
- 9. 在打开Fancybox时打印内容,在关闭时打印页面内容
- 10. Gwt java打印一个滚动面板的内容
- 11. 打印内容
- 12. 打印内容
- 13. 如何打印我的TabControl的内容?
- 14. 如何打印mongoengine的QuerySet的内容
- 15. 打印样式表 - 如何打印分页内容的所有页面?
- 16. 如何打印BSONDocument的内容
- 17. 如何打印WebBrowser控件的内容?
- 18. 如何仅打印h:datatable的内容?
- 19. 如何打印httprequest请求的内容?
- 20. 如何打印c文件的内容?
- 21. 如何打印UIWebView的内容?
- 22. 如何打印发生器的内容?
- 23. SWT如何打印ScrolledComposite的内容?
- 24. 如何打印单个JPanel的内容?
- 25. 如何打印org.squeryl.dsl.Group的内容?
- 26. 如何打印RichTextBox的内容?
- 27. 如何打印JScrollPane的完整内容?
- 28. 如何打印QGraphicsView的内容
- 29. 如何打印矢量类的内容
- 30. 如何使用打印机打印JFrame的内容
我看不出有任何理由在面板中通过控制循环不会做的正是你想要的东西里面的表格。你说它不工作,但没有详细说明它在做什么。这是一个非常基本的概念.... – 2011-04-25 12:52:08
@Rhhound,你能举出一个示例代码吗? – 2011-04-25 12:53:33
可能的[如何在VB.net中打印]的副本(http://stackoverflow.com/questions/5776452/how-to-print-in-vb-net) – 2011-04-25 13:06:58