Cara Menampilan Daftar/List Printer yang Terinstall Di Komputer VB6

Berikut ini adalah cara menampilkan daftar nama printer yang terinstall di komputer ke dalam combobox dan menampilkan nama printer default-nya di visual basic 6, untuk mempraktekannya siapkan :

1. Buat 1 Project baru dengan 1 Form dan 1 ComboBox.
2. Set property Style ComboBox menjadi "2 - Dropdown List".
3. Copy-kan coding berikut ke dalam editor form yang bertalian.

          Dim Ptr As Printer   'Deklarasi objek printer
          Private Sub Form_Load()

            If cboPrinter.ListCount = 0 Then
               For Each Ptr In Printers
                   cboPrinter.AddItem Ptr.DeviceName
               Next

            End If
            cboPrinter.Text = Printer.DeviceName  'Tampilkan printer defaultnya.
          End Sub

Tags:

contoh program vb6, contoh fungsi di vb6, cara penggunaan fungsi vb, tutorial vb6, download tutorial vb6, vb6 tutorial download, dasar dasar vb6, belajar vb6, cara mudah belajar vb6, vb6 artikel download, vb6 blog, contoh program vb6, artikel vb6, semua tentang vb6, vb6 api, cara menggunakan module, cara menggunakan class module