Dim oProcess As New Process
oProcess.StartInfo.FileName = "你要调用的程序"
oProcess.StartInfo.Arguments = "参数1 参数2 参数3"
oProcess.Start()
oProcess.WaitForExit()
A.exe
------------
...
Dim oProcess As New Process
oProcess.StartInfo.FileName = "D:\B.exe"
oProcess.StartInfo.Arguments = "arg1 arg2 arg3"
oProcess.Start()
oProcess.WaitForExit()
B.exe
------------
...
Dim strs As String() = System.Environment.GetCommandLineArgs()
For Each s As String in strs
Console.WriteLine(s)
Next