[VB6] Ruotare il foglio della stampante

[yyzyyz]

Private Sub Command2_Click()
CommonDialog1.Flags = &H40  ' Apre Finestra dialogo Imposta stampante
CommonDialog1.ShowPrinter
End Sub

3d su orientamento stampa