Visual Basic - Ayuda con fichero de texto

Hola Amigos,
Tengo que enviar información a través de Internet con un fichero de texto, pero cuando lo creo me genera una linea en blanco al final del archivo, también llamado retorno de carro, mi duda es si es un problema al abrir el fichero que ya me crea la linea y me la arrastra hasta el final.

Antes de hacer la pregunta he consultado por los foros de visual y la verdad es que no he encontrado una solución que me funcione satisfactoriamente.
Alguien tiene una solución que realmente funcione.
os agradecería mucha la ayuda.

Lo hago de la siguiente forma
Abro fichero con Append as #1 (debería utilizar otra cosa)
grabo la linea con Print #1, linea

Muchas gracias por vuestra colaboración.
Un Saludo

EN el mismo vuelvelo a abrir y manda un backspace

Abro fichero con Append as #1 (debería utilizar otra cosa)
grabo la linea con Print #1, linea
close # 1

cuando haces el close vuelve a abrirlo y envia un backspace

Abro fichero con Append as #1 (debería utilizar otra cosa)
grabo la linea con Print #1, "" & vbKeyBack ' o con el codigo ascii

Nos cuentas si te sirve.

Lo siento amigo no me funciona
no solo me crea la ultima linea sino que ahora también me crea otra con un 8 al principio de la ultima linea.

me tiene loco ya no se como solucionarlo.

Gracias por las molestias