Исходя из предположения, что все ваши параметры отделены от имени файла пробелом и косой чертой, это должно сработать.Длинный изогнутый путь находится ниже, а сокращенная версия - ниже.
Dim s As String = "C:\Program Files\Internet Download Manager\IDMan.exe /onboot"
Dim intermediatesplits As String() = s.Split(New String() {" /"}, StringSplitOptions.RemoveEmptyEntries)
Dim result As String = intermediatesplits(0)
Важной функцией является .Split
, которая чаще всего используется с одним символом в качестве параметра, однако вы можете использовать два символа, как указано выше..
и сокращенная версия
Dim s As String = "C:\Program Files\Internet Download Manager\IDMan.exe /onboot"
Dim result As String = s.Split(New String() {" /"}, StringSplitOptions.RemoveEmptyEntries)(0)