4. 4. Пример Windows-приложения

Рассмотрим пример построения Windows-приложения (рис. 32), в кото­ром используются функции InputBox и MsgBox.

Рис. 32

Программа состоит из двух частей. В первой части кнопка "ПУСК" через стандартные окошки ввода функции вводит фамилию, имя, отчество и отображает их в текстовых полях. Во второй части кнопка "MsgBox-примеры" последовательно выводит ряд сообщений разного вида.

Процедура, срабатывающая при нажатии кнопки "MsgBox-примеры", имеет вид:

Private Sub Command1_Click() 'программирование кнопки "ПУСК"

Фамилия = InputВох("Введите Вашу фамилию:", _ "Ввод фамилии")

Имя = InputВох ("Введите Ваше имя:", _ "Ввод имени")

Отчество = InputВох ("Введите Ваше отчество:", _ "Ввод отчества")

Text1 = Фамилия: Text2 = Имя: Text3 = Отчество

End Sub

Процедура, срабатывающая при нажатии кнопки "MsgBox-примеры", имеет вид:

Private Sub Command2_Click() 'программирование кнопки "MsgBox-примеры"

MsgBox("!!! !!! !!!")

MsgBox ("??? ??? ???")

MsgBox "MsgBox", 0, "Проверка вывода сообщений"

MsgBox "Ошибка! Работа программы прерывается!", 16, "Критическое сообщение"

MsgBox "Вычисления продолжать?", 32 + vbYesNo, "Вопрос"

MsgBox "Ошибка в программе! Необходима коррекция!", 48 + 3, "Предупреждение"

MsgBox "Рабочий день оканчивается в 19.30"

MsgBox "Необходимо отключить оборудование, закрыть форточки, сдать помещение под охрану", 64, "Информация"

End Sub

4. 5. Определяемые функции

Рассмотренные раньше функции являются встроенными функциями языка, но каждый программист может определить и свои собственные (определяемые) функции.

Упражнение 4

• Сделать приложение по рис. 32.

• Запустить приложение, проверить работу.

• Дополнить приложение процедурой, срабатывающей, если щелчок левой кнопки мыши будет приходиться не по кнопкам формы. При этом на экране должно появляться сообщение-предупреждение "Ох! Да Вы промазали по кнопке!" (рис.33).

Рис. 33

• Откомпилировать приложение под именем "Предупреждение".

• Сохранить файлы проекта в папке "Ввод_данных".

Задания для самостоятельной работы

1. Ввести с клавиатуры произвольное строковое выражение и поместить его в выбранную ячейку текущего рабочего листа.

2. Отобразить содержимое любой ячейки рабочего листа в диалоговом окне MsgBox.

3. Разместить несколько вводимых с клавиатуры чисел в разных ячейках на одной строке (в одном столбце) текущего рабочего листа.

4. Ввести с клавиатуры элементы квадратной матрицы заданного размера. Расположить их в соответствующих ячейках текущего рабочего листа.

5. Скопировать содержимое некоторых ячеек с одного рабочего листа на другой.

6. Вывести значение некоторого числового выражения в различные ячейки текущего рабочего листа с использованием произвольных атрибутов форматирования (цвет текста и фона, числовые форматы данных, гарнитура шрифта и т.д.).

Лабораторная работа №5 «Функции работы со строками. Финансовые функции»

Цель работы. Ознакомиться с функциями обработки строк, основами программирования финансовых функций.