Файл: Электронное пособие для подготовки к воуд по физике.doc
Добавлен: 06.12.2023
Просмотров: 16
Скачиваний: 2
ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.
Form4.Text7.Text = "0"
Form3.Hide
End If
End Sub
Private Sub ф_Click()
Form2.Show
Form3.Hide
End Sub
2.4 Форма теста
В данной форме учащемуся представляются тестовые вопросы, ответив на которые он может получить доступ к продолжению выполнения практической части, а именно (по уровню сложности) который определит степень усвоения практического и теоретического материала только в том случае если ученику ответит на более половины вопросов. Программный код данной формы выглядит следующим образом:
Private Sub Command1_Click()
If Frame1.Visible = True Then
Text10.Text = Val(Text1.Text) + Val(Text2.Text) + Val(Text3.Text) + Val(Text4.Text) + Val(Text5.Text) + Val(Text6.Text) + Val(Text7.Text)
Text11.Text = (Val(Text10.Text) * 100) / Val(Text8.Text)
If Text11.Text <= 50 Then
Text9.Text = "2"
End If
If Text11.Text > 55 And Text11.Text <= 79 Then
Text9.Text = "3"
End If
If Text11.Text >= 80 And Text11.Text <= 89 Then
Text9.Text = "4"
End If
If Text11.Text > 90 Then
Text9.Text = 5
End If
If Text9.Text = "2" Then
MsgBox "Повторите теорию", 16, "С контрольными вопросами Вы не справились"
Form9.Text29.Text = Val(Text9.Text)
Form2.Show
Form2.Text3.Text = "1"
Form4.Hide
Else
MsgBox "Так держать! Теперь решаем задачи!", 16, "С контрольными вопросами Вы справились"
Form9.Text29.Text = Val(Text9.Text)
Form5.Show
Form2.Text3.Text = "2"
Form4.Hide
End If
End If
Private Sub Form_Load()
Frame1.Visible = False
Frame2.Visible = False
Frame3.Visible = False
Frame4.Visible = False
End Sub
2.5 Форма результатов работы
В данной форме можно просматривать результаты работы учащихся в режиме реального времени.
Private Sub Command1_Click()
If Text1.Text = "" Or Text2.Text = "" Then
MsgBox "Укажите фамилию и имя", 16, "Регистрация в программе"
Else
Open "документ\Document1.txt" For Output As #1
Print #1, Text1.Text; " "; Text2.Text; " "
Print #1, "Оценка за контрольные вопросы к главе 1:"; " "; Text29.Text; " "; "Оценка за решение задач к главе 1:"; " "; Text30.Text; " "; "Уровень сложности:"; Label57.Caption
Print #1, "Оценка за контрольные вопросы к главе 2:"; " "; Text31.Text; " "; "Оценка за решение задач к главе 2:"; " "; Text32.Text; " "; "Уровень сложности:"; Label59.Caption
Print #1, "Оценка за контрольные вопросы к главе 3:"; " "; Text33.Text; " "; "Оценка за решение задач к главе 3:"; " "; Text34.Text; " "; "Уровень сложности:"; Label61.Caption
Print #1, "Оценка за контрольные вопросы к главе 4:"; " "; Text35.Text; " "; "Оценка за решение задач к главе 4:"; " "; Text36.Text; " "; "Уровень сложности:"; Label63.Caption
Close #1
MsgBox "До скорых встреч!", 16, "Программа завершает свою работу"
End
End If
End Sub
Private Sub Form_Load()
Command1.Visible = False
End Sub
Private Sub г_Click()
Form2.Show
Form9.Hide
End Sub
Заключение
Проведя глубокий анализ и обобщив знания по теме «Электронное пособие для подготовки к ВОУД по физике», созданная программа, способна помочь ученику наиболее эффективно усвоить изученный ранее материал, и устранить пробелы в знаниях.
Приложение является примером превосходного вспомогательного ресурса, незаменимым подспорьем учителю в образовательном процессе, что было доказано на уроках физики в 7-9м классе, с использованием данного приложения. Ученики по достоинству оценили данную работу. Некоторые недочеты, выявленные на этих уроках, помогли устранить их с течением времени. Также, в будущем планируется создание ряда подобных учебников, которые смогли бы стать не только подспорьем для учителя на уроке, но и прекрасным пособием к подготовке школьников и абитуриентов к поступлению в колледжи и ВУЗы.
Список литературы
-
Физика 7-9 класс: А. Н. Шыныбеков., 2004 -
Visual Basic в задачах и примерах: Сафронов И., 2007 -
Visual Basic учебный курс: Браун С., 2007