Index was outside the bounds of the array

[mrprogman]

Tengo un dropdownlist con n valores,el cual necesito me muestre esos n valores en diferentes textbox y me marca el siguiente error.

Index was outside the bounds of the array

..tengo el siguiente codigo

If DropDownList1.SelectedItem IsNot Nothing Then
Dim Item As [String] = DropDownList1.SelectedItem.Text
Dim Segments As [String]() = Item.Split("-"c)

TextBox1.Text = Segments(0).Trim()
TextBox2.Text = Segments(1).Trim()
TextBox3.Text = Segments(2).Trim()
TextBox4.Text = Segments(3).Trim()
TextBox5.Text = Segments(4).Trim()
TextBox6.Text = Segments(5).Trim()
End If

alguien me puede ayudar con esto..?

[Aquaventus]

ese error es porque estas mandandole un indice que no existe en el array. Verifica que al hacerle split obtengas los 6 parametros que le estas pasando. Saludos!.

[mrprogman]

"ese error es porque estas mandandole un indice que no existe en el array. Verifica que al hacerle split obtengas los 6 parametros que le estas pasando. "


Tengo un dropdown list donde estan los 6 registros q necesito redireccioanar al textbox...a que te refieres con obtener los 6 parametros..?

If DropDownList1.SelectedItem IsNot Nothing Then
Dim Item As [String] = DropDownList1.SelectedItem.Text
Dim Segments As [String]() = Item.Split("-"c)

TextBox1.Text = Segments(0).Trim()
TextBox2.Text = Segments(1).Trim()
TextBox3.Text = Segments(2).Trim()
TextBox4.Text = Segments(3).Trim()
TextBox5.Text = Segments(4).Trim()
TextBox6.Text = Segments(5).Trim()
TextBox6.Text = Segments(6).Trim()
End If

[Ka0stj]

A lo que se refiere Aquaventus es que verifiques la cantidad de registros que te regresó el Split y guardaste en Segments, estas desplegando indices del 0-6 checa cuantos valores tienes en el array Segments.

[mrprogman]

"checa cuantos valores tienes en el array Segments."

crees q falte inicializar el array.?..por que ese es todo el codigo que tengo, y los valores que estan ahi es todo lo que esta declarado. Me podrias indicar con codigo como quedaria...Saludos y gracias por tu respuesta.

[Aquaventus]

Hola mrprogman, lo que Ka0stj y yo tratamos de decirte es que hagas un seguimiento a tu código y verifiques que cuando al momento de hacer split éste te genere los 7 items que le agregas al array. Porque puede que no te esté generando 7 sino 6 y al hacerle el

Código vb:

TextBox6.Text = Segments(6).Trim()
 

no exista la posición "6" y por ello el error.
Porque sin duda Index was outside the bounds of the array es un error de indice dentro de un array que no existe. Te pongo este ejemplo :

Yo tengo una cadena llamada "Hola-soy-Aquaventus-Bienvenido-a-ForosdelWeb"
y a este le hago el split obteniendo :
Array[0] = "Hola"
Array[1] = "soy"
Array[2] = "Aquaventus"
Array[3] = "Bienvenido"
Array[4] = "a"
Array[5] = "ForosdelWeb"

Obteniendo 6 items, y puede que por aqui te hayas confundido al pensar que teniendo 6 items el array tuvo que tener el indice "6" haciendo esto :

Código vb:

MiTextbox.Text = Array(6).Trim()
 

Cuando en realidad en indice "6" no existe en el array porque el array comienza desde "0", lo cual te atrasa 1 llegando hasta "5".

Y viendo la ultima linea de tu codigo repites esto :

Código vb:

TextBox6.Text = Segments(5).Trim()
TextBox6.Text = Segments(6).Trim()
 

A dos textbox6 le pasas 2 parametros "chancando" el valor inicial. El error radica en esa ultima linea de más, trata de verificar eso. Espero haya solucionado tu problema. Saludos!

[mrprogman]

el error me lo esta marcando en la 2da fila, en el textbox2.text, lo de los texbox6.text es un error de dedo....alguna otra idea..?..gracias por las respuestas

[Aquaventus]

Podrías por favor ponernos la cadena a la cual le haces el split?. Saludos!.

[mrprogman]

La cadena..?...el codigo que tengo ahi es todo lo que uso..si te refieres a como lleno el dropdownlist los datos los agregue con la opcion edit items/add

If DropDownList1.SelectedItem IsNot Nothing Then
Dim Item As [String] = DropDownList1.SelectedItem.Text

Dim Segments As [String]() = Item.Split("-"c)

TextBox1.Text = Segments(0).Trim()
TextBox2.Text = Segments(1).Trim()
TextBox3.Text = Segments(2).Trim()
TextBox4.Text = Segments(3).Trim()
TextBox5.Text = Segments(4).Trim()
TextBox6.Text = Segments(5).Trim()
TextBox7.Text = Segments(6).Trim()
End If

saludos y gracias por tus respuestas

[Aquaventus]

me refiero a los valores que estan contenidos en el combo. Saludos!.

[mrprogman]

Los datos son los numeros del 1 al 7..

[Aquaventus]

Parece que no me dejo entender... Cuando haces click a tu combo te muestra una lista del 1 al 7??? si es asi para que le haces el split?? no te sirve de nada porque el split es para separar cadenas por un caracter en común! Creo que a ti te combiene recorrer los valores del combo y asignarselos a los textbox. Saludos!.

[mrprogman]

Entonces nada mas le pongo un ciclo que recorra el dropdown y reparta los numeros...al los textbox....es asi como dices no..?..gracias nuevamente

[Aquaventus]

Exactamente!. Porque mira tu seleccionas un item del combobox, por ejemplo el item 3 que obviamente contiene como texto "3", y luego le haces el split con el "-" y como no contiene dentro del texto el valor "-", lo que hace el split es esto :
Array[0] = 3
Array[1] = nulo
...
El array se crea solo con 1 item que es el valor "3" no existe más!. y entonces al tú pasarle los valores, el primero lo pasa bien porque el indice [0] sí existe, pero el segundo ya se te cae... Esto porque no hay mas ítems contenidos en el array. Me expliqué mejor?. Espero haber solucionado tu duda. Saludos!.

[mrprogman]

Le voy a meter al codigo.......a ver si me sale...gracias..

[Aquaventus]

Lo que puedes hacer es esto :

Código vb:

Dim segments As New ArrayList
 
        For Each item In ComboBox1.Items
            segments.Add(item.ToString())
        Next
 
        TextBox1.Text = segments(0).ToString()
        TextBox2.Text = segments(1).ToString()
        TextBox3.Text = segments(2).ToString()
        TextBox4.Text = segments(3).ToString()
        TextBox5.Text = segments(4).ToString()
        TextBox6.Text = segments(5).ToString()
 

ó tambien este otro metodo :

Código vb:

Dim segments(ComboBox1.Items.Count - 1) As String
 
        For i As Integer = 0 To ComboBox1.Items.Count - 1
            segments(i) = ComboBox1.Items(i).ToString()
        Next
 
        TextBox1.Text = segments(0).ToString()
        TextBox2.Text = segments(1).ToString()
        TextBox3.Text = segments(2).ToString()
        TextBox4.Text = segments(3).ToString()
        TextBox5.Text = segments(4).ToString()
        TextBox6.Text = segments(5).ToString()
 

Saludos!.

[mrprogman]

Funciono.........muchas gracias..!!

[Aquaventus]

Hola mrprogman, me alegra saberlo. Saludos!.

[mrprogman]

Oyes una duda.....cuando cargo el dropdownlist desde un sqldatasource me marca el mismo error....el codigo anterior funciona si los datos se agregan manualmente al dropdownlist..q podra ser..?..

[Aquaventus]

Hola mrprogman a que mismo error te refieres?. Saludos!.

[mrprogman]

la verdad no tengo a la mano el error exacto..ni la aplicacion...pero tendra algo que ver el tipo de dato con que se esta sacando la informacion del sql datasource...?..por que ahorita hice una prueba con un sql dasource y si funciono ...aunque los tipo de datos son los mismos ..varchar...voy a checar por la tarde el error exacto...y lo envio..pero alguna idea por que sucedio esto..?..saludos y gracias

[Aquaventus]

Pues la verdad nose... Sea manual o con una consulta a la BD no debe darte problemas. Pero mejor sería analizar el mensaje del error. Saludos!.

[mrprogman]

Este es el error,

Index was out of range. Must be non-negative and less than the size of the collection. Parameter name: index


si yo lleno el dropdownlist por medio de un sqldatasource me marca ese error...si lo lleno por medio manual como puse en los anteriores post no da problema.que podra ser .?..saludos y gracias

[Aquaventus]

es el mismo error del principio... estas llamando a un indice que no existe. verifica. Saludos!.