default date in a text box

[Helen]

Hello,

I have a form with two text boxes used to enter start and end dates as
report criteria.

I was wondering if there is a way to set default dates for these boxes; for
instance I would like box 1 to always display the First Date of the Current
Year i.e. 01/01/2005. The second box should display the Last Date of the
Previous Month i.e. 07/31/2005.

Is there a way to do this?

Many thanks!

Helen

 

[Guest]

To keep the Start Date as always being a default of 01/01/<current year>, you
could use something like:

SerialDate (Year(Date()), 1, 1)

For the last day of the previous month, try:

SerialDate (Year(Date()), Month(Date()), 0)

See

http://msdn.microsoft.com/library/d...nvbadev/html/findingbeginningorendofmonth.asp

Good Luck!

 

[Helen]

Hi,

So, I added this in my Open Event for my Form:

Me.txtStartDate2 = SerialDate(Year(Date), Month(Date), 0)

But when I open the form an error appears: Sub or Function not defined.

Maybe I'm putting it in the wrong place?

Thanks!

Helen

 

[Guest]

As it should. Make that DateSerial vs SerialDate.

Sorry about that.