CurrentDb.RecordsAffected返回0.为什么？

Question

如果我使用带有CurrentDb.Execute的RecordsAffected,它总是返回0.如果我首先创建一个Database对象的实例,它可以正常工作.为什么？

像这样:

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

我正在使用Access 2007和Microsoft Office 12.0 Access数据库引擎对象库.

Answer 1

每次使用CurrentDB时,它都是一个新实例.