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, 16: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.
