Move the rectangle I created on a report down on the page

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

This is the code that I am using below. I cannot seem to figure out how to
modify the code to get the rectangle to start lower on the report and not at
the top. Any help would be great.

Thanks in advance,
John

Dim intColumnWidth As Integer
Dim intReportHeight As Integer
intReportHeight = (9 * 1000)
intColumnWidth = 5050
Me.DrawWidth = 18
For intLineCount = 0 To 3
Me.Line (intLineCount * intColumnWidth, 0)-Step(0, intReportHeight)
Next
Me.Line (0, 0)-Step(3 * intColumnWidth, intReportHeight), , B
 
You should use the top and left properties to move a object in your report
using code.
 
John said:
This is the code that I am using below. I cannot seem to figure out how to
modify the code to get the rectangle to start lower on the report and not at
the top. Any help would be great.

Dim intColumnWidth As Integer
Dim intReportHeight As Integer
intReportHeight = (9 * 1000)
intColumnWidth = 5050
Me.DrawWidth = 18
For intLineCount = 0 To 3
Me.Line (intLineCount * intColumnWidth, 0)-Step(0, intReportHeight)
Next
Me.Line (0, 0)-Step(3 * intColumnWidth, intReportHeight), , B
Click to expand...

Since you are using the Step option, the top of the
rectangle is specified in the second part of the first
coordinate in the Line method. E.g. to start the rectangle
one inch from the top:

Me.Line (0,1440)-Step(3*intColumnWidth,intReportHeight),,B

Remember that the coordinates are specified in twips 1440
per inch.
 
Back
Top