* * HELP & MANUAL PREMIUM PACK 4 DEMO VERSION * *
This documentation was styled with a demo skin from the Premium Pack 4 add-on for Help & Manual. The contents of the skin are encrypted and not configurable. You can only publish HM projects with this skin. You cannot edit it or change it.
This version is copyright and may only be used for local testing purposes. It may not be distributed.
Please purchase the full version of the Premium Pack to get the configurable skins and remove this notice. The package will also include the Toolbox configuration utility for Premium Pack skins.
Description
This execution directive changes the way undefined passing parameters are interpreted in case of no explicit parameter passing method (ByRef or ByVal).
Default method is BYVAL.
Syntax
#DEFAULT PARAMETERS [BYREF | BYVAL]
Returns
None
Parameters
Remarks
Restrictions
See also
Examples
'--------------------------------------------------------------------
'---EXAMPLE: 2
'---This example will pass MyVal using ByVal method, the standard one
'--------------------------------------------------------------------
Function MyFunction(MyParam As Long) As Long
MyParam = 12345
Function = MyParam
End Function
Dim MyVal As Long
MyVal = 1
MyFunction(MyVal)
'---MSGBOX will show "1"
MSGBOX 0, MyVal
'--------------------------------------------------------------------
'---EXAMPLE: 1
'---This example will pass MyVal using ByRef method
'--------------------------------------------------------------------
#DEFAULT PARAMETERS ByRef
Function MyFunction(MyParam As Long) As Long
MyParam = 12345
Function = MyParam
End Function
Dim MyVal As Long
MyVal = 1
MyFunction(MyVal)
'---MSGBOX will show "12345"
MSGBOX 0, MyVal
