Visual Basic - Contar numero dias mes

Quisiera saber si alguien me puede colaborar, busco una función que cuente el numero de dias del mes.

Gracias. Julieth

Aqui tu respuesta :

dFECHA1= DATE
dFECHA2 = CDATE("01/", STR(MONTH(dFECHA1)+1), "/" & STR(YEAR(DATE)) ) - 1
nDIAS= DAY( dFECHA2 )

y ASI OBTIENES LOS DIAS DE UN DETERMINADO MES, ESPERO HABERTE AYUDADO.
ah me olvidaba, consistencialo, si es diciembre, que pasaria si le aumentas 1 al mes, no todo es facil en esta vida.

Bye.