Access VBA教程:FormatCount属性

使用 FormatCount属性可以确定对报表当前节计算OnFormat属性的次数。Integer 型,可读写。

expression.FormatCount

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

说明

只能在由节的 OnFormat属性设置指定的或是Visual Basic事件过程中使用该属性。

该属性在报表“设计”视图中不可用。

每当对当前节计算一次 OnFormat属性设置时,Microsoft Access 将 FormatCount属性值加一。在设置下一节的格式时,Microsoft Access 将 FormatCount属性重置为 1。

在某些情况下,Microsoft Access对节的格式设置不止一次。例如,可以设计一个报表,将报表主体节的KeepTogether属性设为“是”。当 Microsoft Access 到达页尾时,将设置一次主体节的格式以查看是否适合。如果不适合,Microsoft Access 移到下一个页并再次对主体节进行格式设置。在这种情况下,主体节的 FormatCount属性设置是 2,因为它在打印前设置了两次格式。

可以使用 FormatCount属性来确保影响格式设置的操作对一个节只执行一次。

VBA示例

在下面的示例中,DLookUp函数只有当 FormatCount属性设为 1 时才会进行计算:


Private Sub Detail_Format(Cancel As Integer, _
     FormatCount As Integer)
    Const conBold = 700
    Const conNormal = 400
    If FormatCount = 1 Then
        If DLookup("CompanyName", _
                "Customers", "CustomerID = Reports!" _
                & "[Customer Labels]!CustomerID") _
                Like "B*" Then
            CompanyNameLine.FontWeight = conBold
        Else
            CompanyNameLine.FontWeight = conNormal
        End If
    End If
End Sub

上页:Access VBA教程:Format属性 下页:Access VBA教程:Format属性 -“日期/时间”数据类型

Access VBA教程:FormatCount属性

Access VBA教程:Format属性 -“日期/时间”数据类型 Access VBA教程:Format属性 -“数字”和“货币”数据类型
Access VBA教程:Format属性 -“文本”和“备注”数据类型 Access VBA教程:Format属性 -“是/否”数据类型
Access VBA教程:FormatConditions属性 Access VBA教程:Forms属性
Access VBA教程:FrozenColumns属性 Access VBA教程:FullName属性
Access VBA教程:FullPath属性 Access VBA教程:FuriganaControl属性
Access VBA教程:GridX属性 Access VBA教程:GridY属性
Access VBA教程:GroupFooter属性 Access VBA教程:GroupHeader属性
Access VBA教程:GroupInterval属性 Access VBA教程:GroupLevel属性
Access VBA教程:GroupOn属性 Access VBA教程:GrpKeepTogether属性
Access VBA教程:Guid属性 Access VBA教程:HasContinued属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号