Access VBA教程:GroupInterval属性

同时使用 GroupInterval属性与GroupOn属性可以指定报表中记录的分组方式。Long 型,可读写。

expression.GroupInterval

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

说明

GroupInterval属性指定记录分组的间隔值。间隔值根据字段数据类型以及进行分组的字段或表达式的 GroupOn属性设置的不同而不同。例如,如果要根据“文本”字段(如“产品名称”字段)的第一个字符来分组记录,可以将 GroupInterval属性设为 1。

GroupInterval属性设置为 Long 值,该值取决于字段的数据类型和它的 GroupOn属性设置,GroupInterval 默认设置为 1。

使用“排序与分组”对话框、Visual Basic 可以设置该属性。

只有在报表“设计”视图或在报表的Open事件过程中可以设置 GroupInterval属性。

下面是不同字段数据类型的 GroupInterval属性设置示例。

字段数据类型 GroupOn 设置 GroupInterval 设置
所有 每一个值 (默认值)设为 1。
文本 前缀字符 设为 3 可对字段中前三个字符进行分组(例如 Chai、Chartreuse 及 Chang 将被分在同一组)。
日期/时间 设为 2 将返回以每二周来分组的数据。
日期/时间 设定为 12 将返回以半天的时间来分组的数据。

要将 GroupInterval属性值设为默认值 (1) 之外的值,首先需要将选定的字段或表达式的GroupHeaderGroupFooter属性设置为“是”,或两者都为“是”。

VBA示例

下面的示例对“各类产品”报表中的第一个分组级别的 SortOrder属性和分组属性进行设置,以创建一个按字母排序的产品列表。


Private Sub Report_Open(Cancel As Integer)
    ' Set SortOrder property to ascending order.
    Me.GroupLevel(0).SortOrder = False
    ' Set GroupOn property.
    Me.GroupLevel(0).GroupOn = 1
    ' Set GroupInterval property to 1.
    Me.GroupLevel(0).GroupInterval = 1
    ' Set KeepTogether property to With First Detail.
    Me.GroupLevel(0).KeepTogether = 2
End Sub

上页:Access VBA教程:GroupHeader属性 下页:Access VBA教程:GroupLevel属性

Access VBA教程:GroupInterval属性

Access VBA教程:GroupLevel属性 Access VBA教程:GroupOn属性
Access VBA教程:GrpKeepTogether属性 Access VBA教程:Guid属性
Access VBA教程:HasContinued属性 Access VBA教程:HasData属性
Access VBA教程:HasModule属性 Access VBA教程:Height属性
Access VBA教程:HelpContextId属性 Access VBA教程:HelpFile属性
Access VBA教程:HideDuplicates属性 Access VBA教程:HorizontalDatasheetGridlineStyle属性
Access VBA教程:Hwnd属性 Access VBA教程:hWndAccessApp方法
Access VBA教程:Hyperlink属性 Access VBA教程:HyperlinkAddress属性
Access VBA教程:HyperlinkColor属性 Access VBA教程:HyperlinkSubAddress属性
Access VBA教程:ImageHeight属性 Access VBA教程:ImageWidth属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号