VB.Net/Development/Command Line

Deal with Command Line Arguments

<source lang="vbnet"> Imports System Imports System.Configuration Imports System.Resources " Resource readers Public Class MainClass

   Shared Sub Main(ByVal args As String())
       Dim flag As Boolean = False
       Dim name As String = ""
       Dim number As Integer = 0
       Dim i As Integer
       For i = 0 To args.Length - 1
           Select Case args(i)
               Case "/flag"
                   flag = True
               Case "/name"
                   i += 1
                   name = args(i)
               Case "/number"
                   i += 1
                   number = Integer.Parse(args(i))
               Case Else
                   Console.WriteLine("invalid args!")
                   Exit Sub
           End Select
       Next
       Console.WriteLine(flag.ToString(), "Flag")
       Console.WriteLine(name, "Name")
       Console.WriteLine(number.ToString(), "Number")

   End Sub

End Class

      </source>

Get Command line

<source lang="vbnet"> Imports System Public Class MainClass

  Shared Sub Main()
       Console.WriteLine("CommandLine:        " & System.Environment.rumandLine )
  End Sub 

End Class

      </source>