Listbox Question...........

How would I load a column (col) from a database table into my listbox? Thanks

Hi,there!
Here is a code:

Private Sub Form_Load()
Dim Db As Database
Dim Rs As Recordset

Set Db = OpenDatabase("BIBLIO.MDB")
Set Rs = Db.OpenRecordset("AUTHORS")
Rs.MoveFirst
Do Until Rs.EOF
List1.AddItem Rs.Fields(1)
Rs.MoveNext
Loop

End Sub

Good luck.
Larisa