GetTimeZoneDifSwe (XAPI2000)
| Deklaration VB 6.0 Function GetTimeZoneDifSwe (ByVal CountryNr As Long) As Long Deklaration VB.NET Function GetTimeZoneDifSwe (ByVal CountryNr As Integer) As Integer Beskrivning Returnerar tidsskillnaden till en tidszon i världen i förhållande till Sverige. Parametern Country är ett heltal som specificerar landsnumret för det land eller stad i den tidszon varifrån tidsskillnaden ska räknas ifrån. Funktionen returnerar tidskillnaden i minuter. Dividera returvärdet med 60 för att få tidsskillnaden i timmar. Observera att vissa länder (tex Iran) har en tidsskillnad till Sverige i minuter som inte är jämnt delbart med 60 (+4.5 resp. +2.5 timmar). Funktionen tar inte hänsyn till eventuell sommartid i de olika länderna. Använd funktionen AdjustTimeDifForDaylightSwe för att utföra en sådan justering. En lista på länder och landsnummer finns här. Returvärden Funktionen returnerar en tidsskillnad i minuter. Se även GetTimeZoneDif, AdjustTimeDifForDaylightSwe |
Exempel
Nedanstående exempel hämtar tidsskillnaden till länderna Peru och
Finland i timmar.
Justering för eventuella sommartider i respektive länder utförs också.
Const Finland = 32
Const Peru = 88
Dim Dif_Finland As Long, Dif_Peru As Long
Dif_Finland = AdjustTimeDifForDaylightSwe(Finland, GetTimeZoneDifSwe(Finland)) / 60
Dif_Peru = AdjustTimeDifForDaylightSwe(Peru, GetTimeZoneDifSwe(Peru)) / 60
