Dim arg1 As String = "Argument 1"
        Dim arg2 As String = "Argument 2"
        Dim arg3 As String = "Argument 3"
        Dim test As New ProcessStartInfo("C:\programm.exe")
        test.Arguments = arg1 & " " & arg2 & " " & arg3
        Process.Start(test)

If My.Application.CommandLineArgs.Count > 0 Then
    For Each locString As String In My.Application.CommandLineArgs
                MessageBox.Show(locString)
            Next
        End If