Standaard tijd kan worden omgezet in decimale tijd met behulp van ingebouwde functies Visual Basic . Visual Basic werkt met zowel de datum en tijd samen . Het is niet mogelijk de datum en tijd gescheiden in twee onafhankelijke waarden die afzonderlijk kunnen worden gemanipuleerd . Dit betekent dat er niet een ingebouwde functie die de taak van het omzetten van de tijd , zullen uitsluitend uitvoeren . Toch is het nog steeds mogelijk om de conversie te doen met behulp van ingebouwde functies Visual Basic in combinatie met een enkele lijn van berekening . Instructies
Store 1 de tijd die je wilt in een variabele . Visual Basic heeft een DateTime soort gegevens dat wordt gebruikt om de datum en tijd waarden vertegenwoordigen , zoals wordt beschreven in " Murach 's Visual Basic 2008 . " Gebruik Dim commando van de Visual Basic is om de tijd te verklaren als volgt : Dim DateOne als DateTime = # 03:15:30 # De datum en tijd worden weergegeven als een paar, wat betekent dat als je niet in een datum of tijd Visual Basic zal vervangen referentiewaarden die de kleinste datum of tijd . Startdatum Visual Basic is 12:00 1 januari 0001 . Bijvoorbeeld, als u hebt afgedrukt bovenstaande geïnitialiseerd variabele naar het scherm , zou je '1 /01 /0001 3:15:30 ' . Kopen van 2 Zet de DateTime- variabele in een decimaal datum en tijd met behulp van de ingebouwde functie ToOADate ( ) . Deze ingebouwde functie zal de tijd om te zetten in een double data type. Bezoek http://msdn.microsoft.com voor meer informatie . Bijvoorbeeld , de code om een DateTime variabele zetten in een dubbele is : Dim ADatum als DateTime = # 03:15:30 # Dim DbleTime As Double = ADate.ToOADate ( ) Console.WriteLine ( DbleTime ) Dit levert de volgende decimaal datum en tijd : '0 0,1357638 ... '
3 Pak de standaardtijd van deze drijvende waarde door de waarde rechts van de decimale punt met 24 te vermenigvuldigen met de volgende code : DbleTime * 24Het resultaat van dit voorbeeld moet zijn 3,25833 .
|
