Visual Basic - una ayudita

PS ....
tengo un COMBO k contiene todos los meses del año y texto un TEXT

lo que quiero es k cuando yo elija un mes y un año me devuelva la fecha inicial y la fecha final de dicho mes

EJM:

combo1=enero
Text1=2005

RESULTADO :
fecha inicio = 1 fecha final =31

tal vez por ahi haiga una funcion k no sepa. Y me pueda ayudar y evitar de escribir tanto codigo

fecha inicio siempre será 1, ahora para el día final primero tienes que determinar si el año es bisiesto o no, que es ver si es multiplo de 4 con mod y asi sabras de febrero de resto seria algo asi
Yo lo pongo en el numero de mes, ya lo organizas,es solo una idea, espero te sirva

a= año mod 4
if a<>0 then
bisiesto =1
end if

if mes =2 then
if bisiesto =1 then
fecha final =29
else fecha final=30
end if
else
if mes=11 or mes =4 or mes=6 or mes =9 then
fecha final =30
else
fecha final =31
end if
endif

Perdón por lo de febrero que es sino 28, pero cuando me estaba elevado y cuando me di cuenta ya lo había enviado

Te comento otro modo porque ese no me gusta nada personalmente. Se trata de usar la función dateserial. Los meses los interpreto como numéricos:

Primer día = DateSerial (año, mes, 1)
Ultimo día = DateSerial (año, mes+1, 1-1)

Esta función te crea una fecha a partir de año, mes y día, el primer dia siempre va a ser 1, de manera que creo que el primer dia queda claro, pero explico el segundo por si acaso, lo que hacemos es pasarle al DateSerial el Año, el mes siguiente al mes real y al primer día le quitamos uno, de manera que tenemos el ultimo dia del mes anterior al que le pasamos, es decir el real.

Cualquier duda no dudeis en preguntar...

Saludos

ps.... ers un genio
gracias mi vida