全部显示

ColumnCount 属性

使用 ColumnCount 属性可以指定列表框中或组合框的列表框部分所显示的列数，或者送往图表控件或未绑定对象框上 OLE 对象中的列数。

expression   必需。返回“Applies To”列表中的一个对象的表达式。

设置

ColumnCount 属性值是一个从 1 到表、查询或 SQL 语句中字段最大数目或值列表中值的最大数目之间的整数，由控件的 RowSource 属性指定。

使用控件的属性表、宏或 Visual Basic，可以设置 ColumnCount 属性。

对于表字段，可以在表“设计”视图中“字段属性”部分的“查阅”选项卡上，对将 DisplayControl 属性设为“组合框”或“列表框”的字段设置该属性

提示   当在表“设计”视图中将“查阅向导”选作字段的数据类型时，Microsoft Access 将自动设置 ColumnCount 属性。

说明

例如，如果将“雇员”窗体上列表框的 ColumnCount 属性设为 3，则一列可以显示姓氏，另一列可以显示名字，第三列可以显示雇员 ID 号。

组合框或列表框可以有很多列。如果控件的 RowSource 属性包含表、查询或 SQL 语句的名称，则组合框或列表框将从左到右显示那一数据源中的字段，显示的数目由 ColumnCount 属性来指定。

若要显示字段的不同组合，请为 RowSource 属性创建一个新的查询或新的 SQL 语句，并指定所需的字段和顺序。

如果 RowSource 属性中含有值的列表（RowSourceType 属性设为“值列表”），则这些值会以其在　RowSource 属性中列出的顺序放在组合框或列表框的行和列中。例如，如果　RowSource 属性含有一个“红；绿；蓝；黄”列表，并且 ColumnCount 属性设为 2，则组合框或列表框的第一行将包括第一列的“红”和第二列的“绿”，第二行将包括第一列的“蓝”和第二列的“黄”。

可以使用 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