方法一: 通过循环,判断目标表是否存在
Function searchTable(TableName As String) As Boolean
searchTable = False '默认不存在
Dim tbl As DAO.TableDef
For Each tbl In CurrentDb.TableDefs
If tbl.Name = TableName Then
searchTable =<
方法一: 通过循环,判断目标表是否存在
Function searchTable(TableName As String) As Boolean
searchTable = False '默认不存在
Dim tbl As DAO.TableDef
For Each tbl In CurrentDb.TableDefs
If tbl.Name = TableName Then
searchTable =<