vb.net shell线程执行完成后再运行以后处理 函数

Public Shared Function ExecuteCmd(ByVal cmd As String) As String
Dim startInfo As New ProcessStartInfo("cmd.exe")
With startInfo
.Arguments = "/C " + cmd
.RedirectStandardError = True
.RedirectStandardOutput = True
.UseShellExecute = False
.CreateNoWindow = True
.WindowStyle = ProcessWindowStyle.Hidden
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

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!