判断表是否存在(gf_ExistTable函数)

<< Click to Display Table of Contents >>

导航:  Access平台开发人员帮助 > 通用函数库 > 按功能 > Access对象 >

判断表是否存在(gf_ExistTable函数)

上一页返回章节总览下一页

函数说明

       该函数可以判断一个表是否存在。

 

函数原型

 

    Public Function gf_ExistTable(strTableName As String) As Integer

 

语法

      gf_ExistTable(strTableName)

       参考:gf_ExistTable("tblTest") ‘判断tblTest表是否存在

 

参数

参数名

必需/可选

数据类型

参数说明

strTableName

必需

String

 要检查的表名

 

返回值

       返回一个整型(Integer)的值。如果对应的表存在,则返回-1。不存在,则返回0。

 

示例

 

      Sub subTest()

              Dim intReturn As Integer                                          '定义整型变量,保存返回的结果

               intReturn = gf_ExistTable("tblTest")                           '判断表 tblTest 是否存在

               '显示结果

              If intReturn = 0 Then

                      Msgbox "表 tblTest 不存在"

              Else

                      Msgbox "表 tblTest 存在"

              End If

      End Sub