Problema con fechas

[majo83]

Hola estoy hecho un lio con las funciones de fecha en visual basic,me han mandado un monton de ejercicios con fechas y mi pregunta es como coger el dia y el mes a partir de una fecha,por ejemplo tengo el 29/11/1983 y quiero coger el mes y el dia.

He visto que seria algo asi:
mes = month(date)

dia= day(date)


Pero no me funciona me da error.
El ejercicio en concreto es calcular si es tu cumpleaños introduciendo la fecha y sino lo es decir cuantos meses y dias faltan.Saludos

He intentado esto:

dia = Day (textbox1.text)
para coger el dia que introducimos en la caja de texto pero me dice: 'Day' is a type and cannot be used as an expression

[occam25]

Para poder usar las funciones Day, Month, Year.. etc el parametro q le pasas ha de ser tipo Date.

Tendras que crear una variable de ese tipo:

Dim fecha As Date

fecha = CDate(Text1.Text) ' convertira string en date

Ahora si te funcionara Day(fecha), Month(fecha) y Year(fecha) y ya podras hacer los calculos de forma sencilla.

El problema de esto es q si metes la fecha mal el programa fallara al intentar convertir el string en date.

Yo que tu usaba un calendario (MonthView), es mas elegante y no da cabida a fallos de formato.


Suerte

[majo83]

Gracias,mirare haber que es eso del calendario.Un saludo

[Pirry2Pirry]

Hola:
Si lo que quieres es extraer el dia, mes o año de una cadena por ejemplo: 29/11/1983. Lo puedes conseguir usando las funciones left$, mid$ y right$
por ejemplo:
dia$=left$("29/11/1983",2) Extraer los primeros 2 caracteres de la cadena
mes$=mid$("29/11/1983",4,2) Extraer partiendo del caracter numero 4, 2 caracteres=11
espero que te sirva
bye

[majo83]

Gracias me sirve de mucho