參數陣列 (VB.NET)
Sub Main()
Sum(1, 2)
Sum(1, 2, 3)
Sum(Nothing)
End Sub
Sub Sum(ByVal ParamArray nums() As Integer)
If nums Is Nothing Then
Exit Sub
End If
Dim tot As Integer
For Each i In nums
tot += i
Next
Console.WriteLine("Total : {0}", tot)
End Sub
如有錯誤 歡迎指正