Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

Why is my listbox not filling?????

Posted on 2009-05-13
4
Medium Priority
?
274 Views
Last Modified: 2012-08-14
I am missing something, just not sure what.
I am filling a listbox using a dataset.  There is 1 record in the table and when I do message boxes to show if there are any items in the listbox, it shows that there is the 1 item, but the item does not show in the list box.
What am I doing wrong???
Below I use messageboxes to check that there is an item.
Private Sub FillTaskList(Optional ByVal bStartUp As Boolean = False)
        Dim cT As New cTasks(ConnectionString)
 
        cT.FillList(Me.lstTasks)
        MessageBox.Show(Me.lstTasks.Items.Count)
        If bStartUp Then
            cT.SetupTaskLUGrid(Me.fpGrdTasks)
            MessageBox.Show(Me.lstTasks.Items.Count)
            Me.lstTasks.SelectedIndex = -1
            MessageBox.Show(Me.lstTasks.Items.Count)
        End If
    End Sub
 
I fill the list using
Private Function SQLCombo() As String
        Dim str As String
 
        str = "SELECT TaskID, " _
        & " TaskName " _
        & " FROM TasksLU " _
        & " ORDER BY TaskName"
 
        Return str
 
    End Function
 
 
 
 
    Public Sub FillList(ByVal cnt As ListBox)
        Dim ds As New DataSet
 
        If DatabaseToUse() = BizObjs.DBType.Access Then
            'Access Database
            Dim dc As New OleDb.OleDbConnection(ConnectionString)
            Dim da As New OleDb.OleDbDataAdapter(SQLCombo, dc)
 
            Try
 
                da.Fill(ds)
                dc.Close()
                cnt.DataSource = ds.Tables(0)
                cnt.DisplayMember = "TaskName"
                cnt.ValueMember = "TaskID"
 
            Catch ex As Exception
 
                MessageBox.Show(ex.Message)
                ''Throw ex
 
            Finally
                dc.Close()
                da.Dispose()
            End Try
        End If
 
    End Sub

Open in new window

0
Comment
Question by:Sheritlw
  • 2
4 Comments
 
LVL 9

Accepted Solution

by:
Deathrace earned 1000 total points
ID: 24377378
0
 

Author Comment

by:Sheritlw
ID: 24377450
This is a windows form VB 2008 net app and the listbox does not have a databind property.
Thanks
0
 
LVL 11

Assisted Solution

by:srikanthreddyn143
srikanthreddyn143 earned 1000 total points
ID: 24378054
Try

Public Sub FillList(ByRef cnt As ListBox)
0
 

Author Comment

by:Sheritlw
ID: 24378092
unfortunately that didn't work:-(
0

Featured Post

[Webinar] Cloud Security

In this webinar you will learn:

-Why existing firewall and DMZ architectures are not suited for securing cloud applications
-How to make your enterprise “Cloud Ready”, and fix your aging DMZ architecture
-How to transform your enterprise and become a Cloud Enabler

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

If you're writing a .NET application to connect to an Access .mdb database and use pre-existing queries that require parameters, you've come to the right place! Let's say the pre-existing query(qryCust) in Access takes a Date as a parameter and l…
Parsing a CSV file is a task that we are confronted with regularly, and although there are a vast number of means to do this, as a newbie, the field can be confusing and the tools can seem complex. A simple solution to parsing a customized CSV fi…
How to fix incompatible JVM issue while installing Eclipse While installing Eclipse in windows, got one error like above and unable to proceed with the installation. This video describes how to successfully install Eclipse. How to solve incompa…
Is your data getting by on basic protection measures? In today’s climate of debilitating malware and ransomware—like WannaCry—that may not be enough. You need to establish more than basics, like a recovery plan that protects both data and endpoints.…
Suggested Courses

885 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question