LineMethod Code

[Brian]

I have managed to write the code to draw a line on my
report. I can change the size and color in addition to
making it into a box with the addition of the B at the end
of the code.

I cannot find any reference as to how to change the
thickness of the line using code.

The code looks like this:

Sub DrawLine()
Dim rpt As Report
Set rpt = Reports!Report1A

rpt.ScaleMode = 5
lngColor = RGB(253, 0, 0)
rpt.Line (9.5417, 0.125)-(10, 5.5), lngColor, B
End Sub

Thanks in advance.

 

[Marshall Barton]

I have managed to write the code to draw a line on my
report. I can change the size and color in addition to
making it into a box with the addition of the B at the end
of the code.

I cannot find any reference as to how to change the
thickness of the line using code.

The code looks like this:

Sub DrawLine()
Dim rpt As Report
Set rpt = Reports!Report1A

rpt.ScaleMode = 5
lngColor = RGB(253, 0, 0)
rpt.Line (9.5417, 0.125)-(10, 5.5), lngColor, B
End Sub

Use the DrawWidth property.

If this code is in the report's class module, it would be
better (and easier) to use Me instead of declaring and
setting an object variable.

 

[Brian]

-----Original Message-----



Use the DrawWidth property.

If this code is in the report's class module, it would be
better (and easier) to use Me instead of declaring and
setting an object variable.

Thanks. Will make the change. Thanks for the answer as
well.

Brian