Функция DLookup

[st.inna]

Всем здравствуйте!

Пытаюсь применить функцию DLookup.

Есть таблица с названием tlb_User с ключевым полем User_ID и полем UserName

Пытаюсь вытащить значение поля UserName при заданном значении User_ID по данному коду:

Sub myDLookup
Dim iKey As Integer
Dim sName as String

iKey = 1
sName = DLookup("UserName", "tlb_User", "User_ID='" & iKey & "'", "UserName")

Print sName

End Sub

При запуске ничего не происходит, даже не выдает никакой ошибки. Что не так?
В приложении LO в библиотеке Access2Base функция DLookup есть.
Возможно я ее не так вызываю? Только начинаю изучать макросы.
Спасибо