Добавление строки в MDB - VB

Формулировка задачи:

Всем привет. При добавлении данных в базу указывает на ошибку в строке Data1.Refresh, при том что удаление таким макаром работает. В чем может быть дело? Заранее спасибо.

 
'DBGrid1.SetFocus
'Data1.Recordset.AddNew
'Data1.Refresh

А если так удалять, то работает

 
'DBGrid1.SetFocus
'Data1.Recordset.Delete
'Data1.Refresh

Решение задачи: «Добавление строки в MDB»

textual
                            Листинг программы 
                        
                            Data1.Recordset.AddNew
Data1.UpdateRecord