Que tal amigos, espero esten bien, les cuento estoy desarrollando un proyecto de manera autodidacta y me encuentro con el siguiente desafio.
Tengo un texbox multilinea con una 10 lineas de texto, lo que quiero lograr es dividir cada linea del textbox en textboxs independientes.
Es decir la primera linea del textbox multilinea en un textbox la segunda línea en otro texbox y asi sucesivamente.
Espero su ayuda amigos
muchas gracias
Enviado desde mi LG-D805 mediante Tapatalk
Por ejemplo,
Public Sub TextLine()
Dim vLine() As String
If Me.TextBox1.MultiLine = True Then
vLine = Split(TextBox1.Text, vbNewLine)
MsgBox vLine(UBound(vLine))
End If
End Sub
Cita de: Shell Root en 2 Febrero 2015, 13:19 PM
Por ejemplo,
Public Sub TextLine()
Dim vLine() As String
If Me.TextBox1.MultiLine = True Then
vLine = Split(TextBox1.Text, vbNewLine)
MsgBox vLine(UBound(vLine))
End If
End Sub
Gracias estimado, funciona bien, pero solo muestra la ultima linea, hay alguna forma de poder escoger mostrar una linea determinada.
Es correcto, aquí en esta linea tienes la opciones para mostrar un determinado valor,
MsgBox vLine(UBound(vLine))
' MsgBox = Mostrar mensaje
' vLine = Array
' UBound() = Obtener la ultima posicion del array
' Hay verga ajajjaa no me lo toma el GeSHi BUG! jajajajja
Entonces puedes recorrer el array y mostrar cada valor o puedes obtener un valor al alazar dentro del rango del array para mostrarlo.
si no siempre van a ser 10 lineas y pueden ser mas, entonces vas a tener que crear los textbox en tiempo de ejecucion y asignarle cada linea.