Aprire un documento Word

[VisualBasico]

Ciao a tutti! Qualcuno conoshe un modo per aprire un documento Word (in formato *.doc) da VB?
Io sono riuscito ad aprire un file in formato *.rtf in un Rich Text Box. Non riesco però da aprire un documento Word. Non esiste un OCX simile per aprire questo tipo di file? Se sì, qual è il codice?

[JamesD]

Non so se esistono ocx, però, se ti può essere utile, puoi aprire un documento word tramite l'oggetto document che puoi usare aggiungendo i riferimenti di word!

[Markooo]

Inanzitutto devi andare nel menu Progetto->Riferimenti e segni l'opzione Microsoft Word 9.0 Object Library.

Ora questa procedura apre il file xxx.doc

Private Sub Form_Load()
  
    Dim objWord As Word.Application
    
    Set objWord = New Word.Application
    
    objWord.Visible = True
    
    Dim objDoc As Word.Document
    
    Set objDoc = objWord.Documents.Add
    
    objDoc.Activate
    Set objDoc = objWord.Documents.Open("Tuo Percorso\xxx")
  
End Sub

In piu':

objDoc.Close (False) 'chiude il documento senza salvere
objDoc.Close (True) 'chiude il documento con salvataggio

Per chiudere definitivamente l'applicazione :

objWord.Quit (True) 'chiude salvando
objWord.Quit (False) 'chiude senza salvare

Per salvare da codice:

objDoc.SaveAs "percorso"

Per stampare un documento:
objDoc.PrintOut

Per inserire del testo
Documento.ActiveWindow.Selection.InsertAfter "Testo"