Exiting a Procedure

VBA provides the Exit Sub and Exit Function statements, should we wish to exit from a procedure before the procedure would terminate naturally. For instance, if the value of a parameter is not suitable, we may want to issue a warning to the user and exit, as Example 6-6 shows.

Example 6-6. Using the Exit Sub Statement

Sub DisplayName(sName As String) If sName = "" then

Msgbox "Please enter a name." Exit Sub End If

MsgBox "Name entered is " & sName End Sub

0 0

Post a comment