Поделиться через


HelloData: простое приложение ADO

Область применения: Access 2013, Office 2013

Чтобы заложить основу для изучения библиотеки ADO, рассмотрите простое приложение ADO с именем HelloData. HelloData выполняет каждую из четырех основных операций ADO (получение, изучение, изменение и обновление данных). Чтобы сосредоточиться на основах ADO и предотвратить загромождения кода, в примере выполняется минимальная обработка ошибок.

Приложение запрашивает пример базы данных Northwind, которая входит в состав Microsoft SQL Server 2000.

Запуск HelloData

  1. Создайте новый исполняемый проект Visual Basic уровня "Стандартный", который ссылается на библиотеку ADO 2.5.

  2. Создайте четыре кнопки команд в верхней части формы, задав для свойств Name и Caption значения, показанные в таблице ниже.

  3. Под кнопками добавьте элемент управления 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.

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

  5. Наконец, скопируйте код, указанный в helloData Code , и вставьте его в окно редактора кода формы. Нажмите клавишу F5 , чтобы запустить код.

Примечание.

В следующем примере и во всем руководстве для проверки подлинности на сервере используется идентификатор пользователя MyId с паролем 123aBc. Эти значения следует заменить допустимыми учетными данными для входа для сервера. Кроме того, замените значение MyServer именем сервера.

Подробное описание кода см. в разделе HelloData Details.

Тип элемента управления

Свойство

Значение

Form

Имя

Form1


Height

6500


Width

6500

MS DataGrid

Имя

grdDisplay1

TextBox

Имя

txtDisplay1


Многострочный

true

Кнопка "Команда"

Имя

cmdGetData


Подпись

Получение данных

Кнопка "Команда"

Имя

cmdExamineData


Подпись

Проверка данных

Кнопка "Команда"

Имя

cmdEditData


Подпись

Изменение данных

Кнопка "Команда"

Имя

cmdUpdateData


Подпись

Обновление данных