Створення тесту - один з ... - в ms powerpoint з використанням visual basic for application
- Можливість автоматизованої обробки результатів;
- Можливості для дизайну (художнього оформлення тестів).
- Трудомісткість створення тестів;
- Необхідно знати основи VBA
- Тут ми розберемо створення інтерактивного тесту в середовищі MS PowerPoint з використанням Visual Basic for Application. Для зручності у використанні тесту додамо в нього функції обліку кількості питань, кількості вірно виконаних завдань, відсотки виконання завдань і виставлення оцінки
Отже, почнемо по кроках:
Виберемо предмет, тему, сформулюємо питання і поставимо по 4 варіанти відповідей (можна і більше), з них виберемо один правильний.
(Для прикладу я розгляну 3 питання з теми з інформатики
Є на світі мережу мереж.
Дуже цікаво з нею.
Людям всім вона потрібна,
Миру дуже мережу важлива.
Що за мережу? Знайди відповідь.
Мережа зветься ...
По екрану метелик летить,
По екрану рядок біжить,
На екрані падає сніг,
Потік зірок здійснює свій біг.
Це що, мультиплікація?
Ні - це комп'ютерна
1) Анімація
2) Публікація
3) Градація
4) Облігація
Для чого ж цей ящик?
Він в себе папір тягне,
І зараз же літери, точки,
Коми - рядок до рядку -
надрукує картинки
Спритний майстер -
Спритний ...
1) спринтер
2) принтер
3) светр
4) комп'ютер
Зараз відкриємо MS PowerPoint і створимо 3 слайда (на кожне питання 1 слайд), підберемо оформлення слайдів, шрифти
Розглянемо на прикладі першого слайда
а) На слайді розміщуємо
- напис ПИТАННЯ 1
- напис з текстом питання
б) заходимо в меню ВИД - ПАНЕЛІ ІНСТРУМЕНТІВ - ЕЛЕМЕНТИ УПРАВЛІННЯ,


Беремо перемикач (клацаємо на ньому) і поміщаємо на слайд (клацаємо на слайді) - на слайді з'являється перемикач
- Клацаємо правою по перемикачу і вибираємо розділ властивості

- У розділі властивості змінюємо вигляд і текст на перемикачі:

в) Створюємо ще 3 перемикача і виробляємо з ними такі ж дії

г) Створимо кнопку. Для цього берм її з тієї ж панелі ЕЛЕМЕНТИ УПРАВЛІННЯ і поміщаємо її на слайд
д) Клацнувши правою по кнопці, вибираємо властивості і теж змінюємо вигляд і текст на кнопці

Отже, у нас створено один слайд.

Точно так же створюємо слайди 2 і 3, вставляючи в них відповідні питання і відповіді, перемикачі та кнопки
Створимо останній слайд, на якому будуть виводитися всі результати
а) помістимо на слайді 4 елементи Label (напис) з панелі ЕЛЕМЕНТИ УПРАВЛІННЯ
б) Створимо 2 кнопки:
- показати результат
- вихід

Отже, слайди створені, об'єкти на них розміщені
Приступимо до опису подій.
Для цього і використовується вбудований в офісні програми фірми Microsoft мову Visual Basic for Application (VBA).
Почнемо з першого слайда:
Нам необхідно, щоб при виборі одного з варіантів відповіді і натисканні на кнопку «ДАЛІ» автоматично
- вважалося число виконаних завдань
- перевірявся відповідь, і, якщо він вірний, то до лічильника вірних завдань додавалася одиниця
- здійснювався перехід на наступний слайд (питання)

Запишемо наступний код:
пояснення:
Z - це лічильник виконаних завдань, тобто скільки завдань у тесті, на початку тесту його Обнуляємо '
L - лічильник вірно виконаних завдань, йому теж присвоюємо нуль
N - це відсоткове виконання завдань тесту
If OptionButton3.Value = True Then - Тут перевіряється, якщо обраний третій відповідь (Четверо), то лічильнику вірно виконаних завдань додається одиниця, а якщо обраний невірний відповідь, то не додається '
Z = Z + 1 - вважається число виконаних завдань '
OptionButton1.Value = False
OptionButton2.Value = False
OptionButton3.Value = False
OptionButton4.Value = False - тут знімаються точки з усіх перемикачів, щоб при наступному запуску тесту не було за замовчуванням обраних відповідей '
SlideShowWindows (1) .View.Next 'Це команда переходу до наступного слайду'
Аналогічно відкриваємо 2 і 3 слайди і вставляємо такий же код для кнопок «ДАЛІ» (можна просто скопіювати код з першого слайда), проте в коді цих кнопок прибираємо рядки
Z = 0
L = 0
N = 0 (тому що тест вже йде і обнуляти свідчення не треба)
Для того, щоб кнопки працювали, в проект необхідно додати модуль з описом змінних величин
- робимо подвійне клацання по кнопці «ДАЛІ» на першому слайді
- в меню Visual Basic вибираємо INSERT - MODULE,

Public L, Z, N As Integer
Залишилося написати код для кнопок «ПОДИВИТИСЯ РЕЗУЛЬТАТ» І «ВИХІД»
а) Спочатку опишемо кнопку «ПОДИВИТИСЯ РЕЗУЛЬТАТ»:
Для цього
- переходимо на останній слайд
- подвійним клацанням по кнопці «ПОДИВИТИСЯ РЕЗУЛЬТАТ» переходимо в Visual Basic
- записуємо код:

Пояснення до коду:
Label1.Caption = Z - тут виведеться число виконаних завдань
Label2.Caption = L - тут виведеться число вірно виконаних завдань
N = (L / Z) * 100 - розраховується відсоток виконання завдань
Label3.Caption = N - тут виводиться відсоток виконання завдань
If N> = 85 Then
Label4.Caption = «Відмінно» - Якщо відсоток виконання більше або дорівнює 85 - виводиться «Відмінно»
End If
If N <85 And N>= 60 Then
Label4.Caption = «Добре» - Якщо відсоток виконання від 60 до 85 - виводиться «Добре»
End If
If N <60 And N>= 30 Then
Label4.Caption = «Задовільно» - Якщо відсоток виконання від 30 до 60 - виводиться «Удовлетв»
End If
If N <30 Then
Label4.Caption = «Погано» Якщо відсоток виконання нижче 30 - виводиться «Погано»
End If
End Sub
б) Зараз опишемо кнопку «ВИХІД»
Виходимо і зберігаємо всі зміни
На цьому створення тесту закінчено. Запускаємо його (відкриваємо презентацію) і перевіряємо
Якщо що - то не працює, то подивіться і поміняйте налаштування безпеки в меню СЕРВІС - МАКРОС - БЕЗПЕКА (можливо макроси автоматично відключаються, а наш тест заснований на макросах)