Tecnología

Inicio

Cómo convertir el tiempo estándar en decimal tiempo con Visual Basic

August 1

Cómo convertir el tiempo estándar en decimal tiempo con Visual Basic


El tiempo estándar se puede convertir en el tiempo decimal usando funciones integradas de Visual Basic. Visual Basic funciona tanto con la fecha y la hora juntos. No es posible separar la fecha y la hora en dos valores independientes diferentes que pueden ser manipulados por separado. Esto significa que no existe una única función incorporada que llevará a cabo la tarea de convertir el tiempo, exclusivamente. Sin embargo, todavía es posible hacer la conversión usando funciones integradas de Visual Basic en combinación con una sola línea de cálculo.

Instrucciones

1 Almacenar el tiempo que desee en una variable. Visual Basic tiene un tipo de datos DateTime que se utiliza para representar los valores de fecha y hora, como se describe en "Visual Basic 2008. Murach de" Utilice el comando Dim del Visual Basic para declarar la hora de la siguiente manera:
Dim DateOne Como DateTime = # 3: 15: 30 AM #
La fecha y la hora están representados como un par, lo que significa que si usted no proporciona una fecha u hora de Visual Basic va a sustituir los valores de referencia que representan la fecha u hora más pequeño. fecha de inicio de Visual Basic es 12:00a.m. 1 ª de enero de 0001. Por ejemplo, si imprimió la variable inicializada por encima de la pantalla, se llega a '1/01/0001 3:15:30'.

2 Convertir la variable DateTime en una fecha y hora decimal usando el ToOADate función incorporada (). Esta construida en función convertirá el tiempo para un tipo de datos doble. Visita http://msdn.microsoft.com para más información. Por ejemplo, el código para convertir una variable DateTime en un doble es:
Dim AFecha Como DateTime = # 3: 15: 30 AM #
Dim DbleTime As Double = ADate.ToOADate ()
Console.WriteLine (DbleTime)
Esto produce la siguiente fecha y hora decimales:
'0.1357638 ...'

3 Se extrae la hora estándar de este valor flotante multiplicando el valor a la derecha del punto decimal por 24, con el siguiente código:

DbleTime * 24
El resultado de este ejemplo debería ser 3,25833.

Consejos y advertencias

  • Si también desea extraer los minutos y segundos en formato decimal, y luego multiplicar el número a la derecha del punto decimal en el tiempo por 60 para obtener los minutos y multiplicar el número a la derecha del punto decimal en el acta por 3.600 para obtener los segundos. Como alternativa, Visual Basic proporciona la función DatePart (), que extrae las horas, minutos y segundos, que se pueden transformar en formato decimal de la siguiente manera:
  • Dim TheMinute As Double = CDbl (DatePart (DateInterval.Minute, DateOne)) / 60.0
  • Dim thesecond As Double = CDbl (DatePart (DateInterval.Second, DateOne)) / 3600.0