Passing information to procedures.
Declaring parameters
Procedures can get passed information in the form of variables and objects when they are called. In the context of a procedure call, these variables and objects are called arguments. These arguments are then represented as so-called parameters inside the procedure body. Parameters can be used just like any other variable or object.
To specify that a procedure should get passed arguments when called, declare the procedure with a parameter list. A parameter list is a list of one or more names and types that the procedure will use when referring to the arguments that are passed to it. Parameter lists are surrounded by parenthesis.
Sub Procedure (s As String, n As Integer)
Print "The parameters have the values: " & s & " and " & n
End Sub
Procedure "abc", 123
will produce the following output:
The parameters have the values: abc and 123
There are two ways to pass arguments to procedures: by value and by reference. By default, arguments are passed by value unless otherwise specified.
Passing arguments by value
Arguments that are passed by value are not actually passed to procedures; a copy of the argument is made and passed instead. This allows the procedure to modify the copy, and the original variable or object remains unchanged.
When passing objects to procedures by value, the copy is made by calling the copy constructor of the
Type or
Class.
To specify that an argument should be passed by value, precede the parameter name in the procedure declaration with the
ByVal keyword:
Sub Procedure (ByVal param As Integer)
param *= 2
Print "The parameter 'param' = " & param
End Sub
Dim arg As Integer = 10
Print "The variable 'arg' before the call = " & arg
Procedure(arg)
Print "The variable 'arg' after the call = " & arg
will produce the following output:
The variable 'arg' before the call = 10
The parameter 'param' = 20
The variable 'arg' after the call = 10
Notice how parenthesis surround the arguments - in this case only one,
arg - in the procedure call. These parenthesis are optional, but are a common convention to signify a procedure call.
Passing arguments by reference
Unlike arguments that are passed by value, arguments that are passed to procedures by reference really do get passed; no copy is made. This allows the procedure to modify the original variable or object that was passed to it.
A reference is like an alias for a variable or object. Whenever you refer to a reference, you're referring to the actual variable or object that it aliases. In other words, you can think of a reference parameter of a procedure as the argument that is passed to it; any changes made to the reference parameter are actually changes to the argument it represents.
To specify that an argument should be passed by reference, precede the parameter name in the procedure declaration with the
ByRef keyword:
Sub Procedure (ByRef param As Integer)
param *= 2
Print "The parameter 'param' = " & param
End Sub
Dim arg As Integer = 10
Print "The variable 'arg' before the call = " & arg
Procedure(arg)
Print "The variable 'arg' after the call = " & arg
will produce the following output:
The variable 'arg' before the call = 10
The parameter 'param' = 20
The variable 'arg' after the call = 20
See also