Элективные курсы математика информатика Саратов 2005 удк 373 016




НазваниеЭлективные курсы математика информатика Саратов 2005 удк 373 016
страница18/19
Дата конвертации12.04.2013
Размер1.7 Mb.
ТипЭлективный курс
1   ...   11   12   13   14   15   16   17   18   19

End Sub


Третья процедура Private Sub Opt_Click(Index As Integer) будет анализировать номер выбранной радиокнопки (Index) выдавать поощряющее или ругающее сообщение.

Private Sub Opt_Click(Index As Integer)

Если номер выбранной радиокнопки совпадает со значением

правильного ответа(0 или 1)в массиве ответов Otv()

If Index = Otv(num) Then

Поощряем пользователя

Label1.Caption = "ВЕРНО!"

Else

...или ругаем:)

Label1.Caption = "Ай-яй-яй!!!"

End If

После анализа ответа и выдачи поощряющего(или ругающего)

сообщения сделаем доступной кнопку выбора следующего вопроса

CmdVopr.Enabled = True

Очистим значения выбранных за предыдущий ответ радио-кнопок

For I = 0 To 1: Opt(I).Value = False: Next

выбор вариантов ответов делаем недоступными до выбора нового вопроса

Frame1.Enabled = False

End Sub


  1. Изучение новых возможностей.

Для хранения вопросов нашего теста удобно использовать текстовый файл. В этом случае их легко заменить на любые другие ДА-НЕТ вопросы.

Файл создадим с помощью БЛОКНОТА и организуем так, чтобы данные чередовались: в первой строке вопрос, во второй ответ (число 0 или 1), потом снова вопрос, затем ответ и т.д.

В Visual Basic текстовые файлы называют последовательными. С ними можно производить следующие действия:

  • открыть файл для доступа к его содержимому, - либо для записи в него новых данных, либо для чтения записанной в нём информации;

  • внести в открытый файл очередную порцию информации (записать данные в файл из программы); извлечь данные из открытого файла {прочитать очередную порцию информации) и поместить их в программу;

  • закрыть файл после того, как работа над ним завершится.

Открытие файла

Open ИмяФайла For Режим работы As #ДескрипторФайла

ИмяФайла – строка символов в кавычках, либо выражение, значением которого является строка символов. Она представляет собой путь к файлу.

Если указано только имя файла (Например, Tекст.txt), то файл должен находиться в текущей папке.

Режимы работы – это одно из трех ключевых слов:

  • Output - если файл открывается для записи в него данных начиная с первой позиции (при записи вся имевшаяся в нём старая информация будет стёрта);

  • Append - если файл открывается для записи в него данных не с первой, а с конечной позиции, так что вся имевшаяся в нём старая информация будет сохранена;

  • Input - если файл открывается для чтения из него текстовых данных.

ДескрипторФайла — это любое целое число от 1 до 511. Оно служит идентификатором файла в программе.

Закрытие файлов

Все открытые текстовые файлы закрываются одинаково — с помощью оператора Close. Его синтаксис следующий:

Close # [СписокДескрипторов]

Запись в файл

Записать данные в текстовый файл можно двумя способами:

  • с помощью оператора Write;

  • с помощью оператора Print.

Оба оператора записывают данные в файл текстовыми строками.

Синтаксис операторов записи в текстовый файл одинаков:

Write #ДескрипторФайла, [СписокЗначений]

Print #ДескрипторФайла, [СписокЗначений]

Дескриптор Файла — это целое число, совпадающее с идентификатором открытого для записи файла.

Список Значений — это записанные через Разделитель значения (или выражения, значения которых вычисляются, в частности переменные). Если Список Значений отсутствует, в файл будет записана пустая строка.

Логика работы операторов Write и Print различна.

Оператор Write

Разделителем в Списке Значений является запятая. Список Значений просматривается последовательно, и элементы этого списка записываются в одну текстовую строку файла через запятую. Элементы типа String заключаются в кавычки. После записи последнего элемента записывается символ перехода на новую строку.

Оператор Print

Элементы Списка Значений в этом операторе должны быть разделены либо точкой с запятой, либо запятой. От этого зависит, как они будут записаны в тексто­вую строку файла:

  • если Разделитель — это точка с запятой (;), значения будут записываться подряд, без промежутков между ними;

  • если Разделитель — это запятая (,), значения будут записываться в 14-символьные зоны вывода.

Кроме того, в Списке Значений оператора Print могут присутствовать функции:

  • Spc(n) — для вставки п пробелов между значениями в текстовой строке;

  • Tab(n) — для указания номера п позиции для записи следующего значения.

Оператор Print удобен для тщательного редактирования текста выходного файла, а оператор Write лучше приме­нять в том случае, когда выходной файл будет использова­ться в дальнейшем как входной для других программ. Например:

Private Sub Command1_Click()

Open «Результат.txt» For Output As #1

Print #1, Label1.Caption

Close #1

End Sub

Чтение из файла

Читать данные из текстового файла можно разными способами:

  • с помощью операторов Input и Line Input

  • с помощью функции Input.

Оператор Input

Оператор Input имеет следующий синтаксис:

Input #Дескритор Файла Список Переменных


Дескриптор Файла — это целое число, совпадающее с идентификатором открытого для чтения файла.

Список Переменных — это записанные через запятую переменные любого типа. Например: Фамилия$, Имя$, Год Рождения%

(Напомним, что суффиксы $ и % указывают на тип переменных - String и Integer соответственно. Их можно использовать вместо объявления типа переменных с помощью оператора Dim.)

В каждой текстовой строке файла количество и тип значений должны совпадать с количеством и типом переменных в Списке Переменных.

Чаще всего чтение из текстового файла производится циклически, с помощью оператора цикла с условием (Do While ... Loop или Do Until ... Loop). Условием окончания цикла является попытка прочитать данные после чтения последней текстовой строки. Эта попытка приводит к тому, что значением функции EOF будет True (Истина).

Например:

Private Sub Command1_Click()

Open «Год рождения1.txt» For Input As #1

Do Until EOF(1)

Input #1, Famili$, Imja$, God_Rogdenia$

Label1.Caption= Famili$

Label2.Caption= Imja$

Label3.Caption= God_Rogdenia$

Loop

Close #1

End Sub

Оператор Line Input

Оператор Line Input имеет следующий синтаксис:

LineInput #ДескриторФайла Переменная

Переменная – переменная типа String ил Variant.

Результатом работы оператора является присвоение Переменной – всей очередной текстовой строки.


Функция Input

– это функция двух аргументов. Первый её аргумент - это количество символов, которые надо прочесть из входного файла. Второй аргумент - идентификатор (дескриптор) файла, открытого для чтения. Возвращаемое значение - прочитанный текст в виде символьной строки.

Чаще всего эту функцию используют для одновременного чтения всего текстового файла и размещения его в тестовом поле экранной формы. Для этого необходимо выяснить размер файла в символах. Делается это с помощью функции LOF (Значение функции LOF имеет тип Long), единственным аргументом которой является идентификатор файла, открытого для чтения.

Разработка теста с вопросами, прочитанными из файла.

1. Разработайте форму в соответствии с рисунком.

2. Напишите программу, которая

  • считывает 10 вопросов теста из файла Voprosy.txt и выводит их по одному в текстовое окно (каждый по щелчку на кнопке [Вопрос]);

  • проверяет и анализирует результат сразу же после выбора варианта ответа и выводит в метку поощряющее или ругающее сообщение;

  • после ответа пользователя на последний вопрос выводит в метку количество правильных ответов.

3. Дополнительно

  • после ответа пользователя на последний вопрос, кнопка [Вопрос] заменяется на кнопку [Сохранить];

  • при нажатии на кнопку [Сохранить] – результат тестирования записывается в файл Resultat.txt.

  • появляется панель сообщений с сообщением о том, что сохранение прошло успешно, например, «Результат успешно сохранен».

Урок 10 - 11. Файловый ввод/вывод. Использование меню в интерфейсе приложения.

1. Разбор решения задачи «Тест с вопросами, прочитанными из файла».

Напишите программу, которая

  • считывает 10 вопросов теста из файла Voprosy.txt и выводит их по одному в текстовое окно (каждый по щелчку на кнопке [Вопрос]);

  • проверяет и анализирует результат сразу же после выбора варианта ответа и выводит в метку поощряющее или ругающее сообщение;

  • после ответа пользователя на последний вопрос выводит в метку количество правильных ответов.
1   ...   11   12   13   14   15   16   17   18   19

Похожие:

Элективные курсы математика информатика Саратов 2005 удк 373 016 iconЭлективные курсы русский язык литература саратов 2008 удк 373 016
Рецензент: Волков А. А., заведующий кафедрой филологического образования гоу дпо «Сарипкипро»

Элективные курсы математика информатика Саратов 2005 удк 373 016 iconГеография саратов 2007 удк 373 016
В настоящем сборнике представлены материалы победителей областного конкурса «Лучший элективный курс для предпрофильной подготовки...

Элективные курсы математика информатика Саратов 2005 удк 373 016 iconМетодическое пособие для учителей. Саратов: Сарипкипро. 2004. Воробьев В. В., Саяхова Л. Г., Муллагалиева Н. Ш. Русский язык в диалоге культур. Элективные курсы в профильном обучении: Образовательная область «Филология»
Элективные курсы, рекомендованные для профильного обучения на 2010-2011 учебный год

Элективные курсы математика информатика Саратов 2005 удк 373 016 iconМетодическое пособие для учителей. Саратов: Сарипкипро. 2004. Воробьев В. В., Саяхова Л. Г., Муллагалиева Н. Ш. Русский язык в диалоге культур. Элективные курсы в профильном обучении: Образовательная область «Филология»
Элективные курсы, рекомендованные для профильного обучения на 2010-2011 учебный год

Элективные курсы математика информатика Саратов 2005 удк 373 016 iconПрофильное обучение классы d p о ф а москва 2005 удк 372. 853
Программы элективных курсов. Физика. 9—11 клас-П78 сы. Профильное обучение / сост. В. А. Коровин. — М.: Дрофа, 2005. 125, [3] с....

Элективные курсы математика информатика Саратов 2005 удк 373 016 iconЭлективные курсы
П 84 Абдулова, Г. Х. Основы медицинских знаний: программа элективного курса. 10-11 классы (по 68 ч.)/Г. Х. Абдулова. //Профильное...

Элективные курсы математика информатика Саратов 2005 удк 373 016 iconУчебного курса для общеобразовательных школ, лицеев и гимназий москва 2005 удк 373. 016: 271. 2
Б 83 А. В. Бородина история религиозной культуры: Программа учебного курса для общеобразовательных школ, лицеев, гимназий. Изд. 4-е,...

Элективные курсы математика информатика Саратов 2005 удк 373 016 iconПрограмма элективного курса по экологии
Значительную роль в развитии обучающихся играют элективные курсы, выбираемые самими учащимися. Элективные курсы поддерживают и углубляют...

Элективные курсы математика информатика Саратов 2005 удк 373 016 iconУчебное пособие Рекомендовано учебно-методическим советом угаэс уфа-2008 удк 681. 3 Ббк 65. 39 Х 24 Рецензенты: Хамидуллин Я. Н. д-р физ мат наук, профессор зав кафедрой «Информатика и математика»
«Информатика и математика» Уфимского института Российского государственного торгово-экономического университета

Элективные курсы математика информатика Саратов 2005 удк 373 016 iconУчебного курса для общеобразовательных школ, лицеев и гимназий москва 2007 удк 373. 016: 271. 2
Б 83 А. В. Бородина история религиозной культуры: Программа учебного курса для общеобразовательных школ, лицеев, гимназий. Изд. 4-е,...


Разместите кнопку на своём сайте:
lib.convdocs.org


База данных защищена авторским правом ©lib.convdocs.org 2012
обратиться к администрации
lib.convdocs.org
Главная страница