Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
РЭАИС.doc
Скачиваний:
1
Добавлен:
01.05.2025
Размер:
157.7 Кб
Скачать
  1. Связанные с данными элементы управления. Вывод данных (http://uchserver/reais/uchebnik/lessen7.Htm, http://uchserver/reais/uchebnik/lessen6.Htm )

Применение связанных с данными элементов управления - Data-bound Controls уже кратко обсуждалось в уроке, посвященном работе с Data Control. Связанные элементы управления служат для отображения на экранной форме содержимого записей из таблиц базы данных и всегда используются только вместе с объектом Data.

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

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

В Visual Basic 5 в качестве связанных с данными элементов управления может использоваться целый ряд обычных элементов управления:

  • Text box - текстовое окно,

  • Label - метка,

  • Check box - контрольный индикатор,

  • Image - изображение,

  • Picture box, - графическое окно

  • List box - список,

  • Combo box - комбинированное окно,

  • OLE container control - OLE-контейнер.

Примеры использования текстовых окон для отображения содержимого записей базы данных были уже рассмотрены в предыдущей главе.

Кроме обычных элементов управления для работы с базами данных, пятая версия Visual Basic поддерживает несколько ActiveX объектов:

  • Data-bound list box - связанный с данными список,

  • Data-bound combo box - связанное с данными комбинированное окно,

  • MSFlexGrid - сетка,

  • Data-Bound Grid (DBGrid) - связянная с данными сетка,

  • MaskedEdit - окно редактирования с маской,

  • RichTextBox - улучшенное окно редактирования.

Все эти объекты, за исключением MaskedEdit и RichTextBox позволяют отображать на экране целые группы записей в виде списков или таблиц. А применение DBGrid позволяет настолько повысить функциональность разрабатываемых приложений, что об этом будет специальный разговор.

Более того, если по каким-либо причинам вас не удовлетворяют возможности поставляемых вместе с Visual Basic связанных элементов управления, вы можете использовать связанные элементы управления, созданные другими разработчиками, или можете сами создать собственные ActiveX объекты для связи с данными по вашему вкусу.

  1. Ввод информации в базу данных средствами TextBox и DataGrid (конспект)

Ввод информации в БД средствами Textbox

Создается DE организуется подключение (Connection), создается объект Command, который подключается к объекту БД. Левой кнопкой мыши перетаскиваются поля на форму. Данные выводятся в текстовых полях. В свойствах Command Для перехода по записям нужно создать кнопки

К следующей - If de1.rsтаблица.EOF = False Then de1.rsтаблица.MoveNext

На предыдущую - If de1.rsтаблица.BOF = False Then de1.rsтаблица.MovePrevious

Для добавления записи нужно создать кнопку код:

de.rsтаблица.addnew

Для обновления записей создать кнопку код:

de1.rsтаблица.Update

Ввод информации в БД средствами DataGrid

Вывести данные средствами DataGrid.

Для добавления записи нужно создать кнопку код:

de.rsтаблица.addnew

Для обновления записей создать кнопку код:

de1.rsтаблица.Update

Код:

If de.rstbl_predmet.State = 1 Then

de.rstbl_predmet.Close

End If

de.rstbl_predmet.Open

de.rstbl_predmet.AddNew

de.rstbl_predmet.Fields(1) = Text1.Text

de.rstbl_predmet.Fields(2) = Text2.Text

de.rstbl_predmet.Fields(3) = DataCombo1.BoundText

de.rstbl_predmet.Update

de.rstbl_predmet.Close

de.rsqr_predmet.Requery

Set frm_predmet.DataGrid1.DataSource = de

frm_predmet.DataGrid1.DataMember = "qr_predmet"