Sub Случайные_Числа()

' Возвращает 10 случайных чисел

Dim N As Long

Dim I As Long

N = 10

Dim S(1 To 10) As Single

Randomize

For I = 1 To N

S(I) = Rnd

varD1 = CVar(S(I))

MsgBox varD1, , "Случайное число"

Next I

End Sub

 

Контрольные понятия для изучения.

1. Применение диалоговых окон VBA

2. Что такое типы данных VBA. Варианты объявления типов данных.

3. Переменные и константы, их различия.

4. Порядок действий в арифметических выражениях.

5. Основные математические функции VBA

Порядок выполнения.

1. Изучить теоретическую часть и занести в протокол основные положения.

2. Создать в Microsoft Word процедуру вычисления среднего арифметического двух чисел с объявлением типов данных переменных и применением диалоговых окон InputBox и MsgBox.

3. Отладить и запустить эту программу на выполнение в среде Microsoft Word. Занести текст созданной процедуры в протокол.

4. Отобразить в протоколе основные трудности, возникшие у Вас при создании программы.

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

Синтаксис языка программирования VBA (продолжение).

Цель: изучить использование основных операторов и конструкций языка программирования VBA.

Основные вопросы.

1. Логические выражения.

2. Оператор перехода.

3. Конструкции принятия решений.

4. Циклы.

5. Массивы.

6. Пользовательские процедуры.

Логические выражения.

Помимо арифметических выражений, в VBA можно использовать логические выражения (утверждения), принимающие одно из двух значений типа Boolean - True (истина, логическая единица) или False (ложь, логический нуль).

Пример:

Sub Логикаl ()

Dim х Аs Integer

Dim у Аs Integer

Dim blnA Аs Boolean

х = 5

у = 2

blnA = х > у 'Результат: blnA True

blnA = х = у 'Результат: blnA = False

End Sub

В программе Логикаl два логических выражения: х > у и х = у.

Более сложные логические выражения составляются с помощью логических операций Not, And и Or.

Операция Not определяется следующим образом:

· если А равно True, то Not А равно False;

· если А равно False, то Not А равно True.

Она называется логическим НЕ или логическим отрицанием.

Таблица 3.8 – Определение операции And

А	В	А And В
True	True	True
True	False	False
False	True	False
False	False	False

Таблица 3.9 – Определение операции Or

А	В	А Or В
True	True	True
True	False	True
False	True	True
False	False	False

При наличии в выражении нескольких логических операций порядок их выполнения определяется следующим правилом приоритетов:

1. в первую очередь выполняется операция Not;

2. далее выполняется операция And;

3. в последнюю очередь выполняется операция Or.

Пример:

Sub Логика2 ( )

Dim х As Double

Dim у As Double

Dim z As Double