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