Sub PrintArgs(ParamArray Args() As String) For i As Integer = 0 To Ubound(Args) Print(Args(i)) Next End Sub