Report.FontSize Property (Access)
You can use the FontSize property to specify the point size for text in the following situations:
When displaying or printing controls on forms and reports.
When using the Print method on a report.
The FontSize property uses the following settings.
(Default for all reports and controls except command buttons) The text is 8-point type.
(Default for command buttons) The text is 10-point type.
The text is the indicated size.
You can set the default for this property by using a control's default control style or the DefaultControl property in Visual Basic.
For reports, you can set this property only in an event procedure or in a macro specified by the OnPrint event property setting.
In Visual Basic, you set the FontSize property by using a numeric expression equal to the desired size of the font. The setting for the FontSize property can be between 1 and 127, inclusive.
The following example uses the Print method to display text on a report named Report1. It uses the TextWidth and TextHeight methods to center the text vertically and horizontally.
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