3864

Управляющие операторы или принятие решений в VB6

Лабораторная работа

Информатика, кибернетика и программирование

Управляющие операторы или принятие решений в VB6. Операторы, которые могут изменить последовательность выполнения операторов процедуры. Основанием для принятия решений в управляющих операторах являются условные (логические) выражения. Логические вы...

Русский

2012-11-09

428.5 KB

10 чел.

Управляющие операторы или принятие решений в VB6 .

Операторы, которые могут изменить последовательность выполнения операторов процедуры.

Основанием для принятия решений в управляющих операторах являются условные (логические) выражения.

Логические выражения состоят из логических операций, примененных к логическим переменным, и возвращают одно из двух значений True (Истина) или False (Ложь). Логические выражения содержат логические отношения (операции сравнения:   =,   > ,   < ,   <> ,   >= ,   <= ), связанные логическими операциями.

Основные логические операции

Операция

Обозначение

Истолкование

1

Отрицание (инверсия)

not A

Не А;

Неверно, что А

2

Конъюнкция (логическое произведение, логическое И)

А and В

А и В; как А, так и В;

А вместе с В; А в то время, как В

3

Дизъюнкция (логическое сложение, логическое ИЛИ)

А or В

А или В;

А или В или оба

4

Дизъюнкция (исключающее ИЛИ)

А xor В

А либо В; А или В, но не оба

Приоритеты выполнения логических операций в логических выражениях:

  1.  Отрицание
  2.  Логическое произведение
  3.  Логическое сложение, исключающее или

Скобки меняют порядок выполнения операций.

Таблицы истинности для основных логических операций:

А

В

Not A

A and B

A or B

A xor B

0

0

1

0

0

0

0

1

1

0

1

1

1

0

0

0

1

1

1

1

0

1

1

0

If . . . Then 

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

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

If Условие Then Оператор [Else Оператор]

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

If a= 7 Then Beep

If x < 9 Then Print “False!” Else Print “True!”

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

If Условие Then 

Операторы 1

[Elseif условие Then

Операторы 2]

Else 

Операторы 3

End if

Блочный синтаксис используется, когда необходимо выполнить не простую команду, а группу операторов.

Пример. Решение квадратного уравнения ax2 + bx + c = 0

d=b*b – 4 * a * c

If d < 0 then

Print “Уравнение не имеет корней”

Elseif d = 0 Then

x = -b / (2*a)

Print “Уравнение имеет один корень”; x

Else

x1 = (-b + sqr(d)) / (2 * a)

x2 = (-b - sqr(d)) / (2 * a)

Print “Уравнение имеет два корня ”; x1, x2

End if

Select Case(оператор выбора)

Позволяет выполнить одну из групп операторов в зависимости от значения условия.

Синтаксис

Select Case тест_выражение

Case список_выражений1

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

[Case список_выражений2

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

. . .

[Case Else

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

End Select

Пример 1. Решение квадратного уравнения ax2 + bx + c = 0

Select Case b * b - 4 * a * c

Case Is < 0

Print "Уравнение не имеет корней"

Case Is = 0

x = -b / (2 * a)

Print "Уравнение имеет один корень"; x

Case Else

X1 = (-b + Sqr(d)) / (2 * a)

X2 = (-b - Sqr(d)) / (2 * a)

Print "Уравнение имеет два корня "; X1, X2

End Select

Пример 2. Проанализировать случайное число, заданное от 0 до 10.

Private Sub Command1_Click()

Randomize

a = Int(Rnd * 9) + 1 'случайное число от 1 до 10

Select Case a

Case 1 Print "Равно 1"

Case 2, 3 Print "Равно 2 или 3"

Case 4 To 6 Print "Больше или равно 4 и меньше или равно 6"

 Case Is >= 9 Print "Больше или равно 9"

 Case Else Print "Ни одно из предшествующих"

End Select

End Sub


ЗАДАЧА

Создать проект вычисления скорости бегуна на некоторой дистанции.




 

А также другие работы, которые могут Вас заинтересовать

6881. Побудова 3D-моделі рельєфа 1.21 MB
  Побудова 3D-моделі рельєфа. Одночасно відкриті в ENVI знімок та карта Використаємо створені на попередній лабораторній роботі файли карти для побудови тривимірної моделі поверхні. Для цього нам потрібна карта висот відповідної області...
6882. Магнітна індукція у феромагнетиках 215 KB
  Магнітна індукція у феромагнетиках Мета роботи: вивчення процесів, що відбуваються при намагнічуванні та перемагнічуванні тороидального феромагнітного сердечника. Зміст роботи і завдання 1. Ознайомитися з лабораторним макетом для зняття петель перем...
6883. Робота із мультиспектральними знімками. Класифікація 2.5 MB
  Робота із мультиспектральними знімками. Класифікація Більшість супутників, що проводять фотозйомку земної поверхні постачають дані не у вигляді кольорового зображення, а у вигляді декількох (інколи декількох десятків) монохромних зображень - по...
6884. Справочно-библиографический аппарат библиотеки 41.41 KB
  Справочно-библиографический аппарат библиотеки. Определение, состав и задачи справочно-библиографического аппарата (СБА) Согласно ГОСТ 7.26-80 Библиотечное дело. Основные термины и определения справочно-библиографический аппарат (СБА) библи...
6885. В чём заключается палеонтологический метод в геологии 26 KB
  В чём заключается палеонтологический метод в геологии? Объясните на примерах. Палеонтологический метод, метод определения относительного возраста осадочных толщ земной коры по сохранившимся в них ископаемым остаткам организмов. Используется для реше...
6886. Охарактеризуйте оболочки (геосферы) Земли. Приведите схему строения Земли 318 KB
  Охарактеризуйте оболочки (геосферы) Земли. Приведите схему строения Земли. Выделяются следующие геосферы: атмосфера, гидросфера, литосфера, земная кора, мантия и ядро Земли...
6887. Охарактеризуйте продукты вулканических извержений 33.5 KB
  Охарактеризуйте продукты вулканических извержений. При извержении вулкана выделяются продукты вулканической деятельности, которые могут быть жидкими, газообразными и твердыми. Газообразные - фумаролы и софиони, играют важную роль в вулканической дея...
6888. Охарактеризуйте землетрясения и их типы 31.5 KB
  Охарактеризуйте землетрясения и их типы. Ежегодно на всей Земле происходит около миллиона землетрясений, но большинство из них так незначительны, что они остаются незамеченными...
6889. Карст. Что такое карст и как он образуется 114 KB
  Что такое карст и как он образуется? Растворение некоторых горных пород вызывает целый ряд явлений, которые называются карстовыми. Слово карст обозначает такие формы рельефа, которые были образованы вследствие растворения горных пород, таких, напр...