Scrivere un file MS Word in VB6

Autore: Luca Ruggiero | Tell a Friend Corso Visual Basic 6 Impara a creare applicazioni gestionali col Visual Basic! Corso VB.NET Impara a creare applicazioni desktop con Microsoft .NET! Corso VBA Impara a gestire documenti MS Office col linguaggio VBA!

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

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

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

        ...
        .Quit
    End With
...