如何隐藏/显示某个表？<表>
方法一：最简单而有效的一个方法就是以“usys”开头命名。因为ACCESS认为这个字符串开头的是系统文件，而系统文件一般是不显现的。如果要看到，那么在“工具”－“选项”－“视图”中选中“系统对象”就可以了。记住，不要修改其他不属于你的文件，因为那很危险。
方法二：用ADO编程隐藏表
sub hide_table()
Dim cnn As New ADODB.Connection
Dim cat As New ADOX.Catalog
Set cat.ActiveConnection = CurrentProject.Connection
Dim tbl As ADOX.Table
Dim pro As Property
For Each tbl In cat.Tables
Debug.Print tbl.name
For Each pro In tbl.Properties
Debug.Print pro.name & "=" & pro.value
Next
If tbl.name = "需要隐藏的表名" Then tbl.Properties.Item("Jet OLEDB:Table Hidden In Access") = True
Next
End Sub
同理，你还可以隐藏其他的数据库对象，一样使用 ADO
站长排行
学院
新闻
专栏
盈利
如果你有站长界人事变动、重组并购、变革技术出现，以及产品投诉等重要新闻线索，请告诉我们，我们会给予特别关注。
0631-3653338
站长中国编辑部
站长中国24小时新闻热线： 13256307008
收藏本文
打印本文
告诉好友
投稿邮箱
评论加载中…
