Visual Basic Foro
Programación => Visual Basic 6 => Mensaje iniciado por: NsTeam en Noviembre 30, 2010, 02:06:40 pm
-
Hola Gente...
Se me surgio un problema y quize acudir a ustedes para ver si me dan una manito
Como podria hacer para que un Timer Lea Linea por Linea el contenido de un texbox
me Explico:
en un intevalo de 1 segundo lea linea por linea el contenido de un textbox
y luego al terminar de leer la ultima linea vuelva a leer la primera linea
espero dejarme entender... gracias a todos y un fuerte abrazo
-
con un for podes solucionar eso
-
con un for podes solucionar eso
un For? pero leer linea por linea uhmmnm??? :-\
-
Dim sText() as String
Dim i as integer
Private Sub Boton1_Click()
If Text1.Text = "" Then
Msgbox "Complete algo"
Exit Sub
End if
sText = Split(Text1.Text, vbCrLf)
Timer1.Interval = 1000
Timer1.Enabled = true
Text1.Enabled = false
i = 0
End Sub
Private Sub Button2_Click()
Timer1.Enabled = false
Text1.Enabled = true
End Sub
Private Sub Timer1_Tick()
Label1.Text = "Linea actual: " & sText(i)
i = i + 1
If i = UBound(sText) Then i = 0
End Sub
Lo hice todo al vuelo, si no funciona, te lo arreglas, la lógica esta ahi. Divides linea por linea (lo puedes hacer por array como hice yo, o buscando las posiciones de las lineas con InStr y Mid) y lo usas para lo que tengas que usar. El timer esta puesto cada segundo
Espero que te sirva
-
sos groso man... gracias por la ayuda