Keskustelu: Ohjelmointikysymykset: VB6: Tulostaminen VB:llä

Miten VB:ssä voi tulostaa jotakin paperille. Onko tähän jokin kombonentti tai jokin funktio. Miten tuostettava tieto annetaan. Vinkkejä tai linkkejä, kiitos.

Tutustu Printer-olion metodeihin: http://msdn2.microsoft.com/en-us/library/aa267233(vs.60).aspx

Tulostaminen on aika samanlaista kuin tekstin tai kuvien piirtäminen ikkunaan. Komennot täytyy vain antaa Printer-oliolle, johon liittyy toki omia komentojakin.

Kokeiluja varten kannattaa asentaa pdf995 tai jokin muu PDF-tiedoston tekevä "tulostin". Käytettävän tulostimen voi valita Blazen linkissä esitetyllä tavalla:

Dim tulostin As Printer
For Each tulostin In Printers
    If tulostin.DeviceName = "PDF995" Then
        Set Printer = tulostin
    End If
Next

Tässä on esimerkki, joka tulostaa yhdelle sivulle tekstiä ja piirtää toiselle ympyrän:

Printer.FontName = "Arial"
Printer.FontSize = 12
Printer.Print "Sivu 1"
Printer.Print "Heipparallaa!"
Printer.Print "Toisella sivulla on ympyrä."
Printer.NewPage ' uusi sivu
Printer.Print "Sivu 2"
Printer.DrawWidth = 3
Printer.Circle (500, 500), 500, vbBlack
Printer.EndDoc  ' tulostaminen

Saako tuon tulostimen valittua jotenkin, esimerkiksi CommonDialogilla, miten tämä tapahtuu?

Putkasta löytyy koodiesimerkki aiheesta.