Answer(2) = SplitAnswers(np, BuferSTR, 0)
np = np + Len(Answer(2)) + 1
Answer(3) = SplitAnswers(np, BuferSTR, 0)
np = np + Len(Answer(3)) + 1
Answer(4) = SplitAnswers(np, BuferSTR, 1)
AddItemsToList Answer(1), Answer(2), Answer(3), Answer(4)
Choose1.Caption = Answer(1)
Choose2.Caption = Answer(2)
Choose3.Caption = Answer(3)
Choose4.Caption = Answer(4)
ChooseRight.Caption = ChooseAnswer(LabelQuestionJ.Caption)
EndIf
EndSub
9. Вывод
Мной была написана программа на языке программирования VisualBasic, были использованы методы объектно-ориентированного программирования, также использовалась работа с файлами. Программа позволяет игроку проверить свои знания в совершенно разных областях.
1. Мазный Г.Л., Прогулова Т.Б. Методическое пособие к курсовому проектированию по высшей математике и информатике. - Дубна: Международный университет природы, общества и человека “Дубна”, 1996.
2. О.И.Мельникова, А.Ю.Бонюшкина. Учебное пособие по Технологии программирования. – Дубна: Международный университет природы, общества и человека “Дубна”, 2001.