1. Інструментальне середовище Visual Basic for Application та створення власної панелі інструментів

Мета роботи - вивчення інструментального середовища програмування Visual Basic for Application, його системи меню, режимів роботи, текстового редактора програм, виконання програм, довідково-інформаційної системи.

Середовище розробки VBA. VBA має власне середовище розробки, що називається інтегрованим середовищем розробки або IDE. VBA IDE — це вікно, що містить меню, інші вікна й елементи, що застосовуються при створенні проектів VBA (рис.1).

Розробка проектів і створення додатків. Проекти VBA виконуються разом з іншими додатками. Додаток, у якому розробляється і виконується проект VBA, називається основним. Наприклад, можна створити проект VBA, що працює разом з Microsoft Word. У цьому випадку Word є одним із основних додатків.Фактично, не використовуючи основний додаток, не можна побудувати додаток VBA.

Форми. Досить імовірно, що в додатку буде потрібно вивести інформацію, і з повною впевненістю можна сказати, що користувачеві знадобиться ввести дані. Інформація може бути дуже простою, наприклад, повідомленням, або досить складною, наприклад, набором різнорідних величин. У VBA є можливість складною, наприклад, набором різнорідних величин. У VBA є можливість того, за допомогою VBA можна розробити форми, а також процедури обробки подій, що виникають у цих формах.

Хід роботи

1.1 Створення файлу

Розпочинаємо роботу з створення документа Microsoft Office Word і присвоюємо йому ім’я «Romanenko.doс».

Для цього натисканням правої кнопки миші викликаємо контексне меню і обираємо «Документ Microsoft Office Word».

1.2.Створення панелі інструментів

Відкривши цей документ створюємо власну панель інструментів з ім’ям

Romanenko.

Для цього викликаємо контекстне меню → настройки → панель інструментів → создать.

Вводимо в поле введення «Зделать панель доступной для файла «RGR_5_Romanenko.doc»

1.3.Створення макросів програми

Наступним кроком створюємо макроси программ Сервіс → макрос → макроси. У полі введення «макроси із» вводимо «RGR_5_ Romanenko.doc».

Створюємо 4 макроси для програм:

Лінійна програма – Line

Розгалуджена програма – Rozgal

Циклічна програма – Cikl

Програма ітерації – Iter

У вікні «макрос» вводимо ім’я 1-ї програми і натискаємо піктографічну кнопку «Создать». Після цього відкривається вікно Visual Basic. доповнюємо заготовку програми коментарями:

’Автор студентка групи 206 –Б Романенко Олександр.

’Лінійна програма

MsgBox ("Лінійна програма")

Натискаємо клавішу що вказує на те, що наша заготовка працює правильно. Повторюємо дану операцію для інших програм.

1.4. Заповнення власної панелі інструментів піктографічними клавішами

Заповнення власної панелі інструментів піктографічними кнопками:

Контекстне меню → настройка → команди → категорії → макроси.

Створені мною макроси починаються з слова «Project». Перетягуємо макроси на власну панель. Основний стиль піктографічної кнопки приймає вигляд іконки.

1.5. Редагування піктографічних кнопок панелі інструметів

При включеному вікні настройок викликаємо контексне меню відповідної програми → змінити значок на кнопці та змінюємо зовнішній вигляд всих 4-х кнопок.

«Панель інструментів»

Висновок: в ході виконання цієї роботи мною було створено власне піктографічне меню «Romanenko», яке я наповнила піктографічними кнопками з заголовками макросів, які буду використовувати в майбутньому.

2.Програмування алгоритмів лінійної структури

Хід роботи

2.1. Постановка задачі

Розробити алгоритм та програму розрахунку значень функції y та z згідно з формулами:

Протестувати програму за такими вхідними даними m=0.7, c=2.1, x=1.7, a=0.5, b=1.08

2.2. Блок-схема

Блок-схему алгоритму наведено на Рис. 1

2.3. Таблиця ідентифікаторів

Змінна алгоритму	х	z	s	m	b
Ідентифікатор	x	z	s	m	b
Тип	Single	Single	Single	Single	Single

2.4. Текст програми

Sub lion()

MsgBox ("линейная программа")

MsgBox ("программу розработала студентка группы 206-Б Романенко Олександр")

'оголошення змінних

Dim m As Single, b As Single, a As Single

Dim c As Single, x As Single

'уведення вхідних даних

m = InputBox("Уведiть m")

a = InputBox("Уведiть a")

c = InputBox("Уведiть c")

b = InputBox("Уведiть b")

x = InputBox("Уведіть x")

'обрахування виразів

z = (sin(x ) /sqr(1+m^2*sin (x) ^2)-c*m*log(m*x)

s = (exp(-a*x)*sqr(x+1))+(exp(-b*x)*sqr(x+1.5))

' виведення результатiв

MsgBox ("Значення z: " + Str(z))

MsgBox ("Значення s: " + Str(s))

End Sub