Начинаю с простого варианта работы с БД в VB.

Создаем новый проект. Сохраняем его в папку, любую. Туда же мы бросаем необходимую БД. Что такое БД? Это некоторое количество таблиц, в которых хранится информация, в упорядоченном виде. Информация хранится в особых файлах, использование которых вместе со специальными программными средствами позволяет пользователю как просматривать необходимую информацию, так и, по мере необходимости, манипулировать ею, например, добавлять, изменять, копировать, удалять, сортировать и т.д. Таким образом, дать простое определение базы данных можно следующим образом. База данных - это набор информации, организованной тем, или иным способом. Пожалуй, одним из самых простых примеров баз данных может быть записная книжка с телефонами ваших знакомых. Этот список фамилий владельцев телефонов и их телефонных номеров, представленный в вашей записной книжке в алфавитном порядке, представляет собой, вообще говоря, проиндексированную базу данных. Использование индекса - в данном случае фамилии (или имени) позволяет вам достаточно быстро отыскать требуемый номер телефона.

Возьмем БД из одной таблицы, хотя в жизни такое встречается редко. Таблица состоит из записей, информация в которых разделена на несколько частей - полей. Например, в случае записной книжки.

И полей:

	Фамилия
	имя
	отчество
	номер телефона

В прикрепленном файле, есть файл Анекдоты.mdb Это БД данных состоит из одной таблицы Anecdot. Таблица состоит из полей:

1. Num - поле, содержащее номер анекдота по порядку
2. Tema - поле, содержащее тему анекдота, предназначенное для выбора анекдотов на одну тему.
3. Anecdot - поле, содержащее собственно сам анекдот.

Теперь, берем и устанавливаем на нашу форма элемент Data Разместим его внизу окна. Устанавливаем его основные свойства

Далее устанавливаем на форму 1 элемент TextBox и один элемент RichTextBox (подключается элемент Microsoft Rich TextBox Control 6.0) :

1. TxtTema
2. RTxtAnec

Изменяем их свойство DataSource на DatBd, а свойство DataField на название отображаемых полей tema и anecdot соответственно.
Теперь создаем событие Form_Load (FrmBd_load) и записываем в него 2 строчки 

Dim Path As String
Path = App.Path ' находим путь запущенного приложения, причем этот код хорошо работает в сети.
DatBd.DatabaseName = Path & "\Анекдоты.mdb" 'и устанавливаем, что элемент DatBd подключен к базе Анекдоты.mdb находящейся в том же каталоге, что и приложение.

И запускаем приложение. И нажимая на кнопки перехода на следующую запись, читаем анекдоты