Testing Command Line Arguments For Values

來源
--
' Loop through all the command line arguments given.
For I As Integer = 0 To My.Application.CommandLineArgs.Count - 1
' If an argument equals /m
If My.Application.CommandLineArgs.Item(I) = "/m" Then
MsgBox("You have used /m!")
Else ' If it doesn't equal "/m"
MsgBox("Incorrect CMD Argument.")
End If
Next