在Visual Basic 2012中，如何使用mdb数据库中的数据填充列表框？

   Dim connectionString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\path\to\your\database.mdb"

   Dim query As String = "SELECT columnName FROM tableName"

   Using connection As New OleDbConnection(connectionString)

       connection.Open()

       Using command As New OleDbCommand(query, connection)

           Using reader As OleDbDataReader = command.ExecuteReader()

               While reader.Read()

                   ListBox1.Items.Add(reader("columnName").ToString())

               End While

           End Using

       End Using

   End Using