cambiar color a dias determinados en calendario

[luis.decolores]

hola buenas,
mi problema es que no se como colorear determinados dias del mes de un calendar en vb.net. Tengo en una bbdd registros de fechas de eventos durante todo el año (fecha inicio y fecha fin sobre de cada uno) y el tema es que las recorro con un "for" y cuando detecto que en un registro hay una fecha cuyo mes es el mes seleccionado del calendario, pues paro y quiero colorear ese dia , que no tiene por qué ser el seleccionado por defecto, y puede estar antes o después del seleccionado como "selected day" ... bueno, mejor pongo el código por si sirve:

mes_calendario = Calendar1.SelectedDate.Month

For indiceLocal = 0 To numRegistrosLocal - 1

fec_ini = dtLocal.Rows(indiceLocal).Item("Fec_Ini")
fec_fin = dtLocal.Rows(indiceLocal).Item("Fec_Fin")
mes_evento = fec_ini.Month

If mes_calendario = mes_evento Then
dia_evento = fec_ini.Day
Calendar1. ' COMO SELECCIONO EL DIA Y LO PINTO?
End If


Next

bueno. .. pues es eso, muchas gracias...