|
|||||||||||
АвтоАвтоматизацияАрхитектураАстрономияАудитБиологияБухгалтерияВоенное делоГенетикаГеографияГеологияГосударствоДомДругоеЖурналистика и СМИИзобретательствоИностранные языкиИнформатикаИскусствоИсторияКомпьютерыКулинарияКультураЛексикологияЛитератураЛогикаМаркетингМатематикаМашиностроениеМедицинаМенеджментМеталлы и СваркаМеханикаМузыкаНаселениеОбразованиеОхрана безопасности жизниОхрана ТрудаПедагогикаПолитикаПравоПриборостроениеПрограммированиеПроизводствоПромышленностьПсихологияРадиоРегилияСвязьСоциологияСпортСтандартизацияСтроительствоТехнологииТорговляТуризмФизикаФизиологияФилософияФинансыХимияХозяйствоЦеннообразованиеЧерчениеЭкологияЭконометрикаЭкономикаЭлектроникаЮриспунденкция |
Тест по теме информационные технологииСоздание интерактивных тестов в MS PowerPoint c использованием Visual Basic for Application Здесь мы разберем создание интерактивного теста в среде MS PowerPoint с использованием Visual Basic for Application. Для удобства в использовании теста добавим в него функции учета количества вопросов, количества верно выполненных заданий, процента выполнения заданий и выставления оценки 1 шаг: Выберем предмет, тему, сформулируем вопросы и зададим по 4 варианта ответов (можно и больше), из них выберем один правильный – запишем все это на листке Тест по теме информационные технологии 1. В состав персонального компьютера входит?
2 шаг: Сейчас откроем MS PowerPoint и создадим 3 слайда (на каждый вопрос 1 слайд), подберем оформление слайдов, шрифты Рассмотрим на примере первого слайда а) На слайде размещаем - надпись ВОПРОС 1 - надпись с текстом вопроса б) заходим в меню ВИД (вкладка РАЗРАБОТЧИК) – ПАНЕЛИ ИНСТРУМЕНТОВ – ЭЛЕМЕНТЫ УПРАВЛЕНИЯ, Берем переключатель (щелкаем на нем) и помещаем на слайд (щелкаем на слайде) – на слайде появляется переключатель
- Щелкаем правой по переключателю и выбираем раздел СВОЙСТВА
- В разделе СВОЙСТВА изменяем вид и вид и текст на переключателе:
Цвет фона переключателя
Надпись на переключателе
Размер и тип шрифта
Цвет шрифта
в) Создаем еще 3 переключателя и производим с ними такие же действия г)Создадим кнопку. Для этого берм ее с той же панели ЭЛЕМЕНТЫ УПРАВЛЕНИЯ и помещаем ее на слайд д) Щелкнув правой по кнопке, выбираем СВОЙСТВА и тоже изменяем вид и текст на кнопке
3 шаг: Итак, у нас создан один слайд. Точно так же создаем слайды для остальных вопросов, вставляя в них соответствующие вопросы и ответы, переключатели и кнопки 4 шаг: Создадим последний слайд, на котором будут выводиться все результаты
а) поместим на слайде 4 элемента Label (надпись) с панели ЭЛЕМЕНТЫ УПРАВЛЕНИЯ
б) Создадим 2 кнопки: - посмотреть результат - выход
5 шаг: Итак, слайды созданы, объекты на них размещены Приступим к описанию событий. Для этого и используется встроенный в офисные программы фирмы Microsoft язык Visual Basic for Application (VBA). Начнем с первого слайда:
Нам необходимо, чтобы при выборе одного из вариантов ответа и нажатии на кнопку «ДАЛЕЕ» автоматически - считалось число выполненных заданий - проверялся ответ, и, если он верный, то к счетчику верных заданий прибавлялась единица - осуществлялся переход на следующий слайд (вопрос)
Откроем первый слайд. Сделаем двойной щелчок по кнопке «ДАЛЕЕ», при этом открывается редактор Visual Basic, в котором мы и будем описывать процедуры нажатия на кнопку Здесь скажу, что у нас нет задачи изучить VBA – это требует долгой и кропотливой работы, остановимся только на алгоритме наших действий и объяснении строк используемого кода Ниже мы видим окно редактора Visual Basic
Запишем следующий код:
Z = 0 (Z – это счетчик выполненных заданий, т.е сколько заданий в тесте, в начале теста его обнуляем) L = 0 (L – счетчик верно выполненных заданий, ему тоже присваиваем ноль) N = 0 (N – это процентное выполнение заданий теста) If OptionButton1.Value = True Then L = L + 1 End If (Здесь проверяется, если выбран ответ первый (16 цветов), то счетчику верно выполненных заданий прибавляется единица, а если выбран неверный ответ, то не прибавляется) Z = Z + 1 (считается число выполненных заданий) OptionButton1.Value = False OptionButton2.Value = False OptionButton3.Value = False OptionButton4.Value = False (Здесь снимаются точки со всех переключателей, чтобы при следующем запуске теста не было по умолчанию выбранных ответов) Поиск по сайту: |
Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Студалл.Орг (0.007 сек.) |