我在设计access数据表时，隐藏了某些数据表，请问如何恢复显示？

[zbc]

rt

[zjcxc]

打开数据库--工具--选项--视图--显示--复选"隐藏对象"

[zhengjialon]

如果表太多用这个函数：
用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

[changechange]

上述代码源自以下文章，并且本文还提供了几种方法，请参考

http://access911.net/index.asp?board=4&mode=3&recordid=73FAB51E