Imports System.Collections
Module modMain
Sub Main()
Dim oArgs As New ArrayList(Environment.GetCommandLineArgs())
Dim I As Integer
With oArgs
.RemoveAt(0)
.Sort()
For I = 0 To .Count - 1
Console.WriteLine(.Item(I))
Next
End With
End Sub
End Module