Sådan Konverter normaltid Into Decimal tid med Visual Basic

Standard tid kan omdannes til decimal tid ved hjælp af Visual Basic indbyggede funktioner. Visual Basic arbejder med både dato og tid sammen. Det er ikke muligt at adskille dato og tid i to forskellige uafhængige værdier, der kan manipuleres separat. Det betyder, at der ikke er nogen enkelt indbygget funktion, der skal udføre opgaven med at omdanne den tid, udelukkende. Det er dog stadig muligt at gøre konverteringen ved hjælp af Visual Basic indbyggede funktioner i kombination med en enkelt linje beregning.

Vejledning

• Opbevar den tid, du ønsker i en variabel. Visual Basic har en DateTime Datatype som bruges til at repræsentere dato og klokkeslæt værdier, som er beskrevet i "Murach Visual Basic 2008." Brug Visual Basic er Dim kommando til at erklære den tid på følgende måde: Dim DateOne Som DateTime = # 3: 15: 30 AM # Den dato og tid er repræsenteret som et par, hvilket betyder, hvis du ikke give en dato eller tid Visual Basic vil erstatte referenceværdier, der repræsenterer den mindste dato eller tid. Visual Basic er startdato er 12:00 1 januar 0001. For eksempel, hvis du har udskrevet ovenstående initialiseret variabel til skærmen, vil du få "1/01/0001 3:15:30«.

• Konverter DateTime variabel i en dato og tid decimal ved hjælp af den indbyggede funktion ToOADate (). Denne indbyggede funktion vil konvertere tiden til en dobbelt datatype. Besøg http://msdn.microsoft.com for mere information. For eksempel, koden til at konvertere en DateTime variabel ind i en dobbelt er: Dim ADato Som DateTime = # 3: 15: 30 AM # Dim DbleTime Som Double = ADate.ToOADate () Console.WriteLine (DbleTime) Dette giver følgende decimal dato og tid: »0.1357638 ...«

• Uddrag standard tid fra denne flydende værdi ved at multiplicere værdien til højre for decimaltegnet med 24 med følgende kode: DbleTime * 24 Resultatet for dette eksempel bør være 3,25833.