Passing Arrays as Parameters : Function Parameter « Language Basics « VBA / Excel / Access / Word

1.	Access
2.	Application
3.	Data Type
4.	Data Type Functions
5.	Date Functions
6.	Excel
7.	File Path
8.	Forms
9.	Language Basics
10.	Math Functions
11.	Outlook
12.	PowerPoint
13.	String Functions
14.	Windows API
15.	Word
16.	XML

Microsoft Office PowerPoint 2007 Tutorial

Microsoft Office Excel 2007 Tutorial

Microsoft Office Word 2007 Tutorial

VBA / Excel / Access / Word » Language Basics » Function Parameter

Passing Arrays as Parameters

 

Sub PassArray()

    'Declare a six-element array

    Dim astrNames(5) As String

    Dim intCounter As Integer



    'Call the FillNames function, passing a reference

    'to the array

    Call FillNames(astrNames)



    'Use a For...Next loop to loop through the

    'elements of the array

    For intCounter = 0 To UBound(astrNames)

        Debug.Print astrNames(intCounter)

    Next intCounter

End Sub

Sub FillNames(varNameList As Variant)

    'Populate the elements of the array

    varNameList(0) = "A"

    varNameList(1) = "B"

    varNameList(2) = "C"

    varNameList(3) = "D"

    varNameList(4) = "E"

    varNameList(5) = "F"

End Sub

Related examples in the same category

1.	Parameters
2.	Writing a Function Procedure with Arguments
3.	Pass string value through Parameters
4.	Optional Parameters
5.	Default value parameters
6.	Substitute a default value if an optional parameter is not provided
7.	Named parameters
8.	Using the Select Case Statement to check the function parameter
9.	Passing by Reference Versus Passing by Value
10.	Pass by value
11.	Illustrate a reason why you might want to pass a parameter by reference
12.	Optional Parameters: Building Flexibility into Functions
13.	Inserting Default Values When Parameters Are Missing
14.	Accommodating for Missing Parameters in Your Code
15.	Named Parameters: Eliminate the Need to Count Commas
16.	Pass array parameter to a function
17.	Double type parameter
18.	Object parameter

java2s.com |

| Contact Us | Privacy Policy

All other trademarks are property of their respective owners.