GetSystemTime: Unterschied zwischen den Versionen
Aus API-Wiki
(2 dazwischenliegende Versionen von 2 Benutzern werden nicht angezeigt) | |||
Zeile 1: | Zeile 1: | ||
__NOTOC__ | __NOTOC__ | ||
− | <vb>Private Declare Sub GetSystemTime Lib "kernel32.dll" ( _ | + | <syntaxhighlight lang="vb">Private Declare Sub GetSystemTime Lib "kernel32.dll" ( _ |
− | ByRef lpSystemTime As SYSTEMTIME)</ | + | ByRef lpSystemTime As SYSTEMTIME)</syntaxhighlight> |
==Beispiel== | ==Beispiel== | ||
− | <vb>Private Sub Main() | + | <syntaxhighlight lang="vb">Private Sub Main() |
Dim udtUTC As SYSTEMTIME | Dim udtUTC As SYSTEMTIME | ||
Zeile 11: | Zeile 11: | ||
Debug.Print "UTC: " & Format$(TimeSerial(udtUTC.wHour, udtUTC.wMinute, udtUTC.wSecond), "hh\:nn\:ss") | Debug.Print "UTC: " & Format$(TimeSerial(udtUTC.wHour, udtUTC.wMinute, udtUTC.wSecond), "hh\:nn\:ss") | ||
− | End Sub</ | + | End Sub</syntaxhighlight> |
== Verwandte Funktionen == | == Verwandte Funktionen == | ||
Zeile 17: | Zeile 17: | ||
*[[GetLocalTime]] - Dasselbe in Grün<br> | *[[GetLocalTime]] - Dasselbe in Grün<br> | ||
*[[GetSystemTimeAsFileTime]] - Noch sowas ähnliches, aber anders.<br> | *[[GetSystemTimeAsFileTime]] - Noch sowas ähnliches, aber anders.<br> | ||
+ | *[[GetTimeZoneInformation]] - Zeitzoneninformationen<br> |
Aktuelle Version vom 5. November 2016, 23:47 Uhr
Private Declare Sub GetSystemTime Lib "kernel32.dll" ( _
ByRef lpSystemTime As SYSTEMTIME)
Beispiel
Private Sub Main()
Dim udtUTC As SYSTEMTIME
Call GetSystemTime(udtUTC)
Debug.Print "UTC: " & Format$(TimeSerial(udtUTC.wHour, udtUTC.wMinute, udtUTC.wSecond), "hh\:nn\:ss")
End Sub
Verwandte Funktionen
- SYSTEMTIME - Struktur, die die Daten enthält
- GetLocalTime - Dasselbe in Grün
- GetSystemTimeAsFileTime - Noch sowas ähnliches, aber anders.
- GetTimeZoneInformation - Zeitzoneninformationen