GetSystemTime: Unterschied zwischen den Versionen
Aus API-Wiki
Zeile 1: | Zeile 1: | ||
− | + | __NOTOC__ | |
− | < | + | <vb>Private Declare Sub GetSystemTime Lib "kernel32.dll" ( _ |
− | + | ByRef lpSystemTime As SYSTEMTIME)</vb> | |
− | + | ||
− | + | ==Beispiel== | |
− | |||
− | |||
− | |||
− | |||
− | |||
− | |||
− | + | <vb>Private Sub Main() | |
− | |||
− | |||
− | Private Sub Main() | ||
Dim udtUTC As SYSTEMTIME | Dim udtUTC As SYSTEMTIME | ||
Zeile 20: | 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</vb> |
== Verwandte Funktionen == | == Verwandte Funktionen == | ||
− | + | *[[SYSTEMTIME]] - Struktur, die die Daten enthält | |
− | [[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> |
Version vom 9. Juni 2008, 17:41 Uhr
<vb>Private Declare Sub GetSystemTime Lib "kernel32.dll" ( _
ByRef lpSystemTime As SYSTEMTIME)</vb>
Beispiel
<vb>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</vb>
Verwandte Funktionen
- SYSTEMTIME - Struktur, die die Daten enthält
- GetLocalTime - Dasselbe in Grün
- GetSystemTimeAsFileTime - Noch sowas ähnliches, aber anders.