Нам нужно повторить все что сделано в шаге "Шаг 97 - Свой OCX элемент источник данных". Поместим на нашу форму элемент управления ADO. Настроим его базу данных и таблицу. Об этом было написано в шагах "Шаг 34 - Используем ADO". Имя проекту дадим MyAdoControl. Не забудьте SQL запрос написать и поставить бинарную совместимость. Нам нужно написать реализацию функции GetDataMember. К этой функции производится обращение для получения набора данных.

Private Sub UserControl_GetDataMember(DataMember As String, Data As Object)
Set Data = Adodc1
End Sub

Дальше нужно собрать элемент и в проекте поместить его на форму. Заполнить свойства. Они должны автоматически заполняться, если все правильно, и Вы не где не ошиблись.

После запуска Вы увидите первую запись.

Что в данной технологии хорошо? Мы логику выделяем в отдельный компонент. А логика может быть довольно сложная. Например, как в шаге "Шаг 92 - Просмотр и редактирование связанных данных".