Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Информат ЛАБОРАТОРНАЯ РАБОТА.doc
Скачиваний:
3
Добавлен:
24.04.2019
Размер:
179.71 Кб
Скачать

7. Разница между операторами If и Select Case.

Конструкция Select Сase позволяет обрабатывать в программе несколько условий и аналогична блоку конструкций IfThenElse. Эта конструкция состоит из анализируемого выражения и набора операторов Case (в случае) на каждое возможное значение выражения. Работает эта конструкция следующим образом. Сначала вычисляется значение заданного в конструкции выражения. Затем полученное значение сравнивается со значениями, задаваемыми в операторах Сase конструкции. Если найдено искомое значение, выполняются команды, приписанные данному оператору Case. После завершения выполнения конструкций управление будет передано конструкции, следующей за ключевым словом End Select. Запись конструкции Select Case следующая:

Select Case сравниваемое значение

CASE значение 1

конструкция 1

CASE значение 2

конструкция 2

End Select

В начале конструкции расположены ключевые слова Select Case, указывающие, что расположенный рядом с ними параметр “сравниваемое значение” будет проверяться на несколько значений. Далее следуют группы команд, начинающиеся с ключевого слова Case. Если параметр “сравниваемое значение” равен значению, указанному в текущем операторе Case, то будут выполняться команды, расположенные между этим и следующим ключевым словом Case.

В качестве примера воспользуемся конструкцией Select Case для выбора удельного активного сопротивления и расчета полного активного сопротивления R в зависимости от заданной марки провода воздушной линии электропередачи:

Private Sub Marka()

m = InputBox("Введите марку провода")

l = InputBox("Введите длину линии")

Select Case m

Case "АС 70/11"

R = l * 0.428

Case "АС 95/16"

R = l * 0.306

Case "АС 120/19"

R = l * 0.249

Case "АС 150/24"

R = l * 0.198

Case "АС 185/29"

R = l * 0.162

Case Else

R = "Выбранная марка провода отсутствует в базе данных"

End Select

MsgBox R

End Sub

Select Case может выполнить не более одной из содержащихся в ней последовательностей конструкций. После того как одно из условий оказалось равно True, и была выполнена соответствующая последовательность конструкций, Select Case завершит свою работу. Остальные условия проверяться не будут.

  1. Разница между операторами While и Until.

Do [{While / Until} условие]

[операторы]

[Exit Do]

[операторы]

Loop

или:

Do

[операторы]

[Exit Do]

[операторы]

Loop [{While / Until} условие

ЛАБОРАТОРНАЯ РАБОТА № 17

Программа microsoft access. Основные принципы работы с базами данных

Цель работы: получить представление о базах данных; ознакомиться с программой MICROSOFT ACCESS и входящими в нее объектами; получить практические навыки по созданию баз данных.

Цель работы

1. Изучите теоретические сведения.

  1. Запустите программу ACCESS и ознакомьтесь с меню.

  2. На диске, указанном преподавателем, создайте новую базу данных с помощью Мастера.

  3. Закройте кнопочную форму и посмотрите, какие элементы созданы в базе данных.

  4. Удалите базу данных, созданную Мастером.

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

  6. Выйдите из ACCESS.

  7. Ответьте на контрольные вопросы.