양식을 어떻게 인쇄합니까?

Question

사용자가 단추를 클릭하면 내 VB.Net Windows.Form의 이미지를 인쇄해야합니다. 이 작업을 수행하는 좋은 방법이 있습니까?

Answer 1

PrintForm 구성 요소를 사용해야합니다. How to: Print a Form by Using the PrintForm Component를 참조하십시오

을 PrintForm 구성 요소는 빨리가하는 PrintDocument 구성 요소를 사용하지 않고 화면 에 표시된대로 정확하게 형태 의 이미지를 인쇄 할 수 있습니다. 다음 절차 은 양식을 프린터로 인쇄하는 방법, 을 인쇄 미리보기 창, 캡슐화 된 포스트 스크립트 파일로 보여줍니다.

Answer 2

양식의 스냅 샷을 원한다면 화면 캡처를 시뮬레이트해야합니다. 도움이 될 sample입니다. 꽤 못 생겨서 PDF 또는 보고서 빌더를 사용하여 보고서를 작성하는 것이 좋습니다.

Answer 3

이 파워 팩을 살펴보십시오.

http://www.thomasclaudiushuber.com/blog/2009/01/23/the-printform-component-in-the-visual-basic-powerpack-for-windows-forms/

Answer 4

당신이

Imports System.Drawing.Printing 

Public Class Form1 

Dim WithEvents mPrintDocument As New PrintDocument 
Dim mPrintBitMap As Bitmap 


Private Sub m_PrintDocument_PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles mPrintDocument.PrintPage 
    ' Draw the image centered. 
    Dim lWidth As Integer = e.MarginBounds.X + (e.MarginBounds.Width - mPrintBitMap.Width) \ 2 
    Dim lHeight As Integer = e.MarginBounds.Y + (e.MarginBounds.Height - mPrintBitMap.Height) \ 2 
    e.Graphics.DrawImage(mPrintBitMap, lWidth, lheight) 

    ' There's only one page. 
    e.HasMorePages = False 
End Sub 

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
    ' Copy the form's image into a bitmap. 
    mPrintBitMap = New Bitmap(Me.Width, Me.Width) 
    Dim lRect As System.Drawing.Rectangle 
    lRect.Width = Me.Width 
    lRect.Height = Me.Width 
    Me.DrawToBitmap(mPrintBitMap, lRect) 


    ' Make a PrintDocument and print. 
    mPrintDocument = New PrintDocument 
    mPrintDocument.Print() 
End Sub 
End Class