全部显示

CreateGroupLevel 方法

       

使用 CreateGroupLevel 方法可以指定对报表中的数据进行分组或排序时所基于的字段或表达式Long 型。

expression.CreateGroupLevel(ReportName, Expression, Header, Footer)

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

ReportName  必需 String 型。字符串表达式,用于标识将包含新的分组级别的报表名称。

Expression  必需 String 型。字符串表达式,用于标识具以排序或分组的字段或表达式。

Header  必需 Integer 型。Integer 型值,用于标识将有组页眉的字段和表达式。如果 header 参数为 True (–1),则字段或表达式将有组页眉;如果 header 参数为 False (0),则字段或表达式将没有组页眉。无法通过将该参数设为 True 来创建页眉。

Footer  必需 Integer 型。Integer 型值,用于标识与组页脚相关的字段和表达式。如果 footer 参数为 True (–1),则字段或表达式将有组页脚;如果 footer 参数为 False (0),则字段或表达式将没有组页脚。无法通过将该参数设为 True 来创建页脚。

说明

例如,假定正建立一个可为用户提供字段选项的自定义向导,设计报表时可以用这种向导提供字段用于分组数据。根据用户的选择可以从创建的向导中调用 CreateGroupLevel 方法来创建适当的组。

在设计一个使用数据组或总计来创建报表的向导时,可以使用 CreateGroupLevel 方法。CreateGroupLevel 方法对指定字段或表达式中的数据进行分组或排序,并且为分组级别创建组页眉和/或组页脚。

CreateGroupLevel 方法仅在报表“设计”视图中才可用。

Microsoft Access 使用一个数组GroupLevel 属性数组,来追踪为报表创建的分组级别。CreateGroupLevel 方法基于 expression 参数将一个新的分组级别添加到数组中。然后 CreateGroupLevel 方法返回代表新分组级别在数组中位置的索引值。排序或分组所基于的第一个字段或表达式的级别为 0,第二个为 1,依此类推。在一个报表中,最多可以有十个分组级别(0 到 9)。

当指定 headerfooter 参数之一为 True,或两者皆为 True 时,报表中的 GroupHeaderGroupFooter 属性也将设为“是”,并且会为分组级别创建页眉和/或页脚。

在创建完页眉或页脚之后,可以设置其他 GroupLevel 属性:GroupOnGroupIntervalKeepTogether。可以在 Visual Basic 中设置这些属性,也可以通过单击“报表设计”工具栏上的“排序与分组” ,在报表的“排序与分组”框中设置这些属性。

注意   如果向导在新的或现有的报表中创建分组级别,则必须在“设计”视图中打开报表。

示例

下面的示例在“订单报表”报表的“订购日期”字段上创建一个分组级别。要创建分组级别的报表必须在“设计”视图中打开。因为 headerfooter 参数设为 True (-1) ,因此该方法可以为分组级别创建了页眉和页脚。此后可以设置页眉和页脚的大小。

Sub CreateGL()
    Dim varGroupLevel As Variant

    ' Create new group level on OrderDate field.
    varGroupLevel = CreateGroupLevel("OrderReport", "OrderDate", _
        True, True)
    ' Set height of header/footer sections.
    Reports!OrderReport.Section(acGroupLevel1Header).Height = 400
    Reports!OrderReport.Section(acGroupLevel1Footer).Height = 400
End Sub