Visual Basic para Aplicaciones - calendario

necesito tomar el ultimo dia del mes actual, por ejemplo si es abril tomar el 30, y asi con los demas meses, existe una funcion que me de esto o alguien tiene algo similar
De antemano gracias

Hola, no se si existe una función para hacer esto pero puedes hacer un función que según el mes con un CASE te devuelva el ultimo día; por ejemplo
select case mes

Hola, no se si existe una función para hacer esto pero puedes hacer un función que según el mes con un CASE te devuelva el ultimo día; por ejemplo
select case mes
case 4,6,9,11
dias=30
case 1,3,5,7,8,10,12
dias=31
case 2
if ((años mod 4)=0) then
dias=29
else
dias=28
end if
end select

No se si es lo que buscas, pero a lo mejor te sirve, un saludo.

PD. ¿sabes si se puede cambiar el tamaño de un "InPutBox"?