Автор: Пользователь скрыл имя, 13 Сентября 2013 в 12:41, лабораторная работа
Инструкция по изменению тестов в MS PowerPoint для использования в интерактивном режиме
Инструкция по изменению тестов в MS PowerPoint для использования в интерактивном режиме
Описание:
У нас уже есть готовый тест и этот урок даст возможность каждому с легкостью изменить его и дополнить до нужного количества вопросов.
1 шаг:
Скопируем на рабочем столе файл «Тест пример» и переименуем его вашим именем фамилией отчеством.
Наш тест сделан полностью, кроме предпоследнего слайда. Не сделав, нужных указаний написанных в данной инструкции он работать не будет.
Откроем предпоследний слайд. Выберем предмет, тему, сформулируем вопросы и зададим по 4 варианта ответов (можно и больше), из них выберем один правильный.
Мы видим слайд с готовыми кнопками и ответами, НО здесь нет главного кода определяющего ответ. Сделаем двойной щелчок по кнопке «ДАЛЕЕ», при этом открывается редактор Visual Basic, в котором мы и будем описывать процедуры нажатия на кнопку.
В открывшемся окне, между «Private Sub CommandButton?_Click()» и «End Sub» , вставим следующий код,:
If OptionButton3.Value = True Then
L = L + 1
End If
Z = Z + 1
OptionButton1.Value = False
OptionButton2.Value = False
OptionButton3.Value = False
OptionButton4.Value = False
SlideShowWindows(1).View.Next
Рассмотрим следующую строку в коде « If OptionButton3.Value = True Then » :
Здесь мы определяем какой вопрос из 4-ех верный. В данном случае верный ответ 3, т.к. OptionButton3. И если мы будем в условии изменять последнюю цифру от 1-4, аналогично будет меняться и позиция правильного ответа(ответы располагаются сверху вниз в порядке возрастания).
Например в этом коде изменив OptionButton3 на OptionButton1 мы определили правильный ответ на первый:
If OptionButton1.Value = True Then
L = L + 1
End If
Z = Z + 1
OptionButton1.Value = False
OptionButton2.Value = False
OptionButton3.Value = False
OptionButton4.Value = False
SlideShowWindows(1).View.Next
В каждом слайде кроме последнего изменять правильный ответ нужно аналогично, не удаляя ничего лишнего.
2 шаг:
На этом создание теста закончено. Запускаем его (открываем презентацию) или F5 и проверяем. Если что – то не работает, то посмотрите и измените настройки безопасности в меню СЕРВИС – МАКРОС – БЕЗОПАСНОСТЬ (возможно макросы автоматически отключаются, а наш тест основан на макросах)
Для создания теста с чистого листка или изменения его например до 5-ти вопросов вы можете самостоятельно прочитать файл расположенном на рабочем столе с названием « Инструкция по созданию тестов в MS PowerPoint».