Количество учеников.
а) Требуется сообщить количество учеников в заданном классе
б) В4 – Н6
в) D5
г) F5
д) «кол-во учеников»
е) Читается поле ввода и определяется лист(ведомости), на котором нужно искать, а потом складывается количество записей в столбце учеников и выводится в поле вывода.
ж) Пример:
Количество кабинетов.
а) Требуется сообщить количество используемых в учебном процессе кабинетов.
б) В12 – Н14
в) --
г) F13
д) «кол-во кабинетов»
е) Все строки кабинетов пробегаются, а номера кабинетов заносятся в одноименные ячейки, затем считаются непустые ячейки и результат заносится в поле вывода, а ячейки чистятся
ж) Пример:
Количество учителей.
а) Требуется сообщить количество учителей по каждому из преподаваемых предметов.
б) J5 –K21
в) --
г) J6 –K21
д) «учителя по предметам»
е) В цикле проходятся все учителя и смотрится их предмет, если такой уже был, на этот предмет «дописывается» еще один учитель, а если нет – то создается новый предмет.
ж) Пример:
Успеваемость в классе.
а) Требуется по заданному классу сообщить количество учащихся в нем на «2», «4-5», «5»
б) M4 –S9
в) O5
г) Q6 –Q8
д) «Успеваемость в классе»
е) Сначала по полю ввода определяется лист с нужной ведомостью, а потом эта ведомость пробегается, попутно считая нужные данные.
ж) Пример:
Успеваемость в школе.
а) Требуется сообщить количество школьников, учащихся на «2», «4-5», «5»
б) M15 –S20
в) --
г) Q17 –Q19
д) «Успеваемость в школе»
е) В цикле по ведомостям выполняется решение аналогичной задачи в масштабах класса(п 2.3.4.5), а потом данные складываются и выводятся
ж) Пример:
Визуализация.
При проектировании БД важнейшую роль играло удобство ее использования и изучение. Следствием этого явились
- Существующая структура БД (см. п. 2.3.1)
- Взаимное расположение на листах запросов и справок (поля ввода и вывода рядом и в непосредственной близости от управляющих кнопок, что обеспечивает удобство в использовании БД). Наличие рядом информационных таблиц, что позволяет пользователю(завучу) контролировать учебный процесс и при необходимости вносить изменения в расписание, преподавательский состав, регистрировать новичков и отчисленных из классов, вносить коррективы в ведомости в случае исправления оценок и т.д.
- Цветовое оформление, созданное удобным для восприятия и позволяющее быстро находить нужные графы таблиц и ориентироваться в больших объемах данных.
Запросы и справки расположены на своих листах следующим образом:
Вывод
В результате создана работающая БД для завуча школы, отвечающая всем требованиям (реализация запросов и справок), удобная в использовании и приспособленная к модификации (п. 2.3.5)
Примечания
2.5.1 Текст программы, связанной с кнопкой «Предмет по дате»
Private Sub CommandButton1_Click()
If StrConv(Sheets("расписание").Cells(60, 2).Text, vbLowerCase) = "понедельник" Then
D = 4
End If
If StrConv(Sheets("расписание").Cells(60, 2).Text, vbLowerCase) = "вторник" Then
D = 11
End If
If StrConv(Sheets("расписание").Cells(60, 2).Text, vbLowerCase) = "среда" Then
D = 18
End If
If StrConv(Sheets("расписание").Cells(60, 2).Text, vbLowerCase) = "четверг" Then
D = 25
End If
If StrConv(Sheets("расписание").Cells(60, 2).Text, vbLowerCase) = "пятница" Then
D = 32
End If
If StrConv(Sheets("расписание").Cells(60, 2).Text, vbLowerCase) = "суббота" Then
D = 39
End If
For L = D To (D + 5)
If Sheets("расписание").Cells(2, L).Value = Sheets("расписание").Cells(60, 4).Value Then
For I = 0 To 23
S = I * 2 + 4
If StrConv(Sheets("расписание").Cells(60, 3).Text, vbLowerCase) = StrConv(Sheets("расписание").Cells(S, L).Text, vbLowerCase) Then
Sheets("расписание").Cells(63, 2) = Sheets("расписание").Cells(S, 2).Text
End If
Next I
End If
Next L
End Sub