Метод Report.Print (Access)

  • Статья

Метод Print выводит текст на объект Report с использованием текущего цвета и шрифта.

Синтаксис

expression. Печать (expr)

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

Параметры

Имя Обязательный или необязательный Тип данных Описание
Expr Обязательный String Строковые выражения для печати. Если этот аргумент опущен, метод Print выводит пустую строку. Несколько выражений можно разделить пробелом, точкой с запятой (;)) или запятой. (они в данном случае эквивалентны).

Возвращаемое значение

Отсутствует

Примечания

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

Выражения, заданные аргументом Expr, печатаются на объекте, начиная с позиции, указанной параметрами свойств CurrentX и CurrentY .

При печати аргумента Expr обычно добавляется возврат каретки, чтобы следующий метод Печати начал печать в следующей строке. При возврате каретки параметр свойства CurrentY увеличивается на высоту аргумента Expr (то же, что и значение, возвращаемое методом TextHeight ), а для свойства CurrentX задается значение 0.

Если точка с запятой следует за аргументом Expr , возврат каретки не добавляется, а следующий метод Print выводится в той же строке, что и текущий метод Print . Свойства CurrentX и CurrentY задаются в точку сразу после вывода последнего символа. Если аргумент Expr сам содержит возврат каретки, то каждый такой встроенный возврат каретки задает свойства CurrentX и CurrentY , как описано для метода Print без точки с запятой.

Если запятая следует за аргументом Expr , для свойств CurrentX и CurrentY устанавливается следующая зона печати в той же строке.

Когда аргумент Expr печатается в объекте Report , строки, которые не могут поместиться в указанной позиции, не прокручиваются. Текст обрезается в соответствии с объектом .

Так как метод Print обычно печатает символы с пропорциональным интервалом, важно помнить, что между количеством напечатанных символов и числом столбцов фиксированной ширины, которые занимают эти символы, нет никакой корреляции. Например, широкая буква (например, W) занимает более одного столбца фиксированной ширины, тогда как узкая буква (например, I) занимает меньше. Убедитесь, что табличные столбцы расположены достаточно далеко друг от друга, чтобы вместить текст, который вы хотите напечатать. Кроме того, можно печатать шрифтом с фиксированным шагом (например, Courier), чтобы каждый символ использовал только один столбец.

Пример

В следующем примере используется метод Print для отображения текста в отчете с именем Report1. Он использует методы TextWidth и TextHeight для центрирования текста по вертикали и горизонтали.

Private Sub Detail_Format(Cancel As Integer, _ 
 FormatCount As Integer) 
 Dim rpt as Report 
 Dim strMessage As String 
 Dim intHorSize As Integer, intVerSize As Integer 
 
 Set rpt = Me 
 strMessage = "DisplayMessage" 
 With rpt 
 'Set scale to pixels, and set FontName and 
 'FontSize properties. 
 .ScaleMode = 3 
 .FontName = "Courier" 
 .FontSize = 24 
 End With 
 ' Horizontal width. 
 intHorSize = Rpt.TextWidth(strMessage) 
 ' Vertical height. 
 intVerSize = Rpt.TextHeight(strMessage) 
 ' Calculate location of text to be displayed. 
 Rpt.CurrentX = (Rpt.ScaleWidth/2) - (intHorSize/2) 
 Rpt.CurrentY = (Rpt.ScaleHeight/2) - (intVerSize/2) 
 ' Print text on Report object. 
 Rpt.Print strMessage 
End Sub

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

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