pause function

Der er jo en form der hedder "Log in Dialog", kan den ikke bruges evt. sammen med en timer?

yep - brug timer-kontrollen :o)

Den er ikke sikker nok da den ikke holder øje om man arbejder eller ej, har prøvet, uden held.. hvis i er af anden mening må i gerne komme men lidt kode,

Option Explicit
Dim Tid As Long

Private Sub Form_Load()
    Timer1.Interval = 500
End Sub

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    Tid = 0
    Me.Caption = Tid
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Tid = 0
    Me.Caption = Tid
End Sub

Private Sub Timer1_Timer()
    Tid = Tid + 1
    Me.Caption = Tid
End Sub

...If Tid = xxxx Then Luk og sluk!

Yep - enig med kjeld_klit. Hvis du bare reset'ter timeren når der er tegn på at programmet bruges, burde det virke som du ønsker :o)

Kan (som du kan se) godt lade sig gøre, men jeg vil fraråde dig det, da det kan give en del problemer for dig... f.eks. skal du unloade alt... Hvis brugeren har x antal forms åbne, og nogle af dem i Modalmode, så får du problemer.

Så hvis det ikke er dybt nødvendigt, lad være med at bruge det...