[VB6] Stampare su stampante scelta

[nat99]

Salve.
Ho un piccolo problema. Uso questo codice per selezionare la stampante su cui stampare:

Printer.Print "Ciao"
For Each x In Printers

If x.DeviceName = "PDFCreator" Then
Set Printer = x
Exit For
End If
Next

.EndDoc

La prima stampa la fa sulla stampante predefinita, la seconda su PDFCreator , la terza idem e cosi via.

Dove sbaglio?

[oregon]

Prima stampi e poi scegli la stampante ?

[MItaly]

Originariamente inviato da oregon
Prima stampi e poi scegli la stampante ?

Super-lazy evaluation.