Visual Basic 6 - Creare un file di testo

Voglio creare, tramite command button, un file di testo, contenente alcune stringhe, e voglio che questo file venga creato nella stessa cartella del programma eseguibile ".exe".

Dico già "Grazie" a chi mi risponde.

Nel button inserisci questo:

Open "Percorso .txt" For Append As #1
Print #1, "Testo da inserire"
Close #1

per il percorso dell'eseguibile si usa app.path
occhio però perchè non dà l'ultima "\"

si ma ammettendo che l'utente sposta l'eseguibile in un'altra cartella, poi quando vado a salvare nuovamente il file di testo si trova sempre assieme all'eseguibile???

app.path mi pare che venga aggiornata una sola volta e cioè all'esecuzione,quindi se sposti l'eseguibile(quando è in esecuzione) il file di testo dovrebbe essere generato sempre nel Path in cui si trovava l'eseguibile quando è stato eseguito.