How can i monitor the ending date of the month by coding it in vb 6?

I was asked to create a program with counter that will reset to 0 when it reaches the end of the month. The purpose of the counter is to count how many print outs were made during the month, so when the month ends the counter will be back to 0 to monitor another set of print outs to be made for the succeeding months.



Can anyone give me hints on vb 6 date properties?How can i monitor the ending date of the month by coding it in vb 6?
I think this syntax will do the job:



If datepart(day, date) = 1 then



' put code to reset the counter



End if