Añadir datos en un txt

[sitiom]

Hola buenas,
a ver si me podéis echar una mano. Tengo un textBox con varias líneas, y me gustaría que al final de cada línea escribiera dos letras (serían RT) un espacio y un número (el 5). Pongo un ejemplo para clarificar un poco:
el TexBox original es:
5000 30 30 20
1000 45 43 21
y me gustaría que quedara
5000 30 30 20 RT 5
1000 45 43 21 RT 5
Muchas gracias y un saludo.

[erbuson]

Si tienes un TextBox con varias lineas, imagino que se trata de un MultiLinea por lo que deberías hacer es pasar su contenido a una matriz y después grabar linea a linea esta matriz añadiendo lo que quieras.

supongo que tambien podrías hacer "una chapuza" pero que obviamente debe funcionar.

En los TextBox las multilineas están separadas entre si por vbCrLf por lo que podrías al grabar hacer un replace por ejemplo

Print #1, Replace(TextBox.Text, vbCrLf, " RT 5 " & vbCrLf)

De hecho, si hicieras con un command por ejemplo

TextBox.Text = Replace(TextBox.Text, vbCrLf, " RT 5 " & vbCrLf) deberías ver el cambio enseguida en el TextBox

[sitiom]

Muchas gracias de nuevo erbuson. Agradezco mucho tu ayuda y paciencia.
Un saludo y gracias amigo.

[baezafr]

yo ya he logrado hacer que aprezcan mis comentarios con palabras que deseo: ejemplo

Franco 13-03-2010 Esto es un mensaje de prueba

pero ahora necesito hacer que el ultimo mensaje que ingrese aparezca de primero

ejemplo:

Franco 15-03-2010 Hola
Franco 13-03-2010 Esto es un mensaje de prueba

estos mensajes se agregan a un archivo de .txt lo que hice que se agregue es el nombre de usuario en este caso "Franco" y la fecha "13-03-2010"

Me podrian ayudar en eso??