Access) (ObjectFrame.ColumnCount 屬性

使用 ColumnCount 屬性可指定清單方塊或下拉式方塊之清單方塊部分中顯示的資料行數目,或是傳送至圖表控制項或未系結物件框架中的 OLE 物件。 可讀寫的 Integer

語法

運算式ColumnCount

表達 代表 ObjectFrame 物件的變數。

註解

ColumnCount 屬性包含介於 1 到資料表、 查詢或 SQL 陳述式中欄位的數目上限或控制項的 RowSource 屬性中指定的值清單中的值數目上限之間的整數。

針對資料表欄位,您可以在資料表設計檢視的 [欄位內容] 區段中的 [ 查閱 ] 索引標籤上設定此屬性 DisplayControl 屬性設定為下拉式方塊或清單方塊。

例如,如果您將[員工] 表單上清單方塊的ColumnCount屬性設定為 3,則一個資料行可以列出姓氏,另一個資料行可以列出名字,而第三個數據行可以列出員工識別碼。

下拉式方塊或清單方塊中可以有多個資料欄。 如果控制項的 RowSource 屬性包含資料表、 查詢或 SQL 陳述式的名稱,在下拉式方塊或清單方塊中會顯示從左到右,最多個 ColumnCount 屬性所指定的號碼的該來源的欄位。

若要顯示欄位的不同組合,建立新的查詢或新增 SQL 陳述式 RowSource 屬性,指定的欄位和您想要的順序。

如果 RowSource 屬性包含的值 ( RowSourceType 屬性設為 Value List) 清單,值會放入的列和欄的下拉式方塊或清單方塊 RowSource 屬性中所列出的順序。 例如,如果 RowSource 屬性包含清單"紅色;綠色;藍色;黃色"和 ColumnCount 屬性設定為 2、 下拉式方塊或清單方塊清單的第一列將包含"紅色"中的第一欄和"綠色"第二欄。 第二個資料列會在第一欄與"黃色"第二欄中包含"Blue"。

使用 ColumnWidths 屬性可設定控制項中顯示之資料行的寬度,或隱藏資料行。

範例

下列範例使用 Column 屬性和 ColumnCount 屬性來列印清單方塊選取範圍的值。

Public Sub Read_ListBox() 
 
 Dim intNumColumns As Integer 
 Dim intI As Integer 
 Dim frmCust As Form 
 
 Set frmCust = Forms!frmCustomers 
 If frmCust!lstCustomerNames.ItemsSelected.Count > 0 Then 
 
 ' Any selection? 
 intNumColumns = frmCust!lstCustomerNames.ColumnCount 
 Debug.Print "The list box contains "; intNumColumns; _ 
 IIf(intNumColumns = 1, " column", " columns"); _ 
 " of data." 
 
 Debug.Print "The current selection contains:" 
 For intI = 0 To intNumColumns - 1 
 ' Print column data. 
 Debug.Print frmCust!lstCustomerNames.Column(intI) 
 Next intI 
 Else 
 Debug.Print "You haven't selected an entry in the " _ 
 & "list box." 
 End If 
 
 Set frmCust = Nothing 
 
End Sub

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應