Set dates

[Brad]

Is there an easy way to set a date to the beginning of the month? Say I
want to add 7 months to today (except that today is not a good reference as
it would figure out to be March 1)...say I add 7 months to 09/06/2004 and I
get a returned date of 03/06/2005. What I then need to do is to take that
date and make it 03/01/2005. Is there an easy way to do this?

Thanks for the information.

Brad

 

[Greg Burns]

Dim dt As DateTime = Today.AddMonths(7)
Dim days As Integer = dt.Day - 1
dt = dt.AddDays(-days)

Think that would do it,
Greg

 

[Brad]

Greg,

Worked just fine. Thanks for the help.

Brad

 

[Richard K Bethell]

Is there an easy way to set a date to the beginning of the month? Say I
want to add 7 months to today (except that today is not a good reference as
it would figure out to be March 1)...say I add 7 months to 09/06/2004 and I
get a returned date of 03/06/2005. What I then need to do is to take that
date and make it 03/01/2005. Is there an easy way to do this?

Thanks for the information.

Brad

Dim TempDate as DateTime = DateTime.Now.AddMonths(7)
Dim TargetDate as New DateTime(Fred.Year, Fred.Month, 1, 0, 0, 0)

 

[Greg Burns]

Dim TempDate As DateTime = DateTime.Today.AddMonths(7)
Dim TargetDate As New DateTime(TempDate.Year, TempDate.Month, 1)

I like your way better, seems cleaner.

BTW, who's Fred? :^)

Greg