HelloData: простое приложение ADO
Область применения: Access 2013, Office 2013
Чтобы заложить основу для изучения библиотеки ADO, рассмотрите простое приложение ADO с именем HelloData. HelloData выполняет каждую из четырех основных операций ADO (получение, изучение, изменение и обновление данных). Чтобы сосредоточиться на основах ADO и предотвратить загромождения кода, в примере выполняется минимальная обработка ошибок.
Приложение запрашивает пример базы данных Northwind, которая входит в состав Microsoft SQL Server 2000.
Запуск HelloData
Создайте новый исполняемый проект Visual Basic уровня "Стандартный", который ссылается на библиотеку ADO 2.5.
Создайте четыре кнопки команд в верхней части формы, задав для свойств Name и Caption значения, показанные в таблице ниже.
Под кнопками добавьте элемент управления Microsoft DataGrid (Msdatgrd.ocx). Файл Msdatgrd.ocx поставляется вместе с Visual Basic и находится в каталоге \windows\system32 или \winnt\system32. Чтобы добавить элемент управления DataGrid на панель элементов Visual Basic, выберите Компоненты... в меню Проект . Затем проверка поле рядом с элементом Microsoft DataGrid Control 6.0 (SP3) (OLEDB) и нажмите кнопку ОК. Чтобы добавить элемент управления в проект, перетащите элемент управления DataGrid из панели элементов в форму Visual Basic.
Создайте элемент TextBox в форме под сеткой и задайте его свойства, как показано в таблице. По завершении форма должна выглядеть примерно так, как показано на следующем рисунке.
Наконец, скопируйте код, указанный в helloData Code , и вставьте его в окно редактора кода формы. Нажмите клавишу F5 , чтобы запустить код.
Примечание.
В следующем примере и во всем руководстве для проверки подлинности на сервере используется идентификатор пользователя MyId с паролем 123aBc. Эти значения следует заменить допустимыми учетными данными для входа для сервера. Кроме того, замените значение MyServer именем сервера.
Подробное описание кода см. в разделе HelloData Details.
Тип элемента управления |
Свойство |
Значение |
---|---|---|
Form |
Имя |
Form1 |
|
Height |
6500 |
|
Width |
6500 |
MS DataGrid |
Имя |
grdDisplay1 |
TextBox |
Имя |
txtDisplay1 |
|
Многострочный |
true |
Кнопка "Команда" |
Имя |
cmdGetData |
|
Подпись |
Получение данных |
Кнопка "Команда" |
Имя |
cmdExamineData |
|
Подпись |
Проверка данных |
Кнопка "Команда" |
Имя |
cmdEditData |
|
Подпись |
Изменение данных |
Кнопка "Команда" |
Имя |
cmdUpdateData |
|
Подпись |
Обновление данных |