コマンドラインを取得するのは、Console.WriteLine ではなく
Dim cmds As String() = System.Environment.GetCommandLineArgs()
の方ですよ。

サンプル

Dim cmds As String() = Environment.GetCommandLineArgs()

Label1.Text = cmds(1) '第一引数を表示