Запрос не работает! БД-MS-Access 2000, ADODB - VB

Формулировка задачи:

Так выглядит мой запрос и MS-Access 2000 моя база.

strSQL = " tblWarenBestand " & _
" ArtikelNr = ( ArtikelNr tblArtikel ArtikelName = '" & ctlArtikelName.Text & "' ), " & _
" FilmTitel = '" & txtFilmTitel.Text & "', " & _
" PreisNr = ( PreisNr FROM tblPreis Preis = '" & ctlPreis.Text & "' ), " & _
" Datum = '" & txtDatum.Text & "' " & _
" FilmNr = " & txtFilmNr.Text
Ошибка ADODB N2147217904 - что-то вроде: "Минимум для одного необходимого параметра не было задано значение"
Bока...!
Подскажите что я намудачила?

Решение задачи: «Запрос не работает! БД-MS-Access 2000, ADODB»

textual
                            Листинг программы 
                        
                            <font color="blue">where</font> Preis=<font color="green">'5'</font>