Viernes 13 de julio de 2007 a las 09:48
Hola vicent, mira si has logrado capturar los datos en vb6 como dices en un arreglo(dim array() as string = richtextbox1.lines) cosa q deberias verificar, si lo hace bien antes de pasarle los datos al componente,entonces si te fijas en esa linea estas usando como es correcto un arreglo de String, cosa que no es soportado por ese componente, lo correcto seria que antes de pasarle el dato lo conviertas en entero, por ejemplo con: Cint("40"). Teniendo encuenta que si le envias un cadena alfanumerica a esa funcion va reventar el programa, asi q tienes q poner un control antes con una linea parecida a esta "If IsNumeric(TxtInput.Text) Then MsgBox("Si es número") Else MsgBox("No es número") End If" u otra semejante.
Algo asi maso seria (esta en vb.net):
Dim array() As String = mitexto.Lines
For Each dato As String In array
if IsNumeric(dato) Then
dim tempo as integer = Int(dato)
End If
Next