ms-access – 如何检查MS Access for vb宏中是否存在表

Possible Duplicate:
07000

我是vba宏的新手.知道如何检查表是否存在？
我搜索过以前的帖子,但没有得到明确的解决方案.

设置对Microsoft Access 12.0对象库的引用允许我们使用DCount测试表是否存在.

Public Function ifTableExists(tblName As String) As Boolean

    If DCount("[Name]","MSysObjects","[Name] = '" & tblName & "'") = 1 Then

        ifTableExists = True

    End If

End Function