Программы "Простой софт" www.prostoysoft.ru

ВНИМАНИЕ! РЕКЛАМНЫЕ СООБЩЕНИЯ И ГИПЕРССЫЛКИ В ФОРУМЕ ЗАПРЕЩЕНЫ (посты удаляются автоматически)
Текущее время: 27.11.2024 11:55

Часовой пояс: UTC + 4 часа




Начать новую тему Ответить на тему  [ Сообщений: 7 ] 
Автор Сообщение
 Заголовок сообщения: Re: Вызов процедур
СообщениеДобавлено: 30.11.2022 17:43 
Не в сети
Администратор

Зарегистрирован: 15.02.2006 20:16
Сообщения: 3690
Откуда: Санкт-Петербург
Смотрите, как выглядит процедура с двумя параметрами:

MyProcedure(sParam1, iParam2)


Вложения:
Pic1.jpg
Pic1.jpg [ 27.2 КБ | Просмотров: 5358 ]

_________________
2B OR NOT 2B = TRUE
Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Вызов процедур с параметрами
СообщениеДобавлено: 01.12.2022 12:53 
Не в сети
Администратор

Зарегистрирован: 15.02.2006 20:16
Сообщения: 3690
Откуда: Санкт-Петербург
Параметры не надо специально объявлять с помощью Dim
Они объявлены в круглых скобках сразу после имени процедуры. И автоматически видны внутри процедуры, к ним можно обращаться и читать их значения.

На примере процедуры-функции MsgBox
вызывать процедуру надо либо так
MsgBox "Hello World", 64

либо так
iAnswer = MsgBox("Hello World", 32+4)

В соответствии с актуальными стандартами, продвигаемыми Microsoft, всегда должны быть круглые скобки.
То есть вариант 1 тоже превращается в
MsgBox("Hello World", 64)

_________________
2B OR NOT 2B = TRUE


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Вызов процедур с параметрами
СообщениеДобавлено: 01.12.2022 21:06 
Не в сети
Администратор

Зарегистрирован: 15.02.2006 20:16
Сообщения: 3690
Откуда: Санкт-Петербург
Вызов процедуры
MyProcedure <ID>

или если процедура-функция возвращает значение

sResult = MyProcedure(<ID>)

_________________
2B OR NOT 2B = TRUE


Вернуться к началу
 Профиль  
 
 Заголовок сообщения: Re: Вызов процедур с параметрами
СообщениеДобавлено: 01.12.2022 21:13 
Не в сети
Администратор

Зарегистрирован: 15.02.2006 20:16
Сообщения: 3690
Откуда: Санкт-Петербург
Функция MsgBox(сообщение, [стиль + кнопки], [заголовок])
VB константы есть такие:

ЗАДАЮТ СТИЛЬ ФОРМЫ MsgBox
vbExclamation = 48
vbInformation = 64
vbQuestion = 32

КНОПКИ
vbOk = 1
vbYesNo = 4
vbYesNoCancel = 3

И это все можно компоновать, то есть написать 32+4
Можно числа указывать, но более информативно для самого программиста текстовые константы vbQuestion+vbYesNo

iResult = MsgBox("Привет мир все мирно?", vbQuestion+vbYesNo, "Заголовок")

_________________
2B OR NOT 2B = TRUE


Вернуться к началу
 Профиль  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 7 ] 

Часовой пояс: UTC + 4 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 21


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
Создано на основе phpBB® Forum Software © phpBB Group
Русская поддержка phpBB