Report.Line method (Access)
The Line method draws lines and rectangles on a Report object when the Print event occurs.
expression.Line (Step (x1, y1) - Step (x2, y2), Color, BF)
expression Required. A variable that represents a Report object. An expression that returns one of the objects in the Applies To list.
|Step||Keyword||Indicates that the starting point coordinates are relative to the current graphics position given by the current settings for the CurrentX and CurrentY properties of the Object argument.|
|x1, y1||Single||Indicates the coordinates of the starting point for the line or rectangle. The Scale properties (ScaleMode, ScaleLeft, ScaleTop, ScaleHeight, and ScaleWidth) of the Report object specified by the Object argument determine the unit of measure used. If this argument is omitted, the line begins at the position indicated by the CurrentX and CurrentY properties.|
|x2, y2||Single||Required. Indicates the coordinates of the ending point for the line or rectangle. Ensure that the starting point and the ending point are separated by a hyphen ( - ).|
|Color||Long||Indicates the RGB (red-green-blue) color used to draw the line. If this argument is omitted, the value of the ForeColor property is used. You can also use the RGB function or QBColor function to specify the color.|
|B||An option that creates a rectangle by using the coordinates as opposite corners of the rectangle.|
|F||F cannot be used without B. If the B option is used, the F option specifies that the rectangle is filled with the same color used to draw the rectangle. If B is used without F, the rectangle is filled with the color specified by the current settings of the FillColor and BackStyle properties. The default value for the BackStyle property is Normal for rectangles and lines.|
You can use this method only in an event procedure or a macro specified by the OnPrint or OnFormat event property for a report section, or the OnPage event property for a report.
To connect two drawing lines, make sure that one line begins at the end point of the previous line.
When you apply the Line method, the CurrentX and CurrentY properties are re-set to the end point specified by the x2 and y2 arguments.
The following example uses the Line method to draw a red rectangle five pixels inside the edge of a report named EmployeeReport. The RGB function is used to make the line red.
To try this example in Microsoft Access, create a new report named EmployeeReport. Paste the following code in the Declarations section of the report's module, and then switch to Print Preview.
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer) ' Call the Drawline procedure DrawLine End Sub Sub DrawLine() Dim rpt As Report, lngColor As Long Dim sngTop As Single, sngLeft As Single Dim sngWidth As Single, sngHeight As Single Set rpt = Reports!EmployeeReport ' Set scale to pixels. rpt.ScaleMode = 3 ' Top inside edge. sngTop = rpt.ScaleTop + 5 ' Left inside edge. sngLeft = rpt.ScaleLeft + 5 ' Width inside edge. sngWidth = rpt.ScaleWidth - 10 ' Height inside edge. sngHeight = rpt.ScaleHeight - 10 ' Make color red. lngColor = RGB(255,0,0) ' Draw line as a box. rpt.Line(sngTop, sngLeft) - (sngWidth, sngHeight), lngColor, B End Sub
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.