dakujem pomohlo mi to tu je kod , ktory som oskusal a funguje
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ParseCommandLineArgs()
End Sub
Private Sub ParseCommandLineArgs()
Dim inputArgument As String = "-l"
For Each s As String In My.Application.CommandLineArgs
If s = inputArgument Then
MsgBox("neco")
End If
Next
End Sub
End Class
|