Панель Table Structure со списком полей в окне Field List создаваемой таблицы VIP

Заполнение созданных таблиц БД исходными данными

Для заполнения созданных таблиц БД исходными данными выполняются следующие действия:

1. Вход в среду проектирования, выбрав пиктограмму Standard EXE.

2. В Главном меню Главной панели проекта Visual Basic 6.0 выберем опцию Add-Ins (Добавления), а в ней команду Visual Data Manager (Визуальный менеджер данных). Раскроется панель приложения VisData.

3. Выполняется последовательность команд:

File – Open Data Base – Microsoft Access

4. Открыть базу данных клавишей Открыть, предварительно выделив мышкой имя – раскрывается панель приложения VisData со структурой базы данных, включающей в себя таблицы VIP и PROD.

5. Щелчком правой клавиши мыши по таблице VIP или PROD раскрывается контекстное меню выбора опций модификаций структур таблиц базы данных. Вначале заполним таблицу VIP.

Выбрав опцию Open, раскроем окно модификаций таблиц базы данных.

 

 

6. Выбрав опцию Add модем осуществлять ввод записей – конкретных значений полей таблицы.

7. Ввод записей в создаваемую Базу Данных завершается нажатием кнопки Close.

Аналогичные действия выполняются для заполнения таблицы Spec.

Создана база данных, содержащая 2 таблицы, заполненных конкретными записями.

 

 



Чтение созданной Базы Данных

Экранная форма и ее описание

Для компоновки экранной формы были использованы следующие элементы управления окна Toolbox:

– Элементы управления Data с именами Data1 и Data2, обеспечивающий доступ к Базе Данных;

– Не входящий в базовый набор элемент управления MsFlexGrid (гибкая сетка) с именами Grid1, Grid2, Grid3, служащая для непосредственного отображения записей таблиц VIP, PROD и справок.

– Командная кнопка Command Button с именами Command1, Command2, Command3, Command4, Command5

Свойства элемента Data1:

Caption = Таблица VIP

Name = Data1

Connect = Access

RecordSource = VIP

RecordSetType=0 (из таблицы)

DataBaseName=C:\base.mdb

Caption = Таблица PROD

Name = Data2

Connect = Access

RecordSource = PROD

RecordSetType=0 (из таблицы)

DataBaseName=C:\base.mdb

Свойства элемента MSFlexGrid:

Name = Grid1

Data Source = Data1

Fixed Cols = 0

Fixed Rows = 1

Name = Grid2

Data Source = Data2

Fixed Cols = 0

Fixed Rows = 1

Name = Grid3

Data Source =

Fixed Cols = 0

Fixed Rows = 1

 


Понравилась статья? Добавь ее в закладку (CTRL+D) и не забудь поделиться с друзьями:  



double arrow
Сейчас читают про: