First entry in footer [Easy]

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

Guest

I have a text box with a control "Date" in the detail section. I want the
footer to show the first entry in this text box.
 
Create two variables in the decleration of the report
Dim Mydate as date, MyCount as count

On the on open event of the report write
MyCount=0
Now if you want the first entry of the date in each page, then put this code
in the On print event of the header

in the on print event where the date field is, enter the code
If MyCount=0 then
MyDate=me.date
mycount=1
End if

On the On print event of the footer, enter the code
me.TextDate2=Mydate

I hope that help
 
dogpigfish said:
I have a text box with a control "Date" in the detail section. I want the
footer to show the first entry in this text box.
Click to expand...


Place a hidden text box bound to the date field in the
corresponding header section. The footer can then display
the first one by referring to the header text box.
 
Back
Top