2.4.6 Функции MsgBox() иInputBox()

Окно ввода (input box) иокно сообщения (message box)используется при необходимости задать пользователю вопросы, ввести данные или отобразить сообщение об ошибке и совет для пользователя. Окно ввода при этом всегда предоставляет пользователю место для ввода ответа на вопрос.

Формат функции MsgBox():

MsgBox( StrMsg [ ,[ IntType ] [ ,StrTitle ] ] )

Аргумент StrMsg – строка, образующая текст сообщения, отражаемого в окне.

Аргумент StrTitle – строка, представляющая собой текст в строке заголовка. При отсутствии выводится имя проекта.

Аргумент IntType описывает опции, приведенные в таблице 6.

Таблица 6

Если необходимо использовать значения двух и более опций, следует сложить эти значения вместе.

Возвращаемое значение функции может содержать одно из значений, приведенных в таблице 7 указывающее, какую кнопку щелкнул пользователь.

Таблица 7

Возвращаемое значение можно присвоить целой переменной и/или проверить его, чтобы предпринять те или иные действия.

Пример:

Var=msgbox(“нечисловое данное”, Vbcritical, “ошибка ввода”)

На экране будет выведено следующее сообщение:

Рисунок 1

Формат функции InputBox():

InputBox( StrPrompt [ , [ StrTitle ] [ , StrDefault ] )

Аргументы StrPrompt и StrTitle напоминают аргументы StrMsg и StrTitle в функции MsgBox().

Аргумент StrDefault – строковое значение по умолчанию.

Окно всегда содержит кнопки ОК– возвращается введенное значение иCancel– возвращается пустая строка.

Пример:

Var=Inputbox(“введите фамилию” , “ввод данных”)

На экране появится окно для ввода фамилии (рис. 2):

Рисунок 2

2.4.7ФункцияRGB

В VBцвет задается целым значением типаLongв стандартеRGB(красный – зеленый – синий). ФункцияRGBпозволяет определить цвет как комбинацию его трех составляющих.

Формат функции:

RGB (red, green, blue)

Все аргументы обязательны и задают относительную интенсивность (значением типа Integerв интервале от 0 до 255 включительно) соответственно красного, зеленого и синего компонент цвета.

В таблице 8 перечислены некоторые стандартные цвета и соответствующие им комбинации RGB.

Таблица 8

2.5 Операторы управления порядком выполнения команд

Позволяют оценить реальную ситуацию и адекватно реагировать на нее, принимая решения о дальнейших действиях.

2.5.1 Условный оператор If…Then

Может иметь простую однострочную или блочную структуру.

Однострочный синтаксис:

If <условие> Then <оператор> [ Else <оператор>]

Если условие истинно, т.е. результат равен True, то выполняется оператор, следующий заThen, в противном случае – оператор, следующий за ключевым словомElse.

Блочный синтаксис:

If <условие> Then

[ операторы 1 ]

Else If <условие> Then

[ операторы 2 ]

…………………

Else

[ операторы 3]

End If

В принципе блочная запись предоставляет такие же возможности, как и однострочная. Но если в зависимости от условий необходимо выполнить не просто команду, а группу операторов, следует использовать блочный синтаксис. Кроме того, блочная структура с Else Ifпозволяет анализировать несколько условий.

Использование блочного синтаксиса улучшает читабельность программы.

Пример:

Запишем функцию для вычисления значения:

Function f(x As Single) As Single

If x<0 Then

f=sin(x)

Else If x<1 Then

f=1-cos(x)

Else

f=exp(sin(x))

End If

End Function