Visual Basic - Calculo de dias de un mes

Por favor diganme como se puede hacer una funcion en visual basic para sacar la cantidad de dias que tiene un mes

eso es sencillo, solo hay que restar el el primer día del siguiente mes y ya obtiene el numeros de días del mes que quieres
label1=cdate("01/02/2001")-1
y sabes cuántos días hubo en Enero

La funcióin sería:
Datediff("d", "01-01", "01.02") para Enero de este año. Ve cambiando los meses y tendrás los días de cada mes de este año.

Datediff("d", "01-02-82", "01-02-82") Tendrás los días de Febrero del año 1982.

Etc.
Un saludo.