Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

Абсолютно дурацкий вопрос, но можно ли исхитриться, и заставить функцию возвращать бо

266
21 января 2004 года
mhaturov
901 / / 23.10.2003
Я конечно понимаю, что выгляжу идиотом, но у меня есть одна функция, которую я хочу научить возвращать за раз больше 1 значения, тоесть. например, результат её выполнения и сколько строк она обработала. При этом никаких глобальных переменных создавать не хочется. Кто-нибудь знает, как можно исхитриться?
319
21 января 2004 года
xelos
577 / / 27.02.2003
Цитата:
Originally posted by mhaturov
Я конечно понимаю, что выгляжу идиотом, но у меня есть одна функция, которую я хочу научить возвращать за раз больше 1 значения, тоесть. например, результат её выполнения и сколько строк она обработала. При этом никаких глобальных переменных создавать не хочется. Кто-нибудь знает, как можно исхитриться?


Передавай функции значения не по значению, а по адресу. типа:
Sub test (ByRef NmbLines as integer, ByVal xxx as ... - твои параметры)
NmbLines= новое значение
End Sub

при вызове пишешь:
Dim a as integer
a=0
test(a,...)
print a ' в а - значение, вычисленное в процедуре

266
21 января 2004 года
mhaturov
901 / / 23.10.2003
Цитата:
Originally posted by xelos

Передавай функции значения не по значению, а по адресу. типа:
Sub test (ByRef NmbLines as integer, ByVal xxx as ... - твои параметры)
NmbLines= новое значение
End Sub

при вызове пишешь:
Dim a as integer
a=0
test(a,...)
print a ' в а - значение, вычисленное в процедуре


Большое спасибо! (Что-то я сам притормозил :D )

Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог