Tidspunkt med milisekunder

Public Function MyTime() As String
  MyTime = Format(Now, "dd-MMM-yyyy HH:nn:ss") & "." & Right(Format(Timer, "#0.00"), 2)
End Function

Det er ikke helt rigtig så vidt jeg kan se - den skifter i hvert fald kun 1 gang i sekundet.

how have you tested Hugo?

A basic for next loop - on my computer it changes like the seconds

Maybe this is a new Access 2007 feature - on the MAC it also only changes once pr. sec.
In the helpfile example they also use the timer to count seconds.

This is taken from Access help which confirms your theory about the mac

Access 2007 Developer Reference > Visual Basic for Applications Language Reference > Visual Basic Language Reference > Functions

Timer Function

Returns a Single representing the number of seconds elapsed since midnight.

Syntax

Timer

Remarks

In Microsoft Windows the Timer function returns fractional portions of a second. On the Macintosh, timer resolution is one second.

Example
This example uses the Timer function to pause the application. The example also uses DoEvents to yield to other processes during the pause.

Dim PauseTime, Start, Finish, TotalTime
If (MsgBox("Press Yes to pause for 5 seconds", 4)) = vbYes Then
    PauseTime = 5    ' Set duration.
    Start = Timer    ' Set start time.
    Do While Timer < Start + PauseTime
        DoEvents    ' Yield to other processes.
    Loop
    Finish = Timer    ' Set end time.
    TotalTime = Finish - Start    ' Calculate total time.
    MsgBox "Paused for " & TotalTime & " seconds"
Else
    End
End If