VBA基础
[经验分享]Access中判断表是否存在的通用函数
2013-07-04 23:29:02
cuxun的方法:
原文: http://www.office-cn.net/forum.php?mod=viewthread&tid=58365
我贴个方法出来:
public Function IsTableed(ByVal TempTableName As String) As Boolean
''测试表是否存在
If DCount("*", "MSysObjects", "Name='" & TempTableName & "'") = 0 Then
msgbox "系统未发现此表;" & TempTableName
IsTableed = False
Else
IsTableed = True
End If
End Function