Salve, qualcuno mi potrebbe gentilmente segnalare un esempio dove poter imparare ad inserire delle voci in un ComboBox prelevandole da una tabella di un DB Access ?


Dim con As OleDbConnection = New OleDbConnection("Provider=Microsoft.jet.oledb.4.0; data source=c:\test\database.mdb")
Dim cmd As OleDbCommand = New OleDbCommand("Select Campo1 FROM Tabella1 where stato=1", con)
Dim dr As OleDbDataReader
con.Open()
dr = cmd.ExecuteReader
While dr.Read()
Combo1.Items.Add = dr("Campo1").ToString()
End While
dr.Close()

Dove sbaglio ?

Grazie infinite a chiunque abbia tempo e voglia di aiutarmi.