Visual Basic базы данных. Создание & Удаление записей

Для добавления & удаления записи усовершенствуем наш проект (см. выше), добавь туда 2 кнопки, у 1 свойство Caption = "New Запись", у 2 - ой = "Del Запись". Код:

Private Sub Command5_Click()
Data1.Recordset.AddNew 'Добавляем запись
End Sub

Private Sub Command6_Click() 'Последняя запись
'чтобы выполнить последовательность инструкций над
'одиночным объектом Data1, не перечисляя его каждый
'раз, используем инструкцию With
With Data1.Recordset
.Delete
.MoveNext

If .EOF Then .MoveLast
End With
End Sub