Metode & Algoritma | List Tutorials | Source Code | About | Sitemap
Konsultan Tesis
Bimbingan dan Konsultasi Tesis Informatika bersama team Project Graduate Indonesia. Konsultasi hanya untuk yang sudah me-Like FB kami (Silahkan LIKE tombol ini jika belum).
. Scroll kebawah untuk memasukan kode AntiSpam Protection. Hasil konsultasi akan kami kirimkan ke email Anda.

Pemrograman VB.NET : Direct Print dengan VB.NET




.


Metode dan Algoritma | Pemrograman VB.NET : Direct Print dengan VB.NET . Anda bisa melakukan konsultasi tentang Pemrograman VB.NET : Direct Print dengan VB.NET melalui form di samping kanan !!!

Untuk melakukan print secara langsung (direct print) pada VB.NET, artinya adalah kita mencetak ke printer tanpa Crystal Report, dll. Maka tambahkan sebuah Tombol (Button) dan sebuah komponen PrintDocument.



Kemudian klik dua kali pada komponen PrintDocument1, tambahkan kode program yang berisi apa yang mau kita tulis ke printer, bisa pula menggambar garis, lingkaran, kotak dsb sesuai koordinat yang kita tentukan :


    Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
        e.Graphics.DrawString("Halo, Test Print", New Font("Arial", 10), Brushes.Black, 10, 10)
        'e.Graphics.DrawRectangle(..)
        'e.Graphics.DrawEllipse(..)
        'e.Graphics.DrawLine(..)
    End Sub


Kemudian dari tombol panggil PrintDocument1 untuk mulai mengeprint, dapat dilakukan dahulu pengubahan setting jumlah copy, orientasi dll :


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        'PrintDocument1.PrinterSettings.Copies = 2
        PrintDocument1.Print()
    End Sub


Kode program selengkapnya :

Public Class Form1


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        'PrintDocument1.PrinterSettings.Copies = 2
        PrintDocument1.Print()
    End Sub


    Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
        e.Graphics.DrawString("Halo, Test Print", New Font("Arial", 10), Brushes.Black, 10, 10)
        'e.Graphics.DrawRectangle(..)
        'e.Graphics.DrawEllipse(..)
        'e.Graphics.DrawLine(..)
    End Sub
End Class




Source Code ActionScript AS3 ASP.NET AJAX C / C++ C# Clipper COBOL ColdFusion DataFlex Delphi Emacs Lisp Fortran FoxPro Java J2ME JavaScript JScript Lingo MATLAB Perl PHP PostScript Python SQL VBScript Visual Basic 6.0 Visual Basic .NET Flash MySQL Oracle Android
Related Post :


Project-G
Judul: Pemrograman VB.NET : Direct Print dengan VB.NET
Rating: 100% based on 99998 ratings. 5 user reviews.
Ditulis Oleh hank2

Anda sedang membaca artikel tentang Pemrograman VB.NET : Direct Print dengan VB.NET, Semoga artikel tentang Pemrograman VB.NET : Direct Print dengan VB.NET ini sangat bermanfaat bagi teman-teman semua, jangan lupa untuk mengunjungi lagi melalui link Pemrograman VB.NET : Direct Print dengan VB.NET.


Posted by: Metode Algoritma Updated at: 16.57

{ 0 komentar... Views All / Send Comment! }

Posting Komentar

Label