Практическая работа 21. Базы данных; элемент управления Data (считать таблицу в двумерный массив и вывести на экран в массив поля списка). Использование стандартного модуля
Date: 2015-10-07; view: 423.
Использование элемента управления Data
Базы данных
Аннотация:Большой материал по базам данных включает, среди прочего, DAO, ADO, использование соответствующих элементов управления, программное создание баз данных и работу с ними, репликацию и синхронизацию баз данных. В каждом случае материал поддерживается практическими работами.
Элемент управления Data обеспечивает связь проекта Visual Basic с файлом базы данных. Следующие свойства элемента управленияData используются при реализации связи,
| Таблица 4.1. Свойства элемента управления Data | |
| Свойство | Пример значения свойства |
| Connect | Access |
| DatabaseName | A:\Studium.mdb ' имя базы данных |
| RecordSource | software ' имя таблицы |
Для отображения/редактирования данных в простейшем случае может быть использовано текстовое поле, поле списка и т.д., при этом используются их свойства, данные в
| Таблица 4.2. Свойства элемента управления TextBox | |
| Свойство | Пример значения свойства |
| DataSource | Data1 ' элемент управления Data с его номером |
| DataField | Hersteller ' имя поля таблицы базы данных. Замечание: для каждого элемента управления TextBox не забудьте установить свое значение этого свойства |
Задание: создать таблицу базы данных, содержащую данные о 9 программных продуктах с полями: Hersteller - изготовитель, Typ - тип продукта, Preis - цена, Tendenz - тенденция, Anbieter - распространитель, Ort - местность,
| Таблица 4.3. Software | ||||||
| Коde | Hersteler | Typ | Preis | Tendenz | Anbieter | Ort |
| Ahead | Nero Burning | A | Media Markt | Berlin-Tegel | ||
| Steinberg | Maxima Studio | В | Media Markt | Koeln | ||
| Norton | Anti Virus | A | Schaubandt | Flensburg | ||
| G Data | Power Adress-manager | A | Pro Markt | Berlin | ||
| Top Systems | Win Zip | B | Media Markt | Stuttgart | ||
| Alfons | Lernwelt Deutsch | A | Media Markt | Berlin-NeuKoeln | ||
| Microsoft | Encarta | A | Saturn | Duesseldorf | ||
| Cequadrat | Picture it | A | Schaubandt | Isenhagen | ||
| Corel | Corel Draw | A | US-Electronic | Hilden |
Следует создать стандартный модуль для обеспечения использования переменных в (данном случае) в 2-х формах. Первую форму использовать для связи проекта с базой данных (использовать элементы управления Data и TextBox) и создания двумерного массива, соответствующего таблице базы данных. Вторую форму использовать для вывода двумерного массива на экран (в массив поля списка) и нахождения максимальной цены программного продукта.
Последовательность действий:
1. Создать
o модуль
o на первой форме (): элементы управления Data и массив Text1(7) для вывода 7 полей таблицы на экран, 3 командные кнопки:
§ для процедуры построчного считывания записей таблицы в двумерный массив,
§ для процедуры разового считывания тех же данных в тот же массив,
§ для перехода ко второй форме,
o на второй форме: массив List1 (9) для вывода данных двумерного массива на экран, элемент управления Label1, 2 командные кнопки для:
§ процедуры вывода двумерного массива на экран в массив поля списка,
§ процедуры нахождения максимальной цены продукта и вывода в поле Label1 результата,
o присвоить значения свойствам элемента управления Data и свойствам элементов массива текстового поля (примеры даны в и :),
o описать переменные в области модуля и ввести код, данный ниже (пояснения даны под комментариями), стартовать проект
o
Рис. 4.1.Доступ к данным; использование элемента управления Data, вид формы Form 1
Рис. 4.2.Доступ к данным - Data, вид формы Form2
(General) (Declarations)
' описание двумерного массива, соответствующего
' таблице software базы данных
Public mass(9, 6) As Variant
Public i As Integer, j As Integer, k As Integer
' переменная-счетчик для работы с номерами записей
' таблицы
Public n As Integer
' переменная для хранения максимальной цены продукта
Public max As Integer
| <== previous lecture | | | next lecture ==> |
| Практическая работа 20. Контрольное задание | | | Объекты доступа к данным DAO - Data Access Object |