Standard tid kan konverteres til desimal tid med Visual Basic sin innebygde funksjoner . Visual Basic fungerer med både dato og tid sammen . Det er ikke mulig å skille datoen og tiden i to forskjellige uavhengige verdier som kan manipuleres separat. Dette betyr at det er ingen enkel innebygd funksjon som skal utføre oppgaven med å konvertere den tiden , eksklusivt. Men det er fortsatt mulig å gjøre konverteringen ved hjelp av Visual Basic sin innebygde funksjoner i kombinasjon med en eneste linje med beregning. Instruksjoner
en
Oppbevar gang du vil i en variabel . Visual Basic har en DateTime data type som brukes til å representere dato og klokkeslett verdier , som er beskrevet i " Murach Visual Basic 2008 . " Bruk Visual Basic er Dim -kommandoen til å erklære den tiden som følger: Dim DateOne Som DateTime = # 03:15:30 er # Datoen og klokkeslettet representert som et par, noe som betyr at hvis du ikke oppgir en dato eller klokkeslett Visual Basic vil erstatte referanseverdier som representerer den minste dato eller klokkeslett. Visual Basic er startdatoen er 0:00 1 januar 0001 . For eksempel, hvis du skrev ovenfor initialisert variabel til skjermen, vil du få '1 /01 /0001 03:15:30 ' .
2
Konverter DateTime variabel til en desimal dato og klokkeslett bruke den innebygde funksjonen ToOADate ( ) . Dette bygget i funksjon vil konvertere tid til en dobbel datatype . Besøk http://msdn.microsoft.com for mer informasjon. For eksempel er koden for å konvertere en DateTime variabel i en dobbel : Dim ADate Som DateTime = # 03:15:30 # Dim DbleTime As Double = ADate.ToOADate ( ) Console.WriteLine ( DbleTime ) Dette gir følgende desimal dato og tid : '0 0,1357638 ... '
3
Pakk normert tid fra denne flytende verdien ved å multiplisere verdien til høyre for desimaltegnet av 24 med følgende kode : DbleTime * 24The resultat for dette eksemplet bør være 3,25833 .