Выборка из нескольких таблиц в списки

[Di_sol]

Здравствуйте!
У меня имеется три таблицы: Заказ, Товар, Кондиционер.
на форме есть список, при клике на котором я получаю id заказа.
Во второй список мне необходимо вывести элементы этого заказа (quantity, cname).
Не могу сообразить, как это реализовать. Я понимаю, что это легко реализуемо, но не могу сообразить как именно, поэтому прошу привести код!

[Abrakadabra]

Запрос создавать не пробовали?

[gluk_fm]

А если поподробнее перевести слова Abrakadabra то: создаёте запрос с условием отбора по ИД и вставляете его в свойствах - источник строк

[Di_sol]

дело в том, что в VBA я новичек...
в sql написал бы запрос на выборку из нескольких таблиц с псевдонимами и все, а как здесь, да еще и в качестве источника данных...
по-этому и попросил пример кода, а не от лени своей писать запросы самому!

[Di_sol]

Вот что получиться должно.
При клике на элементе верхнего списка, получаю ord_id и в Список6 надо данные вывести.
Проблема в том, что я не зная как запрос на выборку из нескольких таблиц написать. В мане искал, но чтот не нашел, что надо...
Помощь мне нужна в формировании запроса на выборку из 2х таблиц!

[gluk_fm]

Так в чём собственно вопрос? Вы пишете простой SQL запрос, открываете форму в режиме конструктора, на поле со списком нажимаете правой кнопкой мышки - выбираете пункт свойства - в поле источник срок вставляете созданный вами запрос и будет Вам счастье....
Или Вам лучше тоже картинки выложить ?

[Di_sol]

но ведь выборка зависит от выделенного пункта списка.
Если выполнить, как вы говорите, результат будет явно не тот

[Di_sol]

Private Sub Список2_Click()
Dim a As Integer
Dim sel As String
a = Список2.ListIndex
a = Список2.Column(0, a)
sel = "SELECT t.quantity, c.cname FROM Товар t, Кондиционер c WHERE ord_id=" & a & " AND t.product_id=c.id"
Me!Список3.RowSource = sel
End Sub

Сделал так и есть мне счастье без ровсоурсев