Calcular fechas en vB
Hola Xabi quería preguntarte como puedo sumar o restar fechas en visual te explico:
tengo text1. Text y text2.text en los cuales introducire fechas las que quireo que haga lo siguiente si fecha1 < fecha2 then
total = fecha2 - fecha1
text3.text = total * £ 3.5
Gracias
tengo text1. Text y text2.text en los cuales introducire fechas las que quireo que haga lo siguiente si fecha1 < fecha2 then
total = fecha2 - fecha1
text3.text = total * £ 3.5
Gracias
1 Respuesta
Respuesta de xabi
1
Declara las variables:
dim fecha1 as date
dim fecha2 as date
dim total as integer
asigna los valores:
fecha1=text1.text
fecha2=text2.text
if fecha1<fecha2 then
total=datediff("d",fecha1,fecha2)
...
Busca en la ayuda de VB para conocer los diferentes valores que le puedes pasar a datediff en el primer parámetro:
De días de diferencia en tre las fechas
...
dim fecha1 as date
dim fecha2 as date
dim total as integer
asigna los valores:
fecha1=text1.text
fecha2=text2.text
if fecha1<fecha2 then
total=datediff("d",fecha1,fecha2)
...
Busca en la ayuda de VB para conocer los diferentes valores que le puedes pasar a datediff en el primer parámetro:
De días de diferencia en tre las fechas
...
