Login | Register   
LinkedIn
Google+
Twitter
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


Tip of the Day
Language: Visual Basic
Expertise: Beginner
Jan 11, 2000

Returning the Last Day of a Month

Question:
I have a form from which I am searching a database. The search is being conducted between a startdate and an enddate. As the default I'd like to have the first and last day of the last month.

Year(Now()) & Month(Now())-1 & "01" returns the first day of month -1, but how do I do to get the last day?

Answer:
Try this using VB6:

Dim d As Date
Dim n As Integer
Dim dEndofMonth
d = Month(Now) + 1 & "/1/" & Year(Now)
n = DateDiff("d", Now, d)
dEndofMonth = Now + (n-1)
DevX Pro
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap
Thanks for your registration, follow us on our social networks to keep up-to-date