Tempo Ocioso

Bom dia a todo!
Mais uma vez venho pedir ajuda a vcs!
Consegui por um código num formulário para fechar depois de determinado tempo. Até aí tudo bem funciona muito bem.
O problema é que pede para salvar as informações e neste caso eu queria que o formulario fechasse sem salvar as informações.

Creio que o problema está na parte final do comando. Não conheço muito de programação pois estou começando a estudar.
Segue abaixo o comando utilizado e desde já agradeço a todos!

Private Sub Form_Timer()
Static LinHor As Integer
Static LinMin As Integer
Static LinSeg As Integer

If Trim(Tempo_Ocioso.Caption) = "00:00:00" Then
LinHor = 0
LinMin = 0
LinSeg = 0
End If

LinSeg = LinSeg + 1
If LinSeg = 60 Then
LinSeg = 0
LinMin = LinMin + 1
If LinMin = 60 Then
LinMin = 0
LinHor = LinHor + 1
If LinHor = 24 Then
LinHor = 0
End If
End If
End If

Tempo_Ocioso.Caption = Format(LinHor, "00") & ":" & _
Format(LinMin, "00") & ":" & _
Format(LinSeg, "00")

If Tempo_Ocioso.Caption = "00:20:00" Then
DoCmd.Quit acQuitSaveAll
End If
End Sub

Se não tem nada para ser salvo, retire o acQuitSaveAll, mas só se não precisar mesmo salvar nada.

Grato, Criquio!
Desculpe responder somente agora, pois tive alguns imprevistos.

Funcionou, mas descobri que o acQuitSaveNone que descobri hoje pela manhã é o ideal para o que quero.

Este Forum e seus colaboradores é nota 10.

Grato a todos!