1、方法一

VB.Net下异步调用命令行的函数是Shell()，异步的意思就是程序执行到这个Shell()函数，不会等待其执行完毕就会立即跑到Shell()之后去运行剩下的语句。

如果我们需要等待命令行程序执行完毕之后再继续运行，可以使用如下函数：

Public Function ExecuteCmd(ByVal cmd As String)
Dim startInfo As New ProcessStartInfo("cmd.exe")'调用程序名
With startInfo
.Arguments = "/C " + cmd '调用命令 CMD
.RedirectStandardError = True
.RedirectStandardOutput = True
.UseShellExecute = False
.CreateNoWindow = True
End With

Dim p As Process = Process.Start(startInfo)
Dim strOutput As String = p.StandardOutput.ReadToEnd()
Dim strError As String = p.StandardError.ReadToEnd()
p.WaitForExit()
If (strOutput.Length <> 0) Then
Return strOutput
ElseIf (strError.Length <> 0) Then
Return strError
End If
Return ""
End Function

函数返回值就是命令行执行时屏幕回显的内容。

2、方法二

Dim p As Process = New Process
p.StartInfo.FileName = "C:\Windows\system32\cmd.exe"
p.StartInfo.Arguments = "/k C:\Windows\system32\ipconfig.exe /all"
‘ p.StartInfo.Arguments = "regsvr32.exe "
p.Start()

3、方法三

System.Diagnostics.Process.Start("C:\Windows\system32\cmd.exe",
"/k C:\Windows\system32\ipconfig.exe /all")

4、方法四

可以通过Process类和ProcessStartInfo类实现，也可以使用管道等操作，如：> |等。下面就是一个例子

<p>System.Diagnostics.Process.Start(“CMD.exe”,“/c net send 192.168.3.6 你今天过的好吗?”)</p><p>System.Diagnostics.Process.Start(“cmd.exe”,“/c foo.exe -arg” +“| bar.exe”)</p>

注意：net send 需要启用 Messenger 服务