How do you fill a listbox with a dataset object or tableadapters?

[Lokean]

I have taken over a project where a listbox is to be filled with values from a dataset object that has three columns through it's tableadapter

Prod_ID Prod_Decscrption ON_Hand

I've tested the table adapter, and it does return values.

But I can not figure out how to populate the listbox on my form,


I'm sure it's something simple, but I'm not seeing it.

[RedSon]

I think you need a datagrid control. Checkout the links to popular sections of MSDN located at the top of this forum.

[Lokean]

I think you need a datagrid control. Checkout the links to popular sections of MSDN located at the top of this forum.

I solved it, but for those in our studio audience....

Here's what I did.



Dim r_datarow as new DataRow
Dim t_DataTable As New MyApp.eDataSet.X _CODE_LOOKUPDataTable()
Dim tf_TableFill As New MyApp.eDataSetTableAdapters.X_CODE_LOOKUPTableAdap ter()

For Each r_datarow In t_DataTable
lst_X.Items.Add(r_datarow.Item("X_CODE_TEXT"))
Next

[klaydze]

I have taken over a project where a listbox is to be filled with values from a dataset object that has three columns through it's tableadapter

Prod_ID Prod_Decscrption ON_Hand

I've tested the table adapter, and it does return values.

But I can not figure out how to populate the listbox on my form,


I'm sure it's something simple, but I'm not seeing it.

Dim objdataadapter As New SqlDataAdapter
Dim objcommand As New SqlCommand
Dim objdatatable As New DataTable
Dim objdataset As New DataSet
Dim objconn As New SqlConnection
Dim nrow As Integer

Dim strselect As String


strselect = "Select * from table1"
objconn = New SqlConnection("Server=localhost; DataBase=yourdbase; User ID=sa; pwd=")

objdataadapter.SelectCommand = New SqlCommand(strselect, objconn)
objdataadapter.Fill(objdataset)

objdatatable = objdataset.Tables(0)

For nrow = 0 To objdatatable.Rows.Count - 1
ListBox1.Items.Add(objdatatable.Rows(nrow).Item("y our field"))

Next