1.3.5. Сообщения

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

1. Некорректная дата заполнения. Причиной данной ошибки является некорректный ввод месяца в графе «Дата заполнения». Для её устранения, выберите месяц из списка.

2. Введены не все данные. Причиной данной ошибки является нажатие управляющей кнопки «Далее >>», при том, что заполнены не все активные поля. Для её устранения необходимо заполнить эти поля.

3. Выберите удаляемый элемент списка. Причиной данной ошибки является нажатие кнопки «Удалить» панели ввода раздела «Перенесённые и сопутствующие заболевания», при том, что ни один из элементов списка не выделен. Для её устранения выделите необходимый для удаления элемент списка щелчком левой кнопки мыши и повторите попытку.

1.4. Руководство системного программиста

1.4.1. Общие сведения о программе

Программа предназначена для автоматизации составления карт пациентов ортодонтического кабинета, а также хранение введённых данных в электронной таблице MS Excel.

Функции программы:

1. Ввод данных. Данные вводятся при помощи графического интерфейса пользователя.

2. Внесение данных в таблицу. Данные, введённые с помощью графического интерфейса, вносятся в таблицу MS Excel, к которой прикреплена данная программа. По желанию пользователя также печатается заголовок таблицы.

3. Печать карты. По данным, введённым в программу, печатается отчёт по установленному образцу.

Технические и программные средства, необходимые для выполнения программы:

– наличие на компьютере установленного пакета программ MS Office версии 97-2003 и выше, а именно компонентов Excel и Word;

– уровень безопасности (по макросам) «Средний» или «Низкий»;

– прочие программные и аппаратные требования соответственны требованиям установленного пакета MS Office.

1.4.2. Структура программы

В программе используются следующие подпрограммы:

1. Функция Prov(a,b). a – значение логического типа, b – строкового. Предназначена для проверки полей ввода на предмет незаполненности, свойство Enabled которых меняется, в зависимости от значения логической переменной.

Далее приведён текст программы данной функции.

Public Function Prov(a As Boolean, b As String) As Boolean

If a = True Then

If b = "" Then

Prov = True

End If

Else

Prov = False

End If

End Function

2. Процедура Il(w,o,a,b,c). w – приложение Word, o,c – логического, a,b – строкового. Предназначена для ввода данных из раздела «Перенесённые и сопутствующие заболевания», где «o» передаётся значение флажка названия заболевания, «a» – название заболевания, «b» – значение поля ввода взраста, «c» – флажок «Учёт».

Далее приведён текст программы данной процедуры:

Public Sub Il(w As Word.Application, o As Boolean, a As String,

b As String, c As Boolean)

If o = True Then

w.Selection.TypeText a & Space(1) & "-" & Space(1) & b &

Space(1)

Select Case b

Case "1"

w.Selection.TypeText "год"

Case "2", "3"

w.Selection.TypeText "года"

Case Else

w.Selection.TypeText "лет"

End Select

If c = True Then

w.Selection.TypeText "," & Space(1) & "Состоит на учёте

в настоящее время"

End If

w.Selection.TypeText ";" & Space(1)

End If

End Sub