G
Guest
I want to show the attributes for each person in my database in a report with
the fields going down the page and the people (records) going across in
columns.
I have set up the report as 4 columns going down the across. I have left a
large left margin that I had hoped to fill with the text box labels
name person 1 person 2 person 3
address
tel
etc..
In the OnPage event of the report I put some code in
strMessage1 = "Name"
With rpt
'Set scale to pixels, and set FontName and
'FontSize properties.
.ScaleMode = 6
.FontName = "Ariel"
.FontSize = 10
End With
' Horizontal width.
'intHorSize = rpt.TextWidth(strMessage)
' Vertical height.
'intVerSize = rpt.TextHeight(strMessage)
' Calculate location of text to be displayed.
rpt.CurrentX = 0
rpt.CurrentY = 0.5
' Print text on Report object.
Me.Print strMessage1
but I dont seem to be able to get the print where i want it.
Any suggestions please
the fields going down the page and the people (records) going across in
columns.
I have set up the report as 4 columns going down the across. I have left a
large left margin that I had hoped to fill with the text box labels
name person 1 person 2 person 3
address
tel
etc..
In the OnPage event of the report I put some code in
strMessage1 = "Name"
With rpt
'Set scale to pixels, and set FontName and
'FontSize properties.
.ScaleMode = 6
.FontName = "Ariel"
.FontSize = 10
End With
' Horizontal width.
'intHorSize = rpt.TextWidth(strMessage)
' Vertical height.
'intVerSize = rpt.TextHeight(strMessage)
' Calculate location of text to be displayed.
rpt.CurrentX = 0
rpt.CurrentY = 0.5
' Print text on Report object.
Me.Print strMessage1
but I dont seem to be able to get the print where i want it.
Any suggestions please