VB.net -如果bat执行完成后如何添加？

Imports System.Diagnostics

Public Sub ExecuteBatFile(batFilePath As String)
    ' 创建一个新的进程启动信息
    Dim processInfo As New ProcessStartInfo(batFilePath)
    processInfo.RedirectStandardOutput = True ' 重定向标准输出
    processInfo.RedirectStandardError = True ' 重定向标准错误
    processInfo.UseShellExecute = False ' 不使用外壳程序执行
    processInfo.CreateNoWindow = True ' 不创建新窗口

    ' 创建进程实例
    Using process As New Process With {.StartInfo = processInfo}
        ' 事件处理程序：当进程退出时触发
        AddHandler process.Exited, Sub(sender As Object, e As EventArgs)
                                        ' 在这里添加批处理文件执行完成后的操作
                                        Console.WriteLine("批处理文件执行完成")
                                        ' 你可以在这里调用其他方法或执行其他代码
                                    End Sub

        ' 启动进程
        process.Start()

        ' 等待进程退出
        process.WaitForExit()

        ' 获取标准输出和错误输出（如果需要）
        Dim output As String = process.StandardOutput.ReadToEnd()
        Dim error As String = process.StandardError.ReadToEnd()

        ' 处理输出（如果需要）
        Console.WriteLine("标准输出：" & output)
        Console.WriteLine("错误输出：" & error)
    End Using
End Sub