Access doesn't have a proper double click event. It times two single clicks, so it doesn't always work the way you want.
Dim goend As Boolean
Private Sub Task_Update_DblClick(Cancel As Integer)
goend = True
End Sub
Private Sub Task_Update_MouseUp(Button As Integer, Shift As Integer, X As...