_MsgBoxExit

[andyswarbs]

This snippet I call in absolutely every program I write. It was the first library function I wrote & has stood the test of time. It ain't long, and it doesn'y do a lot, but I could not live without it.

; _MsgBoxExit                           Does a normal message box and then exits if either no exit control is specified or if the specified button is clicked.
Func _MsgBoxExit($mbeFlag,$mbeTtl,$mbeTxt,$mbeExitIf=0,$mbeTime=0)
    Local $mbeRtn
    If $mbeTime>0 Then
        $mbeRtn=MsgBox($mbeFlag,$mbeTtl,$mbeTxt,$mbeTime)
    Else
        $mbeRtn=MsgBox($mbeFlag,$mbeTtl,$mbeTxt)
    EndIf
    If $mbeRtn=$mbeExitIf Or 0=$mbeExitIf Then Exit
    Return $mbeRtn
EndFunc