Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Selecting first and last dates of prior month
Message
 
 
To
04/03/2002 16:23:46
Jason Dalio
Northern Interior Regional Health Board
Prince George, British Columbia, Canada
General information
Forum:
Visual Basic
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00628029
Message ID:
00628078
Views:
17
Thanks Jason!
It's perfect!
Max

>For first day of last month:

>Text1.Text = DateSerial(DatePart("YYYY", Date), DatePart("m", Date) - 1, 1)

>For last day of last month:

>Text1.Text = DateSerial(DatePart("YYYY", Date), DatePart("m", Date), 0)

>For first day of next month:

>Text1.Text = DateSerial(DatePart("YYYY", Date), DatePart("m", Date) + 1, 1)

>For last day of next month:

>Text1.Text = DateSerial(DatePart("YYYY", Date), DatePart("m", Date) + 2, 0)
Previous
Reply
Map
View

Click here to load this message in the networking platform