⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 19127.html

📁 VB技巧问答10000例 VB技巧问答10000例
💻 HTML
字号:
<html>  <head>    <title>Re: 请问如何侦测资料库中的某个Table是否存在??</title>  </head>  <body bgcolor="#FFFFFF" vlink="#808080">    <center>      <h1>Re: 请问如何侦测资料库中的某个Table是否存在??</h1>    </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by SUNG on September 19, 1999 at 12:00:30:<p>In Reply to: <a href="19111.html">Re: 请问如何侦测资料库中的某个Table是否存在??</a> posted by 小琳 on September 18, 1999 at 20:03:59:<p>: : 用VB程式还是用SQL语法??<p>: :::SQL语法应该没有这种功能!!!<p>以下给你参考!<br>DB是用MSDBJET打开的资料库!TBNAME是要检查的TABLE NAME!<br>Public Function ISTABLE(DB As Database, TBNAME As String) As Boolean<br>Dim TB As DAO.TableDef<br>ISTABLE = False<br>For Each TB In DB.TableDefs<br>    If TB.Attributes = 0 And Trim(TB.Name) = Trim(TBNAME) Then<br>        ISTABLE = True<br>        Exit For<br>    End If<br>Next<br>Set TB = Nothing<br>End Function<br><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 19127--></ul><!--end: 19127--><br><hr size=7 width=75%><p></body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -