Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Функция с возвращением 2-х значений / 3 сообщений из 3, страница 1 из 1
28.07.2004, 09:47:18
    #32624519
Vw
Vw
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Функция с возвращением 2-х значений
Мужики а возможно в VBA
создать функцию с выводом двух значений ?
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
Function Cut(param As String)  'где param = 100#aaa
 
Dim B As Byte
B = InStr( 2 , param, "#",  1 )

CUT=Left(param, B -  1 )                              'это первое значение 100
 
CUT=Mid(param, B +  1 , Len(param) - B)         'это вторрое значение ааа
 
end function

наверное нет... , но какие могут быть варианты?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.07.2004, 09:51:57
    #32624523
Pavel
Pavel
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Функция с возвращением 2-х значений
Ну сделай не функцию, а процедуру.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.07.2004, 09:52:51
    #32624525
TatianaT
TatianaT
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Функция с возвращением 2-х значений
можно
создай свой тип
например
Public Type TableStruct 'structure of table
tdfName As String
tdfAttributes As Long
tdfFieldsCount As Integer
tdfFieldsIType() As Long
tdfFieldsIName() As String
tdfFieldsIAllowZeroLength() As Boolean
tdfFieldsIDefaultValue() As Variant
End Type

и пусть функция возвращает этот тип
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Функция с возвращением 2-х значений / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 360ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1672892]:
 0ms
get settings:
 8ms
get forum list:
 10ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 64ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 24ms
get tp. blocked users:
 1ms
others: 238ms
total:  360ms
x
x
Закрыть


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