回答：
如何隱藏/顯示某個(gè)表或者其他數(shù)據(jù)庫(kù)對(duì)象？《表》
方法一：
手動(dòng)操作如下：
隱藏：右鍵單擊某個(gè)表或者查詢等對(duì)象->屬性 ->隱藏
顯示：菜單->工具->選項(xiàng)->視圖->“隱藏對(duì)象”復(fù)選框前面打勾->確定后退出
右鍵單擊某個(gè)表或者查詢等對(duì)象->屬性 ->去掉“隱藏”前面的勾
方法二：
最簡(jiǎn)單而有效的一個(gè)方法就是以“usys”開(kāi)頭命名。因?yàn)閍ccess認(rèn)為這個(gè)字符串開(kāi)頭的是系統(tǒng)文件，而系統(tǒng)文件一般是不顯現(xiàn)的。如果要看到，那么在“工具”－“選項(xiàng)”－“視圖”中選中“系統(tǒng)對(duì)象”就可以了。記住，不要修改其他不屬于你的文件，因?yàn)槟呛芪ｋU(xiǎn)。
方法三：
用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
同理，你還可以隱藏其他的數(shù)據(jù)庫(kù)對(duì)象，一樣使用 ADO
方法四：
用access內(nèi)置的 SetHiddenAttribute 方法
SetHiddenAttribute 方法用于設(shè)置 access 對(duì)象的隱藏屬性。
expression.SetHiddenAttribute(ObjectType, ObjectName, fHidden)
expression 必需。返回 Application 對(duì)象的表達(dá)式。
ObjectType AcObjectType，必需。必須為 ObjectType 參數(shù)輸入一個(gè)常量；acDefault 不是有效的輸入項(xiàng)。
AcObjectType 可以是下列 AcObjectType 常量之一：
acDataaccessPage
acDefault
acDiagram
acForm
acFunction
acMacro
acModule
acQuery
acReport
acServerView
acStoredProcedure
acTable
ObjectName String 型，必需。字符串表達(dá)式，標(biāo)識(shí) access 對(duì)象的名稱。
fHidden Boolean 型，必需。值為 True 會(huì)設(shè)置隱藏屬性，值為 False 則會(huì)清除隱藏屬性。
說(shuō)明
GetHiddenAttribute 和 SetHiddenAttribute 方法一起使用時(shí)，可提供一種通過(guò) Visual Basic 代碼改變對(duì)象隱藏屬性的方法。使用這兩個(gè)方法，可以設(shè)置或讀取對(duì)象的“屬性”對(duì)話框中可用的隱藏選項(xiàng)。
若要使用 SetHiddenAttribute 方法來(lái)設(shè)置該選項(xiàng)，可將參數(shù)設(shè)為 True 或 False，如下例所示。
Application.SetHiddenAttribute acTable,"Customers", True
如何隱藏/顯示某個(gè)表或者其他數(shù)據(jù)庫(kù)對(duì)象？《表》
方法一：
手動(dòng)操作如下：
隱藏：右鍵單擊某個(gè)表或者查詢等對(duì)象->屬性 ->隱藏
顯示：菜單->工具->選項(xiàng)->視圖->“隱藏對(duì)象”復(fù)選框前面打勾->確定后退出
右鍵單擊某個(gè)表或者查詢等對(duì)象->屬性 ->去掉“隱藏”前面的勾
方法二：
最簡(jiǎn)單而有效的一個(gè)方法就是以“usys”開(kāi)頭命名。因?yàn)閍ccess認(rèn)為這個(gè)字符串開(kāi)頭的是系統(tǒng)文件，而系統(tǒng)文件一般是不顯現(xiàn)的。如果要看到，那么在“工具”－“選項(xiàng)”－“視圖”中選中“系統(tǒng)對(duì)象”就可以了。記住，不要修改其他不屬于你的文件，因?yàn)槟呛芪ｋU(xiǎn)。
方法三：
用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
同理，你還可以隱藏其他的數(shù)據(jù)庫(kù)對(duì)象，一樣使用 ADO
方法四：
用access內(nèi)置的 SetHiddenAttribute 方法
SetHiddenAttribute 方法用于設(shè)置 access 對(duì)象的隱藏屬性。
expression.SetHiddenAttribute(ObjectType, ObjectName, fHidden)
expression 必需。返回 Application 對(duì)象的表達(dá)式。
ObjectType AcObjectType，必需。必須為 ObjectType 參數(shù)輸入一個(gè)常量；acDefault 不是有效的輸入項(xiàng)。
AcObjectType 可以是下列 AcObjectType 常量之一：
acDataaccessPage
acDefault
acDiagram
acForm
acFunction
acMacro
acModule
acQuery
acReport
acServerView
acStoredProcedure
acTable
ObjectName String 型，必需。字符串表達(dá)式，標(biāo)識(shí) access 對(duì)象的名稱。
fHidden Boolean 型，必需。值為 True 會(huì)設(shè)置隱藏屬性，值為 False 則會(huì)清除隱藏屬性。
說(shuō)明
GetHiddenAttribute 和 SetHiddenAttribute 方法一起使用時(shí)，可提供一種通過(guò) Visual Basic 代碼改變對(duì)象隱藏屬性的方法。使用這兩個(gè)方法，可以設(shè)置或讀取對(duì)象的“屬性”對(duì)話框中可用的隱藏選項(xiàng)。
若要使用 SetHiddenAttribute 方法來(lái)設(shè)置該選項(xiàng)，可將參數(shù)設(shè)為 True 或 False，如下例所示。
Application.SetHiddenAttribute acTable,"Customers", True