全部显示

使用 ListCount 属性可以确定列表框或组合框中的列表框部分的行数。Long 型，可读写。

expression.ListCount

expression     必需。返回“应用于”列表中的一个对象的表达式。

说明

Microsoft Access 将 ListCount 属性设为列表框中的行数，或者组合框中的列表框部分的行数。ListCount 属性的值为只读，用户不能进行设置。

该属性仅在使用宏或 Vosual Basic 时才可用。而在“窗体”视图和“数据表”视图中为只读属性。

ListCount 属性设置包含组合框列表部分的总行数，或列表框中的总行数，由控件的 RowSource 和 RowSourceType 属性确定。如果控件基于表或查询（RowSourceType 属性设为“表/查询”，并且 RowSource 属性设为特定的表或查询），则 ListCount 属性设置值将包含表或查询结果集中的记录数。如果 RowSourceType 属性设为“值列表”，则 ListCount 属性设置将包含在 RowSource 属性中指定的值列表行数（这取决于值列表和列表框或组合框列表的列数，这由 ColumnCount 属性进行设置）。

如果将 ColumnHeads 属性设为“是”，则列标题所在的行将包括在 ListCount 属性返回的行数中。对基于表或查询的组合框和列表框而言，添加列标题等于另外增加一行；而对于基于值列表的组合框和列表框而言，添加列标题并不改变行数（第一行的值成为列标题）。

可以使用 ListCount 属性和 ListRows 属性指定组合框中列表框部分要显示的行数。

示例

下面的示例将使用 ListCount 属性查找“客户”窗体上“客户列表”组合框中列表框部分的行数，然后设置 ListRows 属性，以便在列表中显示指定的行数。

Public Sub SizeCustomerList()

    Dim ListControl As Control

    Set ListControl = Forms!Customers!CustomerList

    With ListControl

        If .ListCount < 8 Then

            .ListRows = .ListCount

        Else

            .ListRows = 8

        End If

    End With

End Sub