Интернет-журнал "Домашняя лаборатория", 2007 №4

Если вам требуется выводить текст не подлежащий редактированию пользователем, установите, например, свойство Locked в True.

Таким образом, метки все-таки удобнее используются для информирования пользователя о том, какого рода данные отображаются в текстовом окне, которое, как правило, располагается рядом. В этом случае метка не связывается с базой данных. Примеры такого использования меток и текстовых окон обсуждались в предыдущей главе.

Check box

Связанный с данными контрольный индикатор (Check box) можно использовать для наглядного представления на экранной форме информации из полей базы данных логического типа (Да или Нет, 1 или 0, True или False). Примерами таких данных могут служить: оплачен или не оплачен счет — при разработке системы управления счетами, есть товар на складе или нет — при автоматизации складского хозяйства, постоянный покупатель или нет — в системе работы с покупателями (рис. 7.3) и т. п. На 17 панели инструментов Visual Basic контрольный индикатор обозначен пиктограммой . Связь контрольного индикатора с объектом управления данными осуществляется установкой свойств DataSource и DataField.

Рис. 7.3.Пример использования контрольного индикатора

MaskedEdit

Известно, что пользователи часто совершают ошибки при вводе информации в базы данных. Впрочем, не ошибается лишь тот, кто ничего не делает. Установить некоторый контроль над действием пользователей позволяет использование для ввода специальной информации окна редактирования с маской (MaskedEdit) Этот элемент управления позволяет так же помещать в поле ввода символы разметки. Примером такой информации может выступать номер телефона или почтовый индекс. Типичный номер телефона имеет следующий формат, где скобки и дефисы являются символами разметки, а символ # определяет любую цифру:

(###)###-##-##

Почтовый индекс состоит из шести цифр и не должен содержать букв или других символов.

Окно редактирования с маской имеет свойство Mask (Маска), которое позволяет определить формат отображаемой строки в поле ввода. По умолчанию свойство Mask не определено и поведение объекта Mask полностью аналогично обычному текстовому окну. Символы, которые используются в качестве маски приведены в таблице.

Таблица. Символы, используемые в качестве маски

Символ - Описание

# - Любая цифра

∙ - Десятичная точка (например, 3.1415),

, - Разделитель тысяч (например, 1,000,000)

: - Разделитель времени (например, 21:30)

/ - Разделитель даты (например, 05/08/97)

& - Любой символ

A - Любая цифра или буква

? - Любая буква

С полем базы данных объект MaskedEdit связывается установкой свойств DataSource и DataField.

Построим простое приложение в котором будут реализованы возможности рассмотренных в этом разделе связанных элементов управления. Создадим, например, при помощи приложений VisData или MS Access базу данных CUSTOMER.MDB с одной таблицей CUSTOMERS, в которой будем хранить информацию о покупателях. Пусть эта таблица будет содержать следующие поля:

Так как наше приложение будет простой программой просмотра содержимого базы данных, то самостоятельно добавьте в таблицу CUSTOMERS несколько произвольных записей.

Создайте новый проект и расположите на форме объект управления данными, семь меток, пять текстовых окон, окно редактирования с маской и один контрольный индикатор, как показано на рис. 7.4.

Рис. 7.4.Расположение элементов управления на экранной форме

Теперь в окне свойств объекта Data1 определите свойство Caption, как “Покупатели”, установите свойство DatabaseName как имя файла базы данных с указанием полного пути C: \WORK\ CUSTOMER.MDB и укажите имя таблицы Customers в качестве источника данных RecordSource.

Затем установите свойства меток, текстовых окон, окна редактирования с маской и контрольного индикатора следующим образом: