使用 FormatCount 屬性可以確定對報表當(dāng)前節(jié)計算 OnFormat 屬性的次數(shù)。Integer 型,可讀寫。
expression 必需。返回“應(yīng)用于”列表中的一個對象的表達(dá)式。
只能在由節(jié)的 OnFormat 屬性設(shè)置指定的宏或是 Visual Basic 事件過程中使用該屬性。
該屬性在報表“設(shè)計”視圖中不可用。
每當(dāng)對當(dāng)前節(jié)計算一次 OnFormat 屬性設(shè)置時,Microsoft Access 將 FormatCount 屬性值加一。在設(shè)置下一節(jié)的格式時,Microsoft Access 將 FormatCount 屬性重置為 1。
在某些情況下,Microsoft Access 對節(jié)的格式設(shè)置不止一次。例如,可以設(shè)計一個報表,將報表主體節(jié)的 KeepTogether 屬性設(shè)為“是”。當(dāng) Microsoft Access 到達(dá)頁尾時,將設(shè)置一次主體節(jié)的格式以查看是否適合。如果不適合,Microsoft Access 移到下一個頁并再次對主體節(jié)進(jìn)行格式設(shè)置。在這種情況下,主體節(jié)的 FormatCount 屬性設(shè)置是 2,因為它在打印前設(shè)置了兩次格式。
可以使用 FormatCount 屬性來確保影響格式設(shè)置的操作對一個節(jié)只執(zhí)行一次。
在下面的示例中,DLookUp 函數(shù)只有當(dāng) FormatCount 屬性設(shè)為 1 時才會進(jìn)行計算:
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