Интернет-журнал "Домашняя лаборатория", 2007 №4
Шрифт:
Text1.DataSource=Data1
Text1.DataField=Title
Label2.Caption=ABTop
Text2.DataSource=Data1
Text2.DataField=Author
Label3.Caption=год издания
Text3.DataSource=Data1
Text3.DataField=Year Published
Label4.Caption=Teмa книги
Text4.DataSource=Data1
Text4.DataField=Subject
Label5.Caption=Описание
Text5.DataSource=Data1
Text5.DataField=Description
LаЬеl6.Caption=Международный код ISBN
Text6.DataSource=Data1
Text6.DataField=TITLES.ISBN
LаЬеl7.Caption=Издательство
Text7.DataSource=Data1
Text7.DataField=Name
LаЬеl8.Caption=Примечание
Text8.DataSource=Data1
Text8.DataField=Notes
Рис. 3.6. Вид
7. Предусмотрим средство для завершения работы приложения. Для этого добавьте на форму командную кнопку, определите ее свойство Caption как “Выход” и установите следующий код в процедуре обработки события Click:
Private Sub Command1 Click
Unload Me
End Sub
8. Запустите проект на выполнение выбором команды Start из меню Run, или нажмите клавишу F5. Результат работы программы показан на рис. 3.7. С помощью кнопок со стрелками на объекте управления данными можно перемещать текущий указатель по набору записей и содержимое соответствующих полей будет автоматически отображаться на форме в связанных элементах управления.
9. Закройте приложение нажатием кнопки “Выход”.
Рис. 3.7. Результат работы приложения.
Урок 4
Свойства, методы и события объекта управления данными
Объект Data, как и любой другой элемент управления в Visual Basic, имеет несколько стандартных, общих для многих элементов управления, свойств, методов и событий. Наряду с ними, он имеет целый ряд свойств, методов и событий, предназначенных для работы с данными. Именно они и будут последовательно рассмотрены ниже.
Свойства
• BOFAction
Свойство BOFAction определяет действие объекта Data, если свойство BOF (beginning of file — начало файла) у созданного им набора записей установлено в True.
Синтаксис: data1.BOFaction=value.
Значение value может быть выбрано из двух альтернатив: MoveFirst или BOF.
При создании объекта Data свойство BOFAction устанавливается по умолчанию как MoveFirst. При этом текущей становится первая запись в наборе записей.
Установка свойства BOFAction в BOF приводит к тому, что при перемещении указателя текущей записи за пределы набора сверху, текущая запись становится недопустимой (invalid) и любая попытка ее редактирования приведет к ошибке. В этом случае происходит событие Validate на первой записи в наборе и, затем, событие Reposition, уже на недопустимой записи.
При этом кнопка перемещения указателя к предыдущей записи на объекте управления данными становится неактивной.Установить свойство BOFAction объекта управления данными data1 в режиме выполнения приложения можно следующим образом:
data1.BOFaction= vbBOFActionMoveFirst,
или
data1.BOFaction= vbBOFActionBOF.
Возможные установки свойства BOFAction приведены в следующей таблице.
Установка • Константа • Значение
MoveFirst • vbBOFActionMoveFirst • 0
BOF • vbBOFActionBOF • 1
• Connect
Свойство Connect определяет тип базы данных, открываемой объектом Data. По умолчанию открывается база данных в формате Microsoft Access.
Синтаксис: data1.connect=string.
Возможные варианты установки свойства Connect приведены в следующей таблице.
Тип базы данных • Определение
MS Access • ";"
dBASE х • "dBASE x;"
Paradox x.x • "Paradox x.x;"
FoxPro x.x • "FoxPro x.x;"
Excel x.0 • "Excel x.0;"
Lotus WKx • "Lotus WKx;"
Text • "Text;"
Btrieve • "Btrieve;"
ODBC • "ODBC; DATABASE = defaultdatabase; UID=user; PWD=password; DSN=datasourcename; LOGINTIMEOUT=seconds"
Установка свойства Connect в режиме выполнения приложения производится следующим образом: data1.connect= " dBASE IV;"
data1.connect= " FoxPro 3.0;".
• Database
Использование свойства Database в режиме выполнения приложения позволяет получить ссылку на объект Database, который создан объектом Data.
Синтаксис: Set databaseobject = data1.Database.
Объект Data создает объект Database на основе своих свойств DatabaseName, Exclusive, ReadOnly, и Connect. Так как объект Database имеет свои собственные свойства и методы то, получив на него ссылку, вы можете использовать их в приложении. Например, вы можете использовать методы Close или Execute. Подробное описание работы с объектом Database приведено в уроках, посвященных объектам доступа к данным.
• DatabaseName
Использование свойства DatabaseName позволяет получить или установить имя и месторасположение источника данных для объекта Data.
Синтаксис: data1.DatabaseName=string.
Строковое выражение string определяет месторасположение и имя файла базы данных в форматах MS Access и Btrieve. Если используется база данных, размещенная на файл-сервере, то строка должна включать полный путь к требуемому файлу, например: