'Visual Basic 2010 Parameter Arrays - ParamArray Procedures en Functies
Module Exercise2Task
    Sub Main()
        Dim values As Integer() = {1, 2, 3, 4, 5, 6, 7, 8, 9, 10}
        Example1.PrintArray(values)
        '
        Dim count As Integer = 5
        Dim valuesCopy As Integer()
        valuesCopy = Exercise2Solution.GetIntegerArrayCopy(values, count)
        Example1.PrintArray(valuesCopy)
        '
        Dim factor As Integer = 4
        count = 3
        Exercise2Solution.MultiplyIntegerValues(valuesCopy, count, factor)
        '
        Example1.PrintArray(values)
        Example1.PrintArray(valuesCopy)
        '
        count = 6
        Exercise2Solution.MultiplyIntegerValues(values, count)
        '
        Example1.PrintArray(values)
        Example1.PrintArray(valuesCopy)
        '
        Console.ReadLine()
    End Sub
End Module
'Bezoek www.vbvoorbeelden.be voor meer Visual Basic voorbeelden.
'Copyright - De Wolf / vbvoorbeelden - 2003-2011 - Alle rechten voorbehouden.