Поделиться через

Свойство Report.FormatCount (Access)

  • Статья

Используйте свойство FormatCount , чтобы определить количество вычислений свойства OnFormat для текущего раздела отчета. Для чтения и записи, Integer.

Синтаксис

expression. FormatCount

Выражение Переменная, представляющая объект Report .

Замечания

Используйте это свойство только в процедуре события , заданной параметром свойства OnFormat раздела.

Это свойство недоступно в режиме конструктора отчета.

Microsoft Access увеличивает свойство FormatCount при каждом вычислении параметра свойства OnFormat для текущего раздела. При форматировании следующего раздела Microsoft Access сбрасывает свойство FormatCount на 1.

В некоторых случаях Microsoft Access форматирует раздел несколько раз. Например, можно создать отчет, в котором свойство KeepTogether для раздела сведений имеет значение Да. Когда Microsoft Access достигает нижней части страницы, он форматирует текущий раздел сведений один раз, чтобы узнать, подходит ли он. Если он не подходит, Microsoft Access переместится на следующую страницу и снова форматирует раздел сведений. В этом случае значение свойства FormatCount для раздела сведений равно 2, так как перед печатью оно было отформатировано дважды.

Используйте свойство FormatCount , чтобы операция, влияющая на форматирование, выполнялась только один раз для раздела.

Пример

В следующем примере функция 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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.