Студопедия


Авиадвигателестроения Административное право Административное право Беларусии Алгебра Архитектура Безопасность жизнедеятельности Введение в профессию «психолог» Введение в экономику культуры Высшая математика Геология Геоморфология Гидрология и гидрометрии Гидросистемы и гидромашины История Украины Культурология Культурология Логика Маркетинг Машиностроение Медицинская психология Менеджмент Металлы и сварка Методы и средства измерений электрических величин Мировая экономика Начертательная геометрия Основы экономической теории Охрана труда Пожарная тактика Процессы и структуры мышления Профессиональная психология Психология Психология менеджмента Современные фундаментальные и прикладные исследования в приборостроении Социальная психология Социально-философская проблематика Социология Статистика Теоретические основы информатики Теория автоматического регулирования Теория вероятности Транспортное право Туроператор Уголовное право Уголовный процесс Управление современным производством Физика Физические явления Философия Холодильные установки Экология Экономика История экономики Основы экономики Экономика предприятия Экономическая история Экономическая теория Экономический анализ Развитие экономики ЕС Чрезвычайные ситуации ВКонтакте Одноклассники Мой Мир Фейсбук LiveJournal Instagram

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





Дата добавления: 2015-05-10; просмотров: 579; Опубликованный материал нарушает авторские права? | Защита персональных данных | ЗАКАЗАТЬ РАБОТУ


Не нашли то, что искали? Воспользуйтесь поиском:

Лучшие изречения: Учись учиться, не учась! 10305 - | 7844 - или читать все...

 

34.204.173.45 © studopedia.ru Не является автором материалов, которые размещены. Но предоставляет возможность бесплатного использования. Есть нарушение авторского права? Напишите нам | Обратная связь.


Генерация страницы за: 0.002 сек.