Ciao bobo1981,
cerco di semplificare e la cosa è fattibile se inserisci un controllo RichTextBox ed un controllo CommonDialog, poi copia il seguente codice che consente di caricare e stampare il file di testo contenuto nel RichTextBox e se devi fare delle variazioni salvarlo:
codice:
Private Sub CmdRTBStampa_Click()
' Carica il file di testo:
With RichTextBox1
' Percorso e Nome del file di testo:
.LoadFile App.Path & "\Prova.txt"
.BorderStyle = 0
End With
' Stampa il file di testo:
RichTextBox1.SelPrint (Printer.hDC)
End Sub
'------------------------------------------------------
Private Sub CmdRTBSalva_Click()
' Salva il file:
CommonDialog1.ShowSave
RichTextBox1.SaveFile CommonDialog1.FileName, rtfRTF
End Sub
Dovrebbe essere sufficiente per l'operazione che vuoi fare.