Index was outside the bounds of the array

[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!