Вывод данных из таблиц

SIKSMFP
Дата: 23.11.2015 02:00:22
Подскажите пожалуйста, как организовать следующее: Есть несколько таблиц в базе. На форме есть элемент поле со списком, где представлены все таблицы. На этой же форме есть список, выводящий поля таблицы. Нужно чтобы после выбора таблицы в поле со списком появлялись различные данные в списке, в зависимости от выбранной таблицы

Выбираются данные в список

Private Sub СписокКлиентов_AfterUpdate()
Dim s
s = "select Дата, НомерКорСчетаКлиента,ИннКонтрагент,Кредит, Дебит, Примечания from Лист1 where Контрагент='" & Me.СписокКлиентов.Column(0) & "'"
Me.Список.RowSource = s



Выбираются таблицы из базы

Private Sub ПолеСоСписком74_AfterUpdate()
Dim s1
s1 = "select Name from Запрос3 "
Me.ПолеСоСписком74.RowSource = s1


Пробовал что-то такое - не получается

Private Sub СписокКлиентов_AfterUpdate()
Dim s
s = "select Дата, НомерКорСчетаКлиента,ИннКонтрагент,Кредит, Дебит, Примечания from [b]Me.ПолеСоСписком74[/b] where Контрагент='" & Me.СписокКлиентов.Column(0) & "'"
Me.Список.RowSource = s
mds_world
Дата: 23.11.2015 02:13:18
SIKSMFP, формируемая строка скл в вашем коде состоит из постоянной и переменной частей. Значение переменной части надо соединить с константной (сконкакатенировать)
s = "select Дата, НомерКорСчетаКлиента,ИннКонтрагент,Кредит, Дебит, Примечания " _
& "from [" & Me.ПолеСоСписком74 & "] where Контрагент='" & Me.СписокКлиентов.Column(0) & "'"
SIKSMFP
Дата: 23.11.2015 02:25:52
mds_world,

Подскажите пожалуйста, как?