Mensajes: 151
Temas: 24
Gracias Recibidas: 27 en 24 posts
Gracias Dadas: 70
Registro en: Jul 2020
Hola a todos.
Vamos a suponer que tengo el siguiente código:
GAMBAS
a
= DateDiff(Date(0,
0,
0,
11,
00),
Date(0,
0,
0,
12,
30), gb.
Minute)
Esto funciona perfectamente, imprimiendo 90 minutos. Mi pregunta es, ¿se puede usar Format$() para pasar esos 90 minutos a "1:30"? Y si es así, ¿cómo se hace? ¿O por el contrario tengo que hacerme una función que haga ese trabajo?
Muchas gracias.
Mensajes: 1,416
Temas: 202
Gracias Recibidas: 350 en 257 posts
Gracias Dadas: 258
Registro en: Jul 2020
07-11-2020, 19:02
(Última modificación: 07-11-2020, 19:02 por
tincho.)
(07-11-2020, 17:43)guizans escribió: se puede usar Format$() para pasar esos 90 minutos a "1:30"?
Hola Guinzas, si se puede.
Creo que esto te servirá.
'' Returns the time in a matrix where: 0-Y 1-M 2-D 3-H 4-N 5-S and as an input parameter requires the time in seconds
GAMBAS
intH = 0
intH = 1
intN = 0
intH = intTime / 3600
intN
= (intTime
Mod 3600) / 60 intS = 0
intN
= (intTime
Mod 3600) / 60 intS
= (intTime
Mod 3600) Mod 60 stxTime.Add(intH)
stxTime.Add(intN)
stxTime.Add(intS)
Saludos
1 Saludo.
Mensajes: 151
Temas: 24
Gracias Recibidas: 27 en 24 posts
Gracias Dadas: 70
Registro en: Jul 2020
Gracias tincho, me servirá
Mensajes: 1,416
Temas: 202
Gracias Recibidas: 350 en 257 posts
Gracias Dadas: 258
Registro en: Jul 2020
07-11-2020, 19:24
(Última modificación: 07-11-2020, 19:25 por
tincho.)
(07-11-2020, 19:18)guizans escribió: Gracias tincho, me servirá
Me quede dandole veueltas al tema. A parecer no hat una forma de pasarle a format directamente los 90 miutos pero...
GAMBAS
a
= DateDiff(Date(0,
0,
0,
11,
00),
Date(0,
0,
0,
12,
30), gb.
Minute)
Eso si que devuelve 1:30
Saludos.
1 Saludo.
Mensajes: 364
Temas: 29
Gracias Recibidas: 105 en 79 posts
Gracias Dadas: 13
Registro en: Jul 2020
Intentando
condensar el buen consejo de tincho:
GAMBAS
i
= DateDiff(Date(0,
0,
0,
11,
00),
Date(0,
0,
0,
12,
30), gb.
Minute)
"Los horizontes perdidos nunca regresan. " (F. Battiato, La stagione dell'amore, 1983)
"Las ondas nunca regresan. " (Genesis: Ripples - A trick of the tail, 1976)
Mensajes: 151
Temas: 24
Gracias Recibidas: 27 en 24 posts
Gracias Dadas: 70
Registro en: Jul 2020
08-11-2020, 12:48
(Última modificación: 08-11-2020, 12:51 por
guizans.)
Gracias a todos por vuestra ayuda.
El código de vuott me gusta mucho, es el más reducido y el más fácil de entender, pero lo he mejorado para que de un resultado mas a mi gusto
Un saludo.
Mensajes: 364
Temas: 29
Gracias Recibidas: 105 en 79 posts
Gracias Dadas: 13
Registro en: Jul 2020
(08-11-2020, 12:48)guizans escribió: pero lo he mejorado
Sì, perdona, pegando mi código, yo

olvidé el segundo parametro de la función "Fomat()" !
Sì, la linea correcta es:
Format(Time(0, 0, 0, i * 60000), "hh:nn")
"Los horizontes perdidos nunca regresan. " (F. Battiato, La stagione dell'amore, 1983)
"Las ondas nunca regresan. " (Genesis: Ripples - A trick of the tail, 1976)