Access - For..Netx peculiar

 
Vista:

For..Netx peculiar

Publicado por Mac (3 intervenciones) el 04/11/2004 07:40:46
Quiero un for q cogiendo una hora aumente 5 minutos y hacer una comprobacion, me estoy volivnedo loco con lo formatos ya que no me deja aumentar, Muchas gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:For..Netx peculiar

Publicado por Juan Amorós (489 intervenciones) el 04/11/2004 10:27:00
Hola Mac:
Haciendo "encaje de bolillos" te "he construido" un For ...Next que te ofrezco y te explico:

Private Sub hora1_AfterUpdate()
Dim i As Double, valor2 As Double, valor3 As Double
Dim valor4 As Double
Dim valor1 as Date

valor2 = Time
valor3 = Me!hora1
valor4 = 0.0034779 'EQUIVALE, EN DECIMAL, A 5 MINUTOS

For i = valor3 To valor2 Step valor4
valor1 = i
Next i
Me!hora4 = valor1
End Sub

1.- Introduzco una HORA en el campo hora1
2.- En el evento DESPUES DE ACTUALIZAR realiza este For...Next y me DEVUELVE al campo hora4 el valor de la hora actual (el que le digo que visualice).
3.- He tenido que estar "afinando" para conocer REALMENTE el valor de 5 minutos en decimal.
4.- A partir de aquí utiliza lo que te interese.
Saludos
Juan Amorós
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar