我正在尝试将输出和PowerShell实例的输出发布到文本框中。我的代码:
Private Sub ViewServiceLogToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ViewServiceLogToolStripMenuItem.Click
Using ps As PowerShell = PowerShell.Create()
Dim logFilePathName As String = "some path to log file"
ps.AddScript(String.Format("get-content {0} -wait", logFilePathName))
Dim outputCollection As PSDataCollection(Of PSObject) = New PSDataCollection(Of PSObject)
AddHandler outputCollection.DataAdded, AddressOf LogFileOutput
Dim result As IAsyncResult = ps.BeginInvoke(Of PSObject, PSObject)(Nothing, outputCollection)
End Using
End Sub
Sub LogFileOutput(send As Object, data As DataAddedEventArgs)
LogTextBox.Text += data.ToString
End Sub
我不确定这是否正在运行。永远不会引发在LogFileOutput处理程序子句中放置断点。感谢。