Aktuelle Uhrzeit in Millisekunden?

[pate33]

Hi,

gibt es ne moeglichkeit in vb, die aktuelle uhrzeit millisekundengenau auszulesen?

hab was gefunden von wegen winmm.dll , das ist aber net ganz das, was ich suche ...

thanks schonmal ...

[tweakyou]

... probiers mal so:

Private Declare Sub GetSystemTime Lib "kernel32" (lpSystemTime As SYSTEMTIME)
Private Type SYSTEMTIME
wYear As Integer
wMonth As Integer
wDayOfWeek As Integer
wDay As Integer
wHour As Integer
wMinute As Integer
wSecond As Integer
wMilliseconds As Integer
End Type

Private Sub Form_Load()
Dim SysTime As SYSTEMTIME
'Set the graphical mode to persistent
Me.AutoRedraw = True

'Get the system time
GetSystemTime SysTime

'Print it to the form
With SysTime
Me.Print "The System Date is:" & .wMonth & "-" & .wDay & "-" & .wYear
Me.Print "The System Time is:" & .wHour & ":" & .wMinute & ":" & .wSecond & ":" & .wMilliseconds
End With
End Sub

[USSEraser]

Was ist mit der Funktion Timer ?
Die gibt die Zeit in Sekunden aus. Dann machst du halt
? Timer / 1000

[Shooter]

Original geschrieben von USSEraser
Was ist mit der Funktion Timer ?
Die gibt die Zeit in Sekunden aus. Dann machst du halt
? Timer / 1000

Nee, das geht nicht. Wenn schon "?Timer * 1000" und dann wirst du ungenau. Außerdem gibt "Timer" nicht die Uhrzeit an, sondern die seit Mitternacht vergangenen Sekunden. Das könnte man natürlich umrechnen, aber es wäre ein bisschen umständlich.

Da könntest du noch eher die Funktion GetTickCount() (Win32-API) verwenden, diese gibt die Anzahl der Millisekunden seit Mitternacht an. Da müsstest du zwar auch umrechnen, aber du hast dafür die Millisekunden.