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
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.
Want to reply to this thread or ask your own question?
You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.