ms access - VBA - Exit Function if a timer passes 2 minutes

Question

I've got a legacy VBA function which I want to stop running if it takes longer than 3 minutes - please see below for code I have so far.

Obviously, the MsgBox only shows once function has completed but I need it to show and exit a function during.

        Dim startTime As Long
        startTime = GetTickCount

        Do

            If GetTickCount - startTime > 10000 Then
                MsgBox "There seems to be an issue. Please try again!"
                Exit Do
            End If

            doStuff

        Loop

Can anyone help me out?!

Many Thanks in advance.

Answer 1

If the code is in that same sum you can just add Exit Sub after your msgbox.