codice:
Private Sub Command1_Click()
Printer.CurrentX = Text1.Left
Printer.CurrentY = Text1.Top
Printer.Print Text1.Text


End Sub

Private Sub Form_Load()
Text1.Text = "Verifica di stampa di una casella multiriga.deve essere lunga"
End Sub
il codice è questo ma non capisco a cosa ti serva.stampa sulla stessa riga non va a capo