韵达快递收费价格表:vb,在同一access中有很多表,怎样得到每个表的名称

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/09 10:56:00
我要进行数据库连接,很多表,有不可能挨个看,只有先得到表名再进行连接,我也要得到表名,谢谢

select name from msysobjects where type =1

系统表默认情况下是隐藏的,可以在菜单:工具-选项-视图-“隐藏对象”上打勾。

我有个从网上找到的样例程序,是列出一个数据库里面的表名,基本就是你要的,但是因为是刚学,有些地方也不太明白
MsAccess.closecurrentdatabase
MsAccess.opencurrentdatabase (Text1.Text)
Dim rpt As Object
For Each rpt In MsAccess.current.project.allreports
Combo1.AddItem (rpt.Name)
Next rpt