Проблема с логической функцией

2 posts / 0 new
Последнее сообщение
Вячеслав-1
Аватар пользователя Вячеслав-1
Проблема с логической функцией

Здравствуйте!
Приходилось ли вам использовать в логических конструкциях логические функции? Может вы мне поможете найти ошибку в

несложной конструкции:
' Объявляем логическую фнкцию
Declare Function narisovan as Logical
'--------------------------------------
' Потом описываем логическую функцию
Function narisovan as Logical
...................
if ....... then
narisovan=true
else
narisovan=false
end if
................................
end Function
'--------------------------------------
' Затем применяем логическую функцию в одной из процедур
Sub Find_objects
........................
if narisovan then goto t2 end if
........................
End Sub 'Find_objects
'--------------------------------------
При этом программа транслируется без ошибок, начинает выполняться и выдаёт ошибку на строчке:
if narisovan then goto t2 end if
с сообщением "Не определена переменная или поле narisovan.
Почему здесь возникает ошибка?
Заранее благодарю за ответ. С уважением, Ярков Вячеслав.

dab
Для вызова функции нужны

Для вызова функции нужны скобки
if narisovan() then goto t2 end if