Hola a todos, e
stoy enganchado con un textbox. La idea es pasarle lineas de texto y que vayan situandose en el textbox una bajo de otra pero tengo el problema que cada vez que le paso una linea machaca la primera linea.
He hecho un pequeño formulario con un listbox y un textbox. Al ejecutarse el codigo lee un directorio y cada fichero xml que encuentra lo añade al textbox y a la lista.
Código:
Dim s As String
List1.Clear
s = Dir("\\206.182.252.156\sat-direct\Aplicaciones\Visual_Basic\2010\xml" & "\*.xml")
Do While s <> ""
List1.AddItem s
Text1.SelStart = Len(Text1.Text)
Text1.Text = s + vbNewLine
s = Dir
Loop
Luego en las propiedades del control tengo multinlinea = true y scrollbars= 2 -Vertical.
La intencion es que muestre cada nombre de archivo xml en una linea del text box y si hay muchos que se active el scroll y puedas subir y bajar el scroll para localizarlos.
Algo asi:
fichero1.xml
fichero2.xml
fichero3.xml
fichero4.xml
ficheron.xml
Me podeis decir si tengo que activar alguna propiedad mas del control, o corregirme el codigo.
Un saludo