Scrivere un file MS Word in VB6

Applicazioni desktop con Visual Basic 6
Impara a creare applicazioni gestionali col Visual Basic

Scritto da Luca Ruggiero nella sezione Visual Basic

Concesso in esclusiva a MrWebmaster.it - E' vietata la pubblicazione senza espresso consenso del proprietario

Visual basic mette a disposizione delle comode librerie per lavorare col noto editor di testi di casa Microsoft, il Word. Vediamo un esempio basilare, un primo approccio che potrà in seguito, e con l'esperienza, trasformarsi anche in veri e propri report di stampa da database etc.

Per prima cosa è necessario importare i riferimenti alla libreria del Word; aprite quindi la vostra copia di Visual Basic, create un nuovo EXE ed accedete al menu

Progetto / Riferimenti
e selezionate la voce Microsoft Word X.Y Object Library dove X.Y rappresenta la versione della libreria installata sul computer; probabilmente si tratterà della versione 9.0.

Fate un doppio click sulla Form ed accedete al codice nella Sub di caricamento, la Form_Load(); di seguito il codice corredato da commenti:
Private Sub Form_Load()
    ' DICHIARO UN NUOVO OGGETTO MS WORD
    Dim MyWord As New Word.Application
    ' USO L'OGGETTO...
    With MyWord
        ' OPERAZIONI STANDARD PRELIMINARI
        .Visible = True
        .Documents.Add
        ' SCRIVO NEL FILE
        .Selection.TypeText "Hello, World!"
        ' SALVO IL DOCUMENTO CON NOME SOTTO C:
        .Documents(WordApp.Documents.Count).SaveAs "C:
omefile.doc"
    End With
End Sub
Possiamo impostare alcune opzioni stilistiche al file; in grassetto le parti aggiunte di codice:
Private Sub Form_Load()
    Dim MyWord As New Word.Application
    With MyWord
        .Visible = True
        .Documents.Add
        .Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
        .Selection.Font.Bold = wdToggle
        .Selection.Font.Size = 10
        .Selection.TypeText "Hello, World!"
        .Documents(WordApp.Documents.Count).SaveAs "C:
omefile.doc"
    End With
End Sub
ovvero allineamento, grassetto e dimensioni del carattere; è possibile impostare anche il font, il corsivo, il sottolineato etc.

Possiamo chiudere il documento Word usando il comando .Quit:
        ...
        .Quit
    End With
...

I più cliccati della sezione Visual Basic

:: Guida a Visual Basic 6 (177.800)

:: Una rubrica in VB e Ms Access (98.452)

:: Richiamare una form da un'altra form in Visual Basic (25.004)

:: Interazione tra Visual Basic ed MS Excel (22.438)

:: Una semplice calcolatrice in VB 6 (22.429)

:: Leggere un file Xml col DOM in VB 6 (22.121)

:: Inviare email con CDO in Visual Basic 6 (21.549)

:: Un visualizzatore di immagini in VB 6 (14.546)

:: Un semplice sistema di Login in VB 6 (12.881)

:: Creazione e cancellazione di un file di testo con Visual Basic (12.306)

IN EVIDENZA
DOWNLOAD