Listbox показать имена столбцов таблицы

Question

Я пытаюсь получить список, чтобы показать список всех столбцов (полей), доступных в конкретной таблице. Теперь следующий ниже код достигает этого, но использует msgbox для отображения каждого поля, которое я не хочу.

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 

В принципе, я хочу, чтобы комбо или список отображали все поля из определенной таблицы - это возможно?

Answer 1

Вы делаете это слишком сложно для себя.

В собственности панели списка, установите:

RowSource:  YourTableName 
RowSourceType: Field List