
Министерство образования и науки РФ
ФГОУ СПО «Новосибирский авиационный технический колледж»
УТВЕРЖДАЮ
Председатель цикловой
комиссии (код)
____________ А.А.Певина
Протокол № __ от «___» _________ 20_г.
Построение форм с обработкой событий, использующих ветвление, циклические формы
Методические указания к практическому занятию 15
(6.3)
Учебная дисциплина: Информатика
Специальность:151901 Технология машиностроения
160108 Производство летательных аппаратов
230113 Компьютерные системы и комплексы
230115 Программирование в компьютерных системах
Разработал:
А.А.Певина
(2011)
1 Цели
В ходе выполнения работы студенты осваивают:
Общие компетенции:
- Организовывать собственную деятельность, выбирать типовые методы и способы выполнения профессиональных задач, оценивать их эффективность и качество
- Принимать решения в стандартных и нестандартных ситуациях и нести за них ответственность
- Осуществлять поиск и использование информации, необходимой для эффективного выполнения профессиональных задач, профессионального и личностного развития
- Использовать информационно-коммуникационные технологии в профессиональной деятельности
- Работать в коллективе и в команде, эффективно общаться с коллегами, руководством, потребителями
- Брать на себя ответственность за работу членов команды (подчиненных), за результат выполнения заданий
1.1.2 Начальные профессиональные компетенции:
- готовность и способность обучаться самостоятельно;
- владение современными средствами информатизации;
1.2 В результате выполнения работы студенты:
1.2.1 Осваивают умения:
записывать на языке программирования алгоритм решения учебной задачи и отлаживать её.
Научиться писать программы с использованием проверки условия.
Целью работы является изучение возможностей разработки приложений с циклическими алгоритмическими структурами.
1.2.2 Усваивают знания:
назначение языков программирования;
основные типы данных и формы их представления для обработки на компьютере;
основные элементы языка Visual Basic, типы переменных, операторы и команды;
организацию следования, ветвления, циклов в Visual Basic, использования подпрограмм;
правила записи программ.
2 Оборудование, аппаратура, материалы, инструменты,
документация или дидактическое обеспечение
Персональный компьютер с установленным программным обеспечением.
3 Форма организации
- индивидуальная.
4 Инструктаж
4.1. Порядок включения-отключения ПК;
4.2. Правила безопасной работы;
4.3. Правила техники безопасности.
5 Порядок выполнения
Задания выполняются под руководством преподавателя.
Задание 1
Загрузите Visual Studio.NET. Нажмите на панели задач Windows кнопку «Пуск» (Start), в появившемся меню выберите «Все Программы», затем в появившемся меню – Microsoft Visual Studio.NET, а затем в появившемся меню – снова Microsoft Visual Studio.NET. (В дальнейшем вместо словесного описания щелчков мыши в меню я для краткости буду писать так: Пуск Все Программы Microsoft Visual Studio .NET Microsoft Visual Studio .NET). При первом запуске необходимо выбрать язык программирования на открывшейся странице, вам следует выбрать Visual Basic. Создайте новый проект (файл - создать проект). Чтобы сохранить проект, надо выбрать «файл-сохранить все». В открывшемся поле выбрать свой сетевой диск и в него сохранить проект.
Создать проект, «Тест по информатике», который содержит несколько вопросов и варианты ответов.
Создайте новый проект, назовите его Лабораторная работа 15
Переименуйте форму: свойство Text - Заставка.
Чтобы добавить в ListBox данные, нажмите на стрелочку вверху ListBox, выберите «Правка элементов» и введите текст.
Создайте еще одну форму, изменив ее свойство Text с Form2 на Тест.
Чтобы добавить вкладку в TabControl, также как и в предыдущем пункте нажмите на стрелочку и выберите «Добавиь вкладку».
На каждой из вкладок вы добавляете одинаковый набор элементов (вопрос, варианты ответа, кнопка Готово). Таким образом, вы не копируете только ProgressBar, и два Label, «Ваш результат» и пустой, в котором будет отражаться результат тестирования. Эти элементы находятся на форме, а не в TabControl.
Придумайте еще 2 вопроса по информатике и добавьте их на новые вкладки.
Задание 2
- Создайте программный код.
Программируем Заставку.
Поместите в PictureBox картинку, которую вы можете взять в папке с лабораторной работой, либо нарисовать свою. Метод добавления картинки выберите любой из тех что мы прошли.
Вам необходимо чтобы при нажатии на кнопку «Начать тест», у вас появлялось окно Теста, т.е. Form2. Как это описать в программном коде, вы узнали предыдущей лабораторной работе.
Программируем Тест.
Когда открывается окно Теста, включается Timer и ProgressBar. Максимальное значение ProgressBar вы выбираете по своему усмотрению в окне свойств. Чтобы ProgressBar отсчитывал секунды, вам понадобится таймер из панели элементов. Когда вы его добавите, то увидите, что таймер добавляется не на форму, а чуть ниже.
Интервал таймера измеряется в миллисекундах. Поэтому чтобы таймер считал секунды, задайте интервал равным 1000, что означает 1с. Таким образом, на тест отведется определенное время.
Чтобы таймер включился, используйте код: Timer1.Enabled = True
Когда начинает работать таймер, включается ProgressBar, и работает до максимального значения, указанного вами. После того как время выйдет, появится соответствующее сообщение, которое должно содержать сообщение о том что время вышло, и количество баллов, заработанных на это время. А таймер и ProgressBar должны выключиться.
Здесь вам понадобится конструкция If….Else….End If
Программный код:
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If ProgressBar1.Value = 30 Then
Timer1.Enabled = False
MsgBox("Время вышло!!!!, Ваш результат:" & Str(X))
Else
ProgressBar1.Value = ProgressBar1.Value + 1
End If
End Sub
Проанализируйте данный код и прокомментируйте его в отчете.
Таким образом, при загрузке формы включается таймер, а при включении таймера начинает работать ProgressBar.
Далее вы выбираете вкладку с вопросом и программируете схему ответа на вопрос.
Схема ответа: чтобы ответить на вопрос, отвечающий на тест должен выбрать нужный RadioButton и нажать на кнопку Готово. После того как нажата кнопка Готово один раз, она перестает работать (пример: Button3.Enabled = False), т.е. отвечающий больше не сможет на нее нажать и баллы не будут изменяться.
Если выбран правильный ответ, то к результату добавляется 1 балл. Если ответ неправильный – то отнимается, (рядом с Label «Ваш результат» на форме есть пустой Label, который вы добавили при построении формы, в нем и фиксируется результат теста).
Как использовать RadioButton, вы узнали из предыдущих лабораторных работ.
После ответа на первый вопрос, отвечающий выбирает вторую вкладку, и отвечает на вопрос, написанный в этой вкладке. После нажатия на кнопку Готово на второй вкладке она также как и кнопка Готово на первой вкладке, перестает работать. А к уже имеющемуся результату добавляется или отнимается еще один балл.
Аналогично работают и все остальные вкладки.
Чтобы запрограммировать отражение результата в Label, вам, возможно, понадобится создать глобальную переменную с начальным значением ноль, т.к. изначально мы имеем ноль баллов. В этой переменной будет накапливаться сумма баллов за ответы на все вопросы. Например: Dim X As Integer = 0
Код вписывайте, открывая окно кода для каждой кнопки двойным щелчком мыши на ней. Номер переключателя RadioButton в заголовке процедуры Private Sub должен совпадать с номером в условном операторе.
Чтобы значение результата менялось, можно использовать конструкцию If, добавив Else….End If к следующему коду:
If RadioButton3.Checked = True Then
X = X + 1
Label3.Text = Str(X)
Доработайте данную конструкцию либо испльзуйте свой код.
Таким образом, когда ответ правильный, то X = X + 1. Если неправильный, то X = X – 1.
Функция Str(X)используется для преобразования числа в текст. Эту же функция можно использовать при программировании MsgBox, чтобы в сообщении отражалось количество заработанных баллов.
Запустите построение и отладку проекта, проверьте работу кнопки на первой форме и правильность подсчѐта баллов на первой вкладке второй формы.
Если всѐ правильно, доработайте вторую и третью вкладки, аналогично первой. Не забудьте менять в коде X = X + 1 или X = X – 1 в зависимости от того, правильный или неправильный ответ на кнопке. Описывать переменную X больше не надо.
Задание 3
Перестройте и отладьте проект, проверьте его работу, вводя правильные и неправильные ответы.