Array for months of the calendar

[buddy2000]

I am very new to Vba. I am sure this is simple but can some please show me how to create an Array for the months of the year. It must be in a loop and populate the array with the months. I have tryed but what I am trying is not even close.

[Bob Phillips]

[vba]

Redim VecDates(1 To 12)
For i = 1 To 12

vecDates(i) = DateSerial(Year(Date),i, 1)
Next i
[/vba]

[Tinbendr]

To expand on Bob's answer, to get the months proper name:
[VBA]vecDates(i) = Format(DateSerial(Year(Date), i, 1), "MMMM")[/VBA]

[Zack Barresse]

To expand on Bob's answer, to get the months proper name:
[VBA]vecDates(i) = Format(DateSerial(Year(Date), i, 1), "MMMM")[/VBA]

Actually it's easier than that, no need for calling two functions...
[vba]vecDates(i) = MonthName(i, False)[/vba]