Лабораторная работа 3Инструкции перехода Инструкции перехода относятся к управляющим конструкциям VB ко
Работа добавлена на сайт samzan.net:
Лабораторная работа №3 Инструкции перехода
Инструкции перехода относятся к управляющим конструкциям VBA, которые включают операторы ветвления (условного перехода), цикла и безусловного перехода.
Ветвление организуется с использованием двух инструкций условного перехода: If… Then... Else и Select Case. В них проверяется соответствие каким-то условиям и в зависимости от этого выполнение программы направляется по одной или другой ветви. Для осуществления безусловного перехода в определённое место программы в VBA предусмотрена инструкция безусловного перехода GoTo.
- Инструкции перехода по условию
Упражнение 1
- Изучите п. 2.1.1.1 Инструкции перехода и условного перехода If…Then…Else пособия Теория_к_лаб_3.doc.
- Скопируйте из указанного пособия и вставьте в модуль и выполните процедуры IfThenElse, IfThenElse1, IfThenElse2, IfThenElse3 и проанализируйте результат выполнения процедур.
Примечание
На уровне стандартного модуля, в котором находится процедура
IfThenElse2, помещена инструкция Option Compare Text. Инструкция Option Compare применяется на уровне модуля перед первой процедурой модуля для задания используемого по умолчанию способа сравнения строковых данных.
Упражнение 2
Изучите инструкцию Option Compare Binary | Text | Database, которая указывает способ сравнения строк.
Упражнение 3
Скопируйте в модуль VBA и выполните процедуру IfThenElse4.
Упражнение 4
Составить процедуру определения количества проданных товаров в зависимости от цены товаров в соответствии с приведённой ниже таблицей.
|
Цена |
Количество проданных |
|
<=10 |
100 |
|
<=15 |
80 |
|
<=20 |
60 |
|
>20 |
50 |
В созданной процедуре
- использовать инструкцию If…Then... Else, содержащую ключевое слово ElseIf;
- использовать функцию InputBox для ввода значений переменной Цена.
Упражнение 5
- Изучите п.2.1.1.2. Инструкция Select…Case
- Скопируйте из файла Теория_к_лаб_3.doc в модуль процедуру Sub CaseSelect и выполните её при различных значениях ячейки A6.
- Составьте и выполните процедуру в соответствии с заданием Упражнение 4, используя инструкцию Case Else.
- Инструкция безусловного перехода GoTo
Инструкция GoTo изменяет ход выполнения программы без проверки каких-либо условий, передавая управление на метку в коде. Формат инструкции GoTo:
GoTo метка
Обязательный аргумент метка может быть текстовым или числовым. Метка заканчивается символом двоеточие(:).
Упражнение 6
Скопируйте из п.2.1.1.3 из файла Теория_к_лаб_4.doc проанализируйте и выполните процедуры БезУслПереход и БезУслПереход2 при различных значениях переменной r.
- Инструкции перехода к обработчику ошибок On
Инструкция On Error делает доступным обработчик ошибок и определяет его положение внутри процедуры и используется также для запрета обработки ошибок. Форматы и описание инструкции On Error приведены в п. 2.1.1.4 пособия Теория_к_лаб_3.doc.
Пользовательские обработчики ошибок позволяют реагировать на ошибки во время работы пользователя, например, когда вместо числа пользователь вводит текстовое данное или вообще не вводит данное.
В процедуре ПримерOnErrorGoto, приведённой в п. 2.1.1.4, возникает ошибка ввода до тех пор, пока не будет введено численное значение переменной Num; управление передаётся на метку Ошибка, и инструкция Resume возвращает управление инструкции
Num = InputBox("Введите число").
В процедуре ПримерOnErrorResumeNext, приведённой там же, при возникновении ошибки ввода управление передаётся инструкции If, и на экран выводится сообщение "Число не введено".
Упражнение 7
Скопируйте из п.2.1.1.4 файла Теория_к_лаб_3.doc, проанализируйте и выполните процедуры ПримерOnErrorGoto,
ПримерOnErrorResumeNext и ПримерOnErrorGoto_0 при различных значениях переменной Num (числовом и символьном).
В процедуре ПримерOnErrorGoto возникает ошибка ввода до тех пор, пока не будет введено численное значение переменной Num; управление передаётся на метку Ошибка, и инструкция Resume возвращает управление инструкцииNum = InputBox("Введите число").
В процедуре ПримерOnErrorResumeNext при возникновении ошибки ввода управление передаётся инструкции If, т.е. инструкции, следующей за той, которая вызвала ошибку, на экран выводится сообщение "Число не введено".
В процедуре ПримерOnErrorGoto_0 инструкция On Error GoTo 0 отключает пользовательский обработчик ошибок в данной процедуре и может быть использована для восстановления нормальной обработки ошибок перед выходом из процедуры. При возникновении ошибки ввода выводится следующее диалоговое окно, сообщающее о несоответствии типа данного введённому значению (“Пусто” или “Не число”).
Контрольное задание к лабораторной работе №3
Выполнить свой вариант задания №2.2 из файла Pascal_практика.pdf и оформить работу письменно, руководствуясь в оформлении работы правилами и придерживаясь следующей последовательности:
1). Условие задачи;
2). Формализация задачи (если требуется);
3). Таблица имен;
4). Блок-схема программы;
5). Текст программы;
6). Таблица трассировки;
7). Результаты и выводы.
Отчет оформлять на бумаге формата А4 или обычных тетрадных листах.
2. 2013 г
3. Справку по форме 086у
4. Какие права на ОИС можно передать 2 Что можно
5. БАШКИРСКИЙ ГОСУДАРСТВЕННЫЙ МЕДИЦИНСКИЙ УНИВЕРСИТЕТ РОСЗДРАВА КАФЕДРА ОНКОЛОГИИ С КУРСОМ ИПО З
6. 21 В последнее время все больше предприятий вкладывают денежные средства в операции на рынке ценных бум
7. Тема 2. Симетричні криптосистеми.
8. Київський коледж зв~язку Розглянуто Затверджено цикловою комісієюІМ
9. Ю Г О Р С К И Й П О Л И Т Е Х Н И Ч Е С К И Й К О Л Л Е Д Ж Комплект к.html
10. Электрооборудование и автоматика судов Дальневосточный государственный технический ры
11. Каждый человек - бренд
12. . Иисус сказал Пусть тот кто ищет не перестает искать до тех пор пока не найдет и когда он найдет он будет п
13. 300 км после чего сливается вместє с маслом
14. Організація міжнародних автомобільних перевезень
15. тематическая логика и теории алгоритмов Вариант 4 Выполнил- студент группы 9637 Вечер В
16. Предмет, функції та методи економічної теорії Тестові завдання
17. Система гемостаза
18. Смысловое восприятие речи
19. Фаско в зеленым или синем пакете.html
20. реферат дисертації на здобуття наукового ступеня кандидата педагогічних наук6