Error en Month Calendar !!!!!!!

[ccKail]

Este es el codigo para moverle atributos a distintos dias de un control calendario , el tema es que me da un error que dice:
la variable "d" se utiliza antes de que se le asigne un valor, como puedo solucionarlo.
por que el control esta muy bueno podes marcar dias y hasta ponerle iconos recordatorios, a alguien lo precisa le paso el link es free.


Dim d() As DateItem
Dim i As Integer

'For i = 0 To 5

d.Initialize() <---------ERROR

d(0).Date = New DateTime(2010, 1, 5)
d(0).BackColor1 = Color.Red
d(0).ImageListIndex = 3
d(0).Text = "Ayuda"
d(1).Date = New DateTime(2010, 1, 3)
d(1).BackColor1 = Color.Purple
d(1).ImageListIndex = 3
d(1).Text = "Agregar"
d(2).Date = New DateTime(2010, 1, 13)
d(2).BackColor1 = Color.SaddleBrown
d(2).ImageListIndex = 3
d(2).Text = "Info."
d(3).Date = New DateTime(2010, 1, 20)
d(3).BackColor1 = Color.SeaGreen
d(3).ImageListIndex = 3
d(3).Text = "Record."
d(4).Date = New DateTime(2010, 1, 21)
d(4).BackColor1 = Color.OrangeRed
d(4).ImageListIndex = 3
d(4).Text = "Info2"
MonthCalendar2.AddDateInfo(d)


Espero alguna ayuda gracias....