Документация базы данных "Список владельцев гаражного кооператива"
Курсовой проект - Компьютеры, программирование
Другие курсовые по предмету Компьютеры, программирование
?обавление записи. Программный код для данной функции:
Private Sub Command2_Click()
d = MsgBox("Добавить запись?", 1, " Сообщение")
If d = 1 Then
Data1.Recordset.AddNew
Else
Exit Sub
End If
End Sub
Командная кнопка Удалить - удаление записи. Программный код для данной функции:
Private Sub Command3_Click(){Процедура для кнопки Удалить]
b = MsgBox("Вы действительно хотите удалить запись?", 1, " Сообщение")
If b = 1 Then
Data1.Recordset.Delete
Data1.Recordset.MoveNext
Else
Exit Sub
End If
Кнопка Таблица - переход на форму 2.
Кнопка Выход - выход из программы.
На форме 2 расположены следующие элементы: DBGrid (для отображения данных в виде таблицы ), Data, Command.
Кнопка Выход - выход из программы.
Кнопка Записи по одному - переход на форму 1.
Кнопка Поиск - поиск записей по полю Фамилия имеет следующую процедуру:
Private Sub Command1_Click() {Процедура для кнопки Поиск}
Dim s As String
Dim i As Integer
s = InputBox("Введите фамилию ?", "Поиск")
Data1.Recordset.MoveFirst
If s = "" Then
MsgBox ("Вы нажали Отмену или ничего не ввели")
Exit Sub
End If
Где InputBox функция ввода.
Третья форма используется для ввода пароля. Если пароль введен неправильно, появляется сообщение: “Неправильный пароль” и кн. ОК, по нажатию которой сообщений закрывается, пользователю предоставляется еще две возможности ввода пароля. После трехразового ввода неправильного пароля происходит выход из программы автоматически. При правильном вводе пароля появляется сообщение: “Правильный пароль” и кн. ОК, по нажатию форма пароля исчезает и появляется форма “Гаражный кооператив”. Программный код для кнопки ОК:
Private Sub Command1_Click()
If Text1.Text = "111" Then
MsgBox "Пароль правильный"
Unload Form3
Form1.Show
Else:
MsgBox "Пароль неправильный"
Text1.Text = ""
k = k + 1
If k = 3 Then End
End If
EndSub.
1.3.4 Используемые технические средства
Минимальный перечень технических средств, обеспечивающих работу программы:
- ПК на базе процессора Intel 486 BX 4-100;
- FDD 3,5 “1,44 Mb” (для установления программы);
- 1 Mb на HDD;
- цветной монитор SVGA;
- клавиатура;
- манипулятор типа “мышь”.
1.3.5 Входные и выходные данные
Входные данные программы это база данных, содержащая основные сведения о владельцах гаражного кооператива; пароль, вводимый пользователем для начала работы с программой; данные, вводимые для поиска, данные о новых владельцах. Выходные данные программы это информация, получаемая при работе с базами данных, результаты поиска по полю “Фамилия”, сообщения для пользователя.
1.3.6 Вызов и загрузка
Вызов и загрузка программы осуществляется с помощью запускающего файла, ярлык для которого может располагаться на рабочем столе. Эта процедура занимает мало времени и равна нескольким секундам, конечно в соответствии с указанными для программы техническими средствами.
1.4 Программа и методика испытаний (ГОСТ 19.301-79)
1.4.1 Объект испытаний
Объектом испытаний является программа “Список владельцев гаражного кооператива” (А.В.00001-01). Программа будет полезна владельцам гаражного кооператива.
1.4.2 Цель испытания
Данные испытания проводятся для установления соответствия программы заданным требованиям и программным документам.
1.4.3 Требования к программе
Программа должна:
- корректно осуществлять поиск по полю “Фамилия”
- Выбранные командные кнопки должны выполнять соответствующие им команды.
1.4.4 Средство и порядок испытаний
Для испытания программы необходимо иметь ПК, работающий под управлением операционной системы Windows 98, с установленным на нём программным пакетом Visual Basic 5.0. или библиотекой программ.
1.4.5 Методы испытаний
- Тест №1 (допустимые значения)
Ожидаемые входные данные: нажимаем кнопку Поиск, в текстовое поле вводим фамилию и нажимаем кн. ОК. Указатель перемещается на соответствующую запись.
По нажатию кнопки “Поиск” появляется функция ввода с текстовым полем, куда вводится фамилия интересующего владельца, и кн. ОК и Отмена. В текстовое поле вводим модель Галимеев и нажимаем кн. ОК. Указатель перемещается на запись, у которой в поле “Фамилия” записано Галимеев.
Программа выполнила тест верно.
- Тест №2 (недопустимые значения)
Ожидаемые входные данные: нажимаем кнопку Поиск, в текстовое поле вводим фамилию и нажимаем кн. ОК. Нам выдается сообщение Данной записи нет.
По нажатию кнопки “Поиск” появляется функция ввода с текстовым полем, куда вводится фамилия интересующего владельца, и кн. ОК и Отмена. В текстовое поле вводим фамилию Иванов и нажимаем кн. ОК. появляется сообщение: “Данной записи нет”.
Программа выполнила испытание верно, так как данного владельца в базе данных не существует.
- Тест №3 (ограниченные значения)
Ожидаемые входные данные: нажимаем кнопку Поиск, в текстовое поле вводим фамилию, стоящую в таблице первой, и нажимаем кн. ОК. Указатель перемещается первую запись.
По нажатию кнопки “Поиск” появляется функция ввода с текстовым полем, куда вводится фамилия, стоящая в таблице первым, и кн. ОК и Отмена. В текстовое поле вводим фамилию Сидоренков и нажимаем кн. ОК. Указатель перемещается первую запись на запись, у которой в поле “Фамилия” записано Сидоренков.
Программа выполнила тест верно.
1.5