agrega a tu forma de vb un componente que se llama DAO 3.51 y luego declara estas variables
Dim BDD as database
Dim TBl as recordset
Dim SQL as String
y luego prueba esto al cargar la forma
SQL = "SELECT * FROM tabla order by campo asc"
Set TBL = BDD.OpenRecordset(SQL)
TBL.MoveFirst
Do Until TBL.EOF
list1.AddItem TBL("campo")
TBL.MoveNext
Loop
nota debes tener un objeto list1 en tu forma en la que se cargaran los datos del campo de la tabla que escogiste en la linea list1.AddItem TBL("campo") ordenados