' Visual Basic 2008 9.0 .NET Examples - Methods and Arguments - Procedures and Functions : 
Module Exercise3Task
    Sub Main()
        Dim values As Integer() = {1, 2, 3, 4, 5, 6, 7, 8, 9, 10}
        Example5.PrintArray(values)
        '
        Dim count As Integer = 5
        Dim valuesCopy As Integer()
        valuesCopy = Exercise3Solution.GetIntegerArrayCopy(values, count)
        Example5.PrintArray(valuesCopy)
        '
        Dim factor As Integer = 4
        count = 3
        Exercise3Solution.MultiplyIntegerValues(valuesCopy, count, factor)
        '
        Example5.PrintArray(values)
        Example5.PrintArray(valuesCopy)
        '
        count = 6
        Exercise3Solution.MultiplyIntegerValues(values, count)
        '
        Example5.PrintArray(values)
        Example5.PrintArray(valuesCopy)
        '
        Console.ReadLine()
    End Sub
End Module
' Visit www.studyvb.com for more examples.  Copyright 2003-2008 De Wolf.