Crystal Report - Urgent! Como puedo saber cuantos dias tiene el mes

Saludos a todos,

Mi uergencia es saber como logro conocer los dias q tiene un mes a partir de una fecha de referencia me explico. yo tengo un reporte donde la informacion la agrupo por mes y dentro de cada mes debo decir cuantas horas tienes ese mes osea dias del mes * 24 horas.

Les agradezco su pronta ayuda

gracias!

ahi te va esta funcioncita, espero que te sirva

-----------------------------
Function darDiasMes(parFecha as Date) As Long
Dim lngDias As Long
Dim lngYear as long
dim lngMonth as long
lngYear=Year(parFecha)
lngMonth=month(parFecha
Select Case lngMonth
Case 1, 3, 5, 7, 8, 10, 12
lngDias = 31
Case 4, 6, 9, 11
lngDias = 30
Case Else 'por febrero
lngDias = IIf((lngYear Mod 4) = 0, 29, 28)
End Select
darDiasMes = lngDias
End Function
--------------------------------------

Ramiro