Презентация по информатике на тему: "Создание фрагмента тестовой программы в среде Visual Basic".

• 1 слайд

  Создание фрагмента тестовой программы в среде Visual Basic
  Итоговый урок
  7 класс
  ГБОУ СОШ № 327
  Якушина М.В.
  

• 2 слайд

   Visual Basic представляет собой удобный графический интерфейс в процессе разработки программы (приложения).
  
  
  Запуск программы: Пуск -  Программы - Visual Basic;
  для начала работы над новым проектом необходимо ввести команду File – New – StandardEXE.
  На экране монитора появится окно программы Visual Basic, которое включает в себя:
  

• 3 слайд

  Строка заголовка
  Строка меню
  Панель инструментов
  Окно свойств объекта
  Окно Конструктор форм
  Панель компонентов
  Проводник по проекту
  1
  2
  4
  3
  5
  7
  6
  

• 4 слайд

  Создание графического интерфейса проекта.
  В окне Конструктор форм с использованием Панели объектов на форму помещаются элементы управления, которые должны обеспечить взаимодействие проекта с пользователем.
  

• 5 слайд

  Панель элементов управления
  Label (Метка)
  TextBox (Текстовое поле)
  Frame (Рамка)
  CommandButton (Кнопка управления)
  OptionBufrton (Переключатель)
  Image (Изображение)
  

• 6 слайд

  Установка значений свойств объектов графического интерфейса
  С помощью окна Свойства задаются значения свойств элементов управления, помещенных ранее на форму.
  

• 7 слайд

• 8 слайд

• 9 слайд

  Создание и редактирование программного кода.
  В окне Редактор кода производится ввод и редактирование программного кода проекта.
  Программный код - это набор слов и символов языка программирования.
  Слова и символы должны быть записаны строго по правилам языка, без орфографических и пунктуационных ошибок.
  

• 10 слайд

  Private Sub Option1_Click()
  If Option1. Visible = True Then
  Text1.Text = "Вы ошиблись"
  Image1. Value = False
  End If
  End Sub
  Найдите ошибку в программном коде
  1
  2
  

• 11 слайд

  Private Sub Option1_Click()
  If Option1. Visible = True Then
  Text1.Text = "Вы ошиблись"
  Image1. Value = False
  End If
  End Sub
  Найдите ошибку в программном коде
  

• 12 слайд

  Private Sub Option1_Click()
  If Option1. Visible = True Then
  Text1.Text = "Вы ошиблись"
  Image1. Value = False
  End If
  End Sub
  Найдите ошибку в программном коде
  

• 13 слайд

  Private Sub Option1_Click()
  If Option1.Value = True Then
  Text1.Text = "Вы ошиблись"
  Image1.Visible = False
  End If
  End Sub
  Правильный вариант
  

• 14 слайд

  Private Sub Option3_Click()
  If Option5.Value = True Then
  Text1.Text = "Вы ошиблись"
  Image1.Visible = False
  End Sub
  Найдите ошибку в программном коде
  1
  2
  

• 15 слайд

  Private Sub Option3_Click()
  If Option5.Value = True Then
  Text1.Text = "Вы ошиблись"
  Image1.Visible = False
  End Sub
  End If
  Найдите ошибку в программном коде
  

• 16 слайд

  Private Sub Option3_Click()
  If Option5.Value = True Then
  Text1.Text = "Вы ошиблись"
  Image1.Visible = False
  End Sub
  End If
  Найдите ошибку в программном коде
  

• 17 слайд

  Private Sub Option3_Click()
  If Option3.Value = True Then
  Text1.Text = "Вы ошиблись"
  Image1.Visible = False
  End If
  End Sub
  Правильный вариант
  

• 18 слайд

  Private Sub Option2_Click()
  If Option2.Value = True
  k = k + 1
  Lable4 = Молодец!
  Image1.Visible = True
  End If
  End Sub
  Найдите ошибку в программном коде
  2
  1
  

• 19 слайд

  Private Sub Option2_Click()
  If Option2.Value = True
  k = k + 1
  Lable4 = Молодец!
  Image1.Visible = True
  End If
  End Sub
  Then
  .Caption
  Найдите ошибку в программном коде
  

• 20 слайд

  Private Sub Option2_Click()
  If Option2.Value = True
  k = k + 1
  Lable4 = Молодец!
  Image1.Visible = True
  End If
  End Sub
  Then
  .Caption
  Найдите ошибку в программном коде
  

• 21 слайд

  Private Sub Option2_Click()
  If Option2.Value = True Then
  k = k + 1
  Label4.Caption = Молодец!
  Image1.Visible = True
  End If
  End Sub
  Правильный вариант
  

• 22 слайд

  Private Sub результат
  Label4.Visible = True
  Text1.Visible = True
  Text1 = k
  End Sub
  Найдите ошибку в программном коде
  1
  2
  

• 23 слайд

  Private Sub результат
  Label4.Visible = True
  Text1.Visible = True
  Text1 = End If
  End Sub
  Click()
  .Text
  Найдите ошибку в программном коде
  

• 24 слайд

  Private Sub результат
  Label4.Visible = True
  Text1.Visible = True
  Text1 = k
  End Sub
  Click()
  .Text
  Найдите ошибку в программном коде
  

• 25 слайд

  Private Sub результатClick()
  Label4.Visible = True
  Text1.Visible = True
  Text1.Text = k
  End Sub
  Правильный вариант
  

• 26 слайд

  Организация счетчика правильных ответов и выставления отметки в тестовых программах
  

• 27 слайд

  Dim k As Integer
  Private Sub Option3_Click()
  If Option3.Value = True Then
  k = k + 1
  End If
  End Sub
  Private Sub Option7_Click()
  If Option7.Value = True Then
  k = k + 1
  End If
  End Sub
  Option6_Click()
  If Option6.Value = True Then
  Option4.Enabled = False
  Option5.Enabled = False
  End If
  End Sub
  Private Sub результатClick()
  Text1.Text = k
  End Sub
  

• 28 слайд

  
  
  Private Sub результатClick()
  Text1.Text = k
  If k = 3 Then
  смайлик.Visible = True Label1.Visible = True
  End If
  End Sub
  

• 29 слайд

  If k = 0 Then Label4.Caption = 2
  End Sub
  Private Sub Command1_Click()
  Label2.Caption = k
  If k = 3 Then Label4.Caption = 5
  If k = 2 Then Label4.Caption = 4
  If k = 1 Then Label4.Caption = 3
  Вариант выставления оценки в тестовых программах
  

• 30 слайд

  Отладка программы
  Проверьте, как работает ваша программа с различными вариантами ответов. Если необходимо, исправьте ошибки.
  

• 31 слайд

  Сохранение проекта и
  создание ехе-приложения
  Сохранение проекта производится командой Файл/ Сохранить проект как…
  Для создания ехе-приложения в меню выберем команду Файл/Делать Projects.exe.
  Exe.приложениесможет работать без участия оболочки Visual Basic.
  
  

• 32 слайд

  Практическая работа
  Создайте фрагмент тестирующей программы по информатике:
  В «папке обмена»/ в папке «Итоговый урок» создайте папку, в которой вы будете сохранять свой проект.
  Продумайте интерфейс программы.
  В заголовок формы (Caption) впишите свои фамилии.
  Предусмотрите окно для подсчета количества правильных ответов.
  Рисунки для работы находятся в папке обмена/ в папке «Рисунки к тесту»
  Напишите командный код.
  Протестируйте программу.
  Сохраните свой проект в созданной папке.
  Создайте Приложение-exe и сохраните его в папке «Приложения»
  

• 33 слайд

  *Дополнительное задание:
  Разместите на форме текст или картинку, сообщающую о том верно или нет выбран ответ
  **Задание для сильных учеников:
  Предусмотрите окно для выставления оценки
  (Критерии выставления оценки за пройденный тест:
  «5» - 3 правильных ответа;
  «4» - 2 правильных ответа;
  «3» - 1 правильный ответ;
  «Не справился» - 0 правильных ответов).
  Добавьте картинку или текст, если ученик получил «отлично»
  

• 34 слайд

  Желаем удачной работы!