Skip to main content

Writing a Sub procedure

A Sub procedure is a series of Visual Basic statements enclosed by the Sub and End Sub statements that performs actions but doesn't return a value. A Sub procedure can take arguments, such as constants, variables, or expressions that are passed by a calling procedure. If a Sub procedure has no arguments, the Sub statement must include an empty set of parentheses.

The following Sub procedure has comments explaining each line.

' Declares a procedure named GetInfo
' This Sub procedure takes no arguments
Sub GetInfo()
    ' Declares a string variable named answer
    Dim answer As String
    ' Assigns the return value of the InputBox function to answer
    answer = InputBox(Prompt:="What is your name?")
    ' Conditional If...Then...Else statement
    If answer = Empty Then
        ' Calls the MsgBox function
        MsgBox Prompt:="You did not enter a name."
    Else
        ' MsgBox function concatenated with the variable answer
        MsgBox Prompt:="Your name is " & answer
    ' Ends the If...Then...Else statement
    End If
' Ends the Sub procedure
End Sub

Leave a comment

Your email address will not be published. Required fields are marked *

Format your code: <pre><code class="language-vba">place your code here</code></pre>