Problema con textbox y combobox en vb.net

[ErickValken]

Hola chicos aqui molestando de nueva cuenta, fijense que tengo un problemilla y no encuentro como resolverlo.

tengo un combobox ligado a una base de datos en sql server en la base tengo varias columnas con diferente informacion en el combobox seleccione para que cuando le dira click me aparecieran por asi decirlo los identificadores de los articulos y le estoy diciendo dentro del combobox que cuando seleccione el identificador me mande el articulo dentro del textbox, este es el codigo que estoy usando todo funciona bien a acepcion de que aveces cuando cierro la aplicacion me mande un error que dice index out of range No hay ninguna fila en la posición 0. no se si me pudiera ayudar a resolver este problema. saludos

Private Sub ComboBox1_SelectedIndexChanged_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
Dim obj As New INV_TEMSQLDataSetTableAdapters.INV_TEMTableAdapter


Me.TextBox1.Text = obj.GetDataByArticulo(Me.ComboBox1.Text.ToString). Item(0).ARTICULO.ToString



End Sub

[phinojosa]

El problema se debe a que debes de validar si existen valores luego de aplicar el filtro


algo asi:

Código HTML:

if obj.GetDataByArticulo(Me.ComboBox1.Text.ToString).Items.Count>0 then
Me.TextBox1.Text = obj.GetDataByArticulo(Me.ComboBox1.Text.ToString). Item(0).ARTICULO.ToString
endif

Como no encuentra datos te retorna el error de index out of range


saludos

[ErickValken]

Gracias Phinojosa, pero desgraciadamente no me funciono asi. saludos

[ErickValken]

Ya resolvi el problema, lo que pasa es que lo unico que necesitaba hacer es borrar el proceso de memoria que se estaba ejecutando, para quien necesite el codigo es el siguiente, esta muy sencillo. saludos


Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
ComboBox1.Dispose()
End Sub