Listbox wyświetla nazwy kolumn tabeli - ms-access, listbox, access-vba, zestaw rekordów

Próbuję uzyskać listę, aby wyświetlić listę wszystkichkolumny (pola) dostępne w określonej tabeli. Teraz poniższy kod osiąga to, ale używa skrzynki msg do wyświetlenia każdego pola, którego nie chcę.

Dim rst As DAO.Recordset
Dim fld As DAO.Field
Set rst = CurrentDb.OpenRecordset("YourTableName")
For Each fld In rst.Fields
MsgBox fld.Name
Next fld
rst.Close
Set rst = Nothing
Set fld = Nothing

Zasadniczo chcę combo lub listbox, aby pokazać wszystkie pola z określonej tabeli - czy to możliwe?

Odpowiedzi:

Robisz to zbyt trudne dla siebie.

W panelu właściwości pola listy ustaw:

RowSource:     YourTableName
RowSourceType: Field List