ReSQL.ru
     
powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как сообщить функции ?
10 сообщений из 10, страница 1 из 1
Как сообщить функции ?
    #37229078
Valeriu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Valeriu
Участник
Всем доброго дня !!!
Я сразу прошу прощения если неправильно сформулировал вопрос.

Есть функция в классе.
Как ей сообщить (или признак), что при вызове процедуры Function я хочу использовать возвращаемое ею значение .
Или наоборот, сообщить (или признак), что выполняются все действия функции, но возвращаемое значение игнорируется .

Спасибо.
...
Рейтинг: 0 / 0
22.04.2011, 15:52
| Ответить | Цитировать | Написать  
Как сообщить функции ?
    #37229094
Gwa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Gwa
Участник
Valeriu,
так процедура или функция?
Это не одно и то же.
Функции пофиг будете Вы использовать возвращаемое ею значение или нет.
...
Рейтинг: 0 / 0
22.04.2011, 15:56
| Ответить | Цитировать | Написать  
Как сообщить функции ?
    #37229096
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
ValeriuКак ей сообщить (или признак), что при вызове процедуры Function я хочу использовать возвращаемое ею значение .
Просто добавь параметр
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Private Function MyFunc(a As Integer, ResultWanted As Boolean) As String

if ResultWanted Then MyFunc = "Result"

End Function

'вызовы:
t = MyFunc( 5 , True) 'хочу возвращаемое значение
Call MyFunc( 5 , False) 'не хочу
...
Рейтинг: 0 / 0
22.04.2011, 15:56
| Ответить | Цитировать | Написать  
Как сообщить функции ?
    #37229194
Valeriu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Valeriu
Участник
Извините, я сам затрудняюсь ответить ...

Клиент пишет ТОЛЬКО ТАК !!! :
Код: plaintext
1.
2.
3.
.....
Ret = m.cmDo("test^test", a, b, c, d)  ' первый признак
m.cmDo "test^test", a, b, c, d         ' второй признак
....

Сама функция. Как она должна среагировать на это ?

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
Public Function cmDo(Routine As String, Optional v1, Optional v2, Optional v3, _
                                   Optional v4, Optional v5, Optional v6, _
                                   Optional v7, Optional v8, Optional v9, _
                                   Optional v10, Optional v11, Optional v12)

............
'здесь в зависимости что ???? пишу или "R" или "Q"
strRes = "DO " & Routine & "~" & Par & "~" & "R" _
& "~" & strLenAll & "~" & strLen1 & "~" & strLen2 _
& "~" & strLen3 & "~" & strLen4 & "~" & strLen5 _
& "~" & strLen6 & "~" & strLen7 & "~" & strLen8 _
& "~" & strLen9 & "~" & strLen10 & "~" & strLen11 _
& "~" & strLen12 & Chr( 0 ) & Str
GTMCmd.SendData strRes

Спасибо.
...
Рейтинг: 0 / 0
22.04.2011, 16:30
| Ответить | Цитировать | Написать  
Как сообщить функции ?
    #37229205
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Valeriu,

Функция не сможет узнать, каким способом ее вызвали извне. Причем, я не могу придумать причину, по какой ей необходимо было бы это знать.
...
Рейтинг: 0 / 0
22.04.2011, 16:33
| Ответить | Цитировать | Написать  
Как сообщить функции ?
    #37229259
Valeriu
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Valeriu
Участник
Функция не сможет узнать, каким способом ее вызвали извне
Я согласен с Вами, но вот что я имею.
Я начал точить свою собственную функцию на подобие старой, которая работает (сторонний поставщик)
и для которой имеется только .dll.

Там вроде так работает, но как этот момент там реализован, я понятия не имею ...
...
Рейтинг: 0 / 0
22.04.2011, 16:51
| Ответить | Цитировать | Написать  
Как сообщить функции ?
    #37229355
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Valeriudll
Там вроде так работает
Сомневаюсь.
Но пусть меня поправят старшие товарищи
...
Рейтинг: 0 / 0
22.04.2011, 17:40
| Ответить | Цитировать | Написать  
Как сообщить функции ?
    #37229375
Фотография VSVLAD
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VSVLAD
Участник
Функция никак не узнает как её вызвали.
Например имея функцию:
Код: plaintext
Public Function Test() As Long
Вызывающая функция никак не узнает вернёт ли функция конкретное число или же не вернёт ничего. Возвратится в любом случае 0, если ей явно присвоили или не присвоили. На самом деле отличие Sub от Function - грубо количество используемых параметров на стеке.
...
Рейтинг: 0 / 0
22.04.2011, 17:45
| Ответить | Цитировать | Написать  
Как сообщить функции ?
    #37229377
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
White Owl
Участник
ValeriuЕсть функция в классе.
Как ей сообщить (или признак), что при вызове процедуры Function я хочу использовать возвращаемое ею значение .
Или наоборот, сообщить (или признак), что выполняются все действия функции, но возвращаемое значение игнорируется А ты можешь объяснить зачем это нужно?
...
Рейтинг: 0 / 0
22.04.2011, 17:45
| Ответить | Цитировать | Написать  
Как сообщить функции ?
    #37229381
Фотография VSVLAD
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VSVLAD
Участник
Примеры вызовов.
Код: plaintext
1.
2.
3.
Call Test 'Вернёт значение, но никуда не запишется()
Test 'Вернёт значение но никуда не запишется.
MsgBox(Test) 'Вернёт значение, и передастся как параметр в функцию MsgBox
...
Рейтинг: 0 / 0
22.04.2011, 17:47
| Ответить | Цитировать | Написать  
10 сообщений из 10, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как сообщить функции ?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&fpage=103&tid=2158776]:
 0ms
get settings:
 9ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 39ms
get topic data:
 13ms
get forum data:
 3ms
get page messages:
 50ms
get tp. blocked users:
 2ms
others: 11ms
total:  149ms
созд. / загр.: 149ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]