[AccessD] simple piece of month-naming code

Private Sub UserForm_Activate()
  'Populate combobox1 with months, by name.
  Dim i As Integer
  For i = 1 To 12
    ComboBox1.AddItem Format("28/" & i & "/2009", "mmmm")
  Next
End Sub

I've been using that for years to populate a control with the names of the 
months. I've been using it for so long, that I'm not sure if it's still 
necessary. Has VBA come up with a specific month-naming function that might 
make this obsolete?

Susan H.