Keskustelu: Ohjelmointikysymykset: VB6: CommondDialog Tulostus

Miten saan tehyä niin,että ohjelma tulostaa vain jos painetaan "Tulosta"? Eli siis nytten kun nappia painetaan aukeaa CommondDisalog:in Tulostus ikkuna, ja jos painetaan peruuta ohjelma alkaa kuitenkin tulostamaan...

Private Sub tulosta_Click()
Printteri.ShowPrinter
Printer.Print "test"
Printer.EndDoc
End Sub

Tässä tulee esimerkki:

On Error Resume Next
CommonDialog1.CancelError = True
CommonDialog1.ShowPrinter
If Err = 32755 Then
    MsgBox "Valittiin peruutus"
Else
    MsgBox "Valittiin tulostus"
End If

Ensin määritetään, että peruutusnapin painaminen aiheuttaa "virheen". Sitten tutkitaan, onko kyseistä virhettä ilmennyt, ja jos on, niin peruutusnappia on painettu.

Jee se toimii...Kiitos paljon