Füllen Listbox mit Access-Datenbank?

Ich bin nicht in der Lage, um die listbox-Werte anzeigen von meiner Datenbank.Dies ist der code. Irgendwelche Gedanken auf, wie, um es zu knacken?

Imports System.Data.OleDb
Public Class Form1
    Dim dbConnection As OleDbConnection
    Dim dbCommand As OleDbCommand
    Dim strInsert As String
    Dim dbDataAdapter As OleDbDataAdapter
    Dim ConnectString As String = "Provider = Microsoft.Jet.OLEDB.4.0;" & "Data Source =atg.mdb"
    Dim dtATG As DataTable

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim dtTest As New DataTable
        dtTest.Columns.Add("Col1", GetType(Integer))


        For i As Integer = 1 To 10
            dtTest.Rows.Add(i, "Row " & i.ToString)
        Next

        ListBox1.DisplayMember = "Col1"
        ListBox1.ValueMember = "Col1"
        ListBox1.DataSource = dtTest.DefaultView
    AddHandler ListBox1.SelectedIndexChanged, AddressOf ListBox1_SelectedIndexChanged

End Sub

Private Sub ListBox1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs)
    MessageBox.Show(ListBox1.SelectedValue.ToString)

End Sub

Ende Klasse

  • Ja! Sie werden in der Lage sein, alles zu tun, dass mithilfe von Visual Studio und VB .NET
  • Ich habe versucht mit den obigen code, aber habe nicht jede gewünschte desults. Keine links oder Tipps, wie es zu tun? (Ich habe gerade versucht, die anzeigen bilden die Werte der DB zu meinem listbox -)
  • Sie fügen nur 1 Spalte, aber durch den Aufruf dtTest.Rows.Add(i, "Row " & i.ToString) fügen Sie mehr als 1 Artikel zu dieser Reihe. Nicht erhalten Sie eine Laufzeit-exception? Auch ListBox1.Datasource = dtTest tun würde.
InformationsquelleAutor user823911 | 2011-07-08
  1. 1

    Hier ist eine modifizierte version des Codes, der funktioniert.

    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        Dim dtTest As New DataTable
        dtTest.Columns.Add("Col1", GetType(Integer))


        For i As Integer = 1 To 10
            dtTest.Rows.Add(i)
        Next

        ListBox1.DisplayMember = "Col1"
        ListBox1.ValueMember = "Col1"

        ListBox1.DataSource = dtTest
End Sub
    • Hey Danke eine Tonne für die. Aber das Ergebnis, das ich bekomme, ist zahlen von 1 - 10 in der listbox. Wie bekomme ich die Daten in meiner Access - (.mdb) Datenbank zu zeigen, bis hier. Ich habe die OLE DB Verbindung, etc..; Tabelle-Name: ATG ; Feld-Name: Term. (Sorry, wenn diese grundlegende Fragen, ich bin nur ein Anfänger)
    • jetzt bist du gefragt eine andere Frage: Wie kann ich das füllen eines Datatable mit Datensätzen aus einer Access -.mdb-Tabelle? Ich Wette, Sie finden konnte, Antwort auf dieser Seite.
    InformationsquelleAutor Ranhiru Jude Cooray
  2. 0

    Verwenden Sie die System.IO.File.ReadAllLines:

    ListBox1.Items.AddRange(System.IO.File.ReadAllLines("C:\folder\Your File.txt"))
    • er liest Ihnen aus einer Datenbank, es ist also definitiv nicht wie das Lesen einer Textdatei
    InformationsquelleAutor Wizzo
Schreibe einen Kommentar