Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > MS Access > ComboBox: строки - имена таблиц Access

Автор: Loiste 28.9.2005, 12:08

Подскажите, пожалуйста, можно ли организовать выпадающий список ComboBox в базе данных Access так, чтобы его элементами были имена всех таблиц данной базы данных? Если да, то как это осуществить?

Автор: likhobory 28.9.2005, 12:20

Код


For Each tbl In CurrentData.AllTables
'''''''''''''''''
Next

Автор: Loiste 28.9.2005, 12:58

Не понятно, как сформировать этот список? Программно..т.е. как прописать добавление новой строки списка и присвоение ей значения имени таблицы?

У элемента есть свойство Источник строк - в нем обычно указывается таблица или запрос..но как быть в данном случае?

И в какой момент производить формирование этого списка? на Входе?

Автор: Akina 28.9.2005, 13:34

Код


Private Sub Form_Load()
Dim OneForm As TableDef
For Each OneForm In CurrentDb.TableDefs
   ComboBox1.AddItem OneForm.Name
Next
End Sub

Автор: bas 28.9.2005, 15:54

Код


SELECT NAME FROM msysobjects
WHERE msysobjects.Type=1

Автор: Akina 28.9.2005, 16:43

bas
Для ЭТОГО надо иметь права - которых может не оказаться...

Автор: Loiste 29.9.2005, 09:53

Цитата(Akina @ 28.9.2005, 13:34)

Код


ComboBox1.AddItem

Сообщение отладчика:

"Method or data member not found"

Я работаю с Access 2000, используя модель ADO.

Автор: Akina 30.9.2005, 11:49

Цитата(Loiste @ 29.9.2005, 10:53)

Сообщение отладчика:

"Method or data member not found"

Я работаю с Access 2000, используя модель ADO.

А имя комбобокса - какое? smile

Автор: Loiste 30.9.2005, 13:05

Цитата(Akina @ 30.9.2005, 11:49)

А имя комбобокса - какое? smile

Я назвала его ComboBox1, как в предложенном варианте smile

Автор: Akina 30.9.2005, 13:35

Тогда проверяй референсы.