con le istruzioni:
codice:
Open mstrPathSetup For Output As #1 

    Write #1, "Questa è una prova"
    'oppure
    Print #1, "Questa è una prova" 

Close #1

...cerca sull'help e vedi quale ti serve