如何用DAO取数据库中的表名

哈哈一笑 2001-03-09 10:02:00
用DAO取数据库(.mdb)中表名后将这些表的名字列到listbox中去,但是我不知道怎么办?请高手赐教!
...全文
120 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
Brainy 2001-03-09
  • 打赏
  • 举报
回复
Dim tdf As TableDef
Dim db As Database

Set db = OpenDatabase("***.mdb", dbDriverComplete, ";PWD=***")

For Each tdf In db.TableDefs
List1.AddItem tdf
Next


liuzhiyong97751 2001-03-09
  • 打赏
  • 举报
回复
这个问题很简单,你打开数据库之后,dao里有一个table的对像,这个对像里的name属性就是你要的表的名称。你可以用for each ...in ...来获取所有的表的名称。

1,216

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧