End SelectEnd Sub Добавляемые в процедуру строки выделены жирным курсивом. Оператор On Error GoTo Err_Label при возникновении ошибки выполнения передаст управление оператору, помеченному меткой Err_Label. Оператор Select Case в зависимости от значения, возвращаемого функцией Obr_Err, передаст управление нужному оператору, тем самым, продолжив выполнение программы. И только в случае обнаружения нераспознанной ранее ошибки работа программы будет завершена. 25. Проверить работу функции Obr_Err. Для этого запустить программу и попытаться ввести очень большое число. 26. Самостоятельно добавить кнопку в форму Отладка и связать её с процедурой нахождения частного от деления среднего арифметического среди нечетных чисел на минимальное число. Самостоятельно предусмотреть обработку других возможных ошибок выполнения.
ЛАБОРАТОРНАЯ РАБОТА №3
Цель лабораторной работы: - разработка пользовательского интерфейса приложения - программирование создания и просмотра файла произвольного доступа Задание: 1) На основе данных, вводимых в форму (рис.3.1), создать файл прямого доступа, содержащий сведения о студентах. 2) Вывести данные из файла в форму (рис.3.2) 3) Объединить выполнение пунктов заданий 1) и 2) с помощью кнопочного меню (рис 3.3) в одно приложение. 4) Самостоятельно дополнить приложение созданием второго файла, содержащим результаты сдачи сессии каждым из студентов, и процедурой совместной обработки двух файлов. 5) Используя лекционный материал, создать вложенное меню для выполнения всех процедур приложения.
Рис 3.1. Форма для ввода в файл сведений о студенте.
Рис.3.2. Форма для просмотра сведений о студенте.
Рис 3.3. Кнопочное меню приложения Университет.
|
