使用 ColumnHidden 屬性在 [資料工作表] 檢視中顯示或隱藏指定的資料行。 可讀寫的 Boolean。
語法
表達。直欄隱藏
詞 代表 TextBox 物件的變數。
註解
例如，您可能想要隱藏太寬的 CustomerAddress 欄位，以便檢視 CustomerName 和 PhoneNumber 欄位。
[!注意事項] 當表單處於資料工作表檢視 ColumnHidden 屬性可套用於 [資料工作表檢視中的全部欄位和表單控制項。
隱藏欄中的使用 ColumnHidden 屬性在資料工作表檢視中不會隱藏表單檢視中的相同欄欄位。 同樣地，在表單檢視中將控制項的 Visible 屬性設定為 False 也不會隱藏相對應的資料行中資料工作表檢視。
注意事項
[!注意事項] 若要設定或變更此屬性對於資料表或查詢使用 Visual Basic，您必須使用資料行的 Properties 集合。 如需使用 Properties 集合的詳細資訊，請參閱 屬性。
您可以在查詢中顯示欄位，即使欄位的資料行隱藏在資料表資料工作表檢視中也一樣。 使用隱藏欄中的值作為篩選器的準則，即使該欄在套用篩選器後仍處於隱藏狀態。
將欄位的 ColumnWidth 屬性設定為 0，或調整為零寬度資料工作表檢視] 欄位會導致 Microsoft Access 將對應的 ColumnHidden 屬性設 為 True 。 取消隱藏欄還原 ColumnWidth 屬性欄位已隱藏之前的值。
[!注意事項] 無法在設計檢視中使用 ColumnHidden 屬性。
範例
下列範例會隱藏 [產品] 表單資料工作表檢視中的 [產品識別碼] 欄位。
Forms!Products!ProductID.ColumnHidden = -1
下一個範例會隱藏 Products 資料表資料工作表檢視中的 ProductID 欄位。
Public Sub SetColumnHidden()
Dim dbs As DAO.Database
Dim fld As DAO.Field
Dim prp As DAO.Property
Const conErrPropertyNotFound = 3270
' Turn off error trapping.
On Error Resume Next
Set dbs = CurrentDb
' Set field property.
Set fld = dbs.TableDefs!Products.Fields!ProductID
fld.Properties("ColumnHidden") = True
' Error may have occurred when value was set.
If Err.Number <> 0 Then
If Err.Number <> conErrPropertyNotFound Then
On Error GoTo 0
MsgBox "Couldn't set property 'ColumnHidden' " & _
"on field '" & fld.Name & "'", vbCritical
Else
On Error GoTo 0
Set prp = fld.CreateProperty("ColumnHidden", dbLong, True)
fld.Properties.Append prp
End If
End If
Set prp = Nothing
Set fld = Nothing
Set dbs = Nothing
End Sub
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。