OLE Automation and Microsoft Word example:

Sub OLEexample()

    Dim word As Object

    Dim myData As String

    myData = 4 * Atn(1) ' Demonstrates Automatic type conversion

    Set word = CreateObject("Word.Basic")

    Word.AppShow

    word.FileNewDefault

    word.Insert "The following was computed in Cypress Enable: "

    word.Bold 1      ' Show value in boldface

    word.Insert myData

    word.Bold 0

   MsgBox "Done"

End Sub