hi
replace your Access database file path in the connection string and give the table name and column name as required.
this is a sample example.
Private Sub FillCombo()
Try
Dim fillcon As New OleDbConnection(@"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=path to access file.mdb;")
Dim asql As String = ("SELECT * FROM Items ORDER BY ItemName")
Dim da As New OleDbDataAdapter(asql, fillcon)
Dim ds As New DataSet
da.Fill(ds)
ItemNameCombo.ValueMember = "ItemName"
ItemNameCombo.DataSource = ds.Tables(0)
ItemNameCombo.SelectedIndex = 0
Catch ex As Exception
MsgBox("ERROR : " & ex.Message.ToString)
End Try
End Sub