Добрый день!
прошу помощи)

idvisit = DLookup("[КодЗанятия]", "[Занятия]", "[ДатаЗанятия]=" & Format(datevisit, "\#MM\/DD\/YYYY\#") & " And [Филиал]=" & filial & " And [Класс]=" & klass & " And [Время]=" & Format(vremya, "hh:mm:ss") & "")

При запуске выдает ошибку синтаксиса.
Ну все же верно сделано) Чего ему надо?

если время убираю, то работает

вот так работает
idvisit = DLookup("[КодЗанятия]", "[Занятия]", "[ДатаЗанятия]=" & Format(datevisit, "\#MM\/DD\/YYYY\#") & " And [Филиал]=" & filial & " And [Класс]=" & klass & "")

Т.е. ошибка где-то здесь And [Время]=" & Format(vremya, "hh:mm:ss") & ""