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


ЗАДАЧА

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




 

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

82846. Умови життя тварин. Боротьба тварин за життя 46 KB
  Мета: формувати поняття необхідні умови для життя рослиноїдних хижих і всеїдних тварин уявлення про ознаки пристосування тварин до добування корму; виховувати спостережливість любов до природи та бережливе ставлення до неї. Які групи тварин ви знаєте Як вони поділяються за способом живлення...
82847. Навколишнє середовище (довкілля) тварин. Як тварини пристосувалися до різних умов навколишнього середовища. Охорона тварин 143 KB
  Мета: формувати елементарні поняття про навколишнє середовище тварин та необхідні умови для їх життя уявлення про деякі ознаки пристосування тварин до умов навколишнього середовища та пристосування до захисту від ворогів у природі...
82848. Дієслова близькі та протилежні за значенням 59 KB
  Дієслова близькі та протилежні за значенням. Поглиблювати знання про дієслова; розвивати в учнів уміння добирати дієслова близькі та протилежні за значенням; вчити вживати дієсловасиноніми у власному мовленні; збагачувати лексичний запас учнів; учити складати розповідь за серією малюнків використовуючи...
82849. Розповідні речення 49.5 KB
  Розширити уявлення учнів про речення; розпочати ознайомлення з типами речень за метою висловлювання; ознайомити учнів з розповідними реченнями їх характерними ознаками оформленням на письмі; розвивати вміння визначати розповідні речення в мовленні правильно записувати їх за інтонаційними ознаками...
82851. Слова, що означають назви предметів 40 KB
  Мета: узагальнити і систематизувати значення по вивченій темі, розвивати увагу, пам’ять, зв’язне мовлення, вміння аналізувати, узагальнювати і виділяти головне, виховувати старанність, інтерес до навчання, бережливе ставлення до природи.
82852. Слова, що означають назви предметів. Складання усної розповіді за малюнком 105 KB
  Закріпити знання учнів про слова що означають назви предметів. Сьогодні ми будемо закріплювати знання про слова що означають назви предметів будемо розпізнавати ці слова і ставити до них питання. Дрізд до дятла Добрий день Дуб здоровий не впаде Дятел дзьобом дріботить: Двісті років простоїть...
82853. Головні слова у реченні. Складання речень за графічними схемами 98 KB
  Мета: формувати поняття головні слова в реченні вчити знаходити їх у реченні; закріплювати знання про речення його види за метою висловлювання; розвивати інтерес до мовних явищ мовлення та мислення; розвивати вміння аналізувати доводити синтезувати інформацію; виховувати любов до своїх рідних...