[VBNET] 윈도우 폼(Window Form) - 폼(Form) 화면 그대로 프린트(Print)

* VBNET 윈도우 폼(Window Form) 화면 그대로 프린트(Print) 하기 예제...

 

Main

 

- 화면 구성 : Panel , Listview, Label, Line, GroupBox, printForm

 

위 그림처럼 화면 구성에 printform 을 사용 하기 위해서는 Visual Basic PowerPack dll 이 필요합니다.

 

 

전체 소스 코드

Form1.vb

 

Public Class Form1

    Protected Overrides Sub OnLoad(ByVal e As System.EventArgs)

        ListView1.Items.Clear()

        For iCount As Integer = 1 To 20
            Dim lvi As ListViewItem = New ListViewItem()
            lvi.Text = iCount.ToString()
            lvi.SubItems.Add("TEST " + iCount.ToString())

            ListView1.Items.Add(lvi)
        Next

        MyBase.OnLoad(e)
    End Sub


    Private Sub Form1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown

        'Enter Key Input...
        If e.KeyCode = Keys.Enter Then
            'Form Print 
            PrintForm1.PrinterSettings.DefaultPageSettings.Landscape = True
            PrintForm1.PrinterSettings.DefaultPageSettings.Margins = New System.Drawing.Printing.Margins(50, 50, 50, 50)
            PrintForm1.Print()

        End If

    End Sub
End Class

 

*예제 결과

 

위 그림 처럼 가상 프린트에 폼(Form) 화면이 그대로 인쇄된 모습을 볼 수 있습니다.

 

 

https://kdsoft-zeros.tistory.com/158

[C#] 윈도우 폼(Window Form) - 폼(Form) 화면 그대로 프린트(Print)