CurrentDb. RecordsAffected возвращается 0. Почему?

Если я использую RecordsAffected с CurrentDb. Выполнитесь, это всегда возвращается 0. Если я сначала делаю экземпляр Объекта базы данных, он работает правильно. Почему?

Как это:

Dim Db As Database
Set Db = CurrentDb

Db.Execute "DELETE * FROM [Samples] WHERE Sample=5"
If Db.RecordsAffected = 0 Then
  MsgBox "Error"
End If

Вместо:

CurrentDb.Execute "DELETE * FROM [Samples] WHERE Sample=5"
If CurrentDb.RecordsAffected = 0 Then
  MsgBox "Error"
End If

Я использую Доступ 2007 и Библиотека Объектов механизма базы данных Access Microsoft Office 12.0.