VB.NET

Add data from an access table in a listbox

Please support our VB.NET advertiser: Intel Parallel Studio Home

Thread Solved

•

Join Date: Aug 2008

Posts: 12

Reputation: Jostra is an unknown quantity at this point

Solved Threads: 0

Jostra

Offline

Newbie Poster

Add data from an access table in a listbox

Aug 11th, 2009

Hi guys please help with this i am trying to write my data from a table in a lis box but a always get the number of items inside the table. can some one come thru please.

lstData.items.Add(dataAdapter.fill(dataset,"MyTable")
all kinds of help will be appreciated

•

Join Date: Jun 2009

Posts: 136

Reputation: babbu has a little shameless behaviour in the past

Solved Threads: 14

babbu

Offline

Junior Poster

Re: Add data from an access table in a listbox

-1

Aug 11th, 2009

lstData.items.add(datatable.rows("column name")(row).tostring)

•

Join Date: Aug 2008

Posts: 12

Reputation: Jostra is an unknown quantity at this point

Solved Threads: 0

Jostra

Offline

Newbie Poster

Re: Add data from an access table in a listbox

Aug 12th, 2009

Thanks babbu for that piece of code and sorry for taking so long.The problem is i dont know how to declare data table explicitly so that i can treat it as one of my variables.That is why i am using dataset, cause i get not declared error.I can't figure out how to declare my table inside my code.Struggling thanx help please!!!

•

Join Date: Oct 2008

Posts: 2,703

Reputation: adatapost has much to be proud of

Solved Threads: 483

adatapost

Offline

Posting Maven

Re: Add data from an access table in a listbox

Aug 12th, 2009

Post #2 - Improper syntax. Rows collection of DataTable uses int index argument.

 Help with Code Tags 
 vb.net Syntax (Toggle Plain Text) 
   ...
   colvalue=datatable.rows(0)("column_name")
   lstData.items.add(colvalue) 
  ...
   ...
   colvalue=datatable.rows(0)("column_name")
   lstData.items.add(colvalue) 
  ...

•

Join Date: Aug 2008

Posts: 12

Reputation: Jostra is an unknown quantity at this point

Solved Threads: 0

Jostra

Offline

Newbie Poster

Re: Add data from an access table in a listbox

Aug 12th, 2009

Thanks again but what do i declare colValue as and datatable in order to get the expected output.

•

Join Date: Oct 2008

Posts: 2,703

Reputation: adatapost has much to be proud of

Solved Threads: 483

adatapost

Offline

Posting Maven

Re: Add data from an access table in a listbox

Aug 12th, 2009

>Thanks again but what do i declare colValue as and datatable in order to get the expected output.
Answer is Object type.

 Help with Code Tags 
 vb.net Syntax (Toggle Plain Text) 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim dt As New DataTable
        dt.Columns.Add("No", GetType(Int32))
        dt.Columns.Add("Name")
        dt.Rows.Add(1, "A")
        dt.Rows.Add(2, "B")
        dt.Rows.Add(3, "C")
 
        For Each r As DataRow In dt.Rows
            ListBox1.Items.Add(r("No"))
        Next
    End Sub
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim dt As New DataTable
        dt.Columns.Add("No", GetType(Int32))
        dt.Columns.Add("Name")
        dt.Rows.Add(1, "A")
        dt.Rows.Add(2, "B")
        dt.Rows.Add(3, "C")
        
        For Each r As DataRow In dt.Rows
            ListBox1.Items.Add(r("No"))
        Next
    End Sub

Anothe code - DataSource bind

 Help with Code Tags 
 vb.net Syntax (Toggle Plain Text) 
   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim dt As New DataTable
        dt.Columns.Add("No", GetType(Int32))
        dt.Columns.Add("Name")
 
        dt.Rows.Add(1, "A")
        dt.Rows.Add(2, "B")
        dt.Rows.Add(3, "C")
 
        ListBox1.DataSource = dt
        ListBox1.DisplayMember = "Name"
        ListBox1.ValueMember = "No"
    End Sub
   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim dt As New DataTable
        dt.Columns.Add("No", GetType(Int32))
        dt.Columns.Add("Name")

        dt.Rows.Add(1, "A")
        dt.Rows.Add(2, "B")
        dt.Rows.Add(3, "C")

        ListBox1.DataSource = dt
        ListBox1.DisplayMember = "Name"
        ListBox1.ValueMember = "No"
    End Sub