.net 更改进程 Windows 字体

Question

我有一个这样的代码：

 Dim psi As New ProcessStartInfo("ABC.EXE")
 psi.RedirectStandardError = True
 psi.RedirectStandardOutput = True
 psi.CreateNoWindow = False
 psi.WindowStyle = ProcessWindowStyle.Normal
 psi.UseShellExecute = False
 psi.WorkingDirectory = "n:\invdat"
 Dim p As Process = Process.Start(psi)

这个程序启动一个字符库应用程序。 我想更改这个字符基础应用程序的字体。

我想通过单击左上角的应用程序图标并选择属性来重现更改

Answer 1

如果遗留程序使用标准输出，这可能有助于捕获输出。

        Dim start_info As New ProcessStartInfo("RoboCopy", sParams)
        start_info.UseShellExecute = False
        start_info.CreateNoWindow = True
        start_info.RedirectStandardOutput = True
        start_info.RedirectStandardError = True

        ' Make the process and set its start information.
        Dim proc As New Process()
        proc.StartInfo = start_info

        ' Start the process.
        proc.Start()

        ' Attach to stdout and stderr.
        Dim std_out As StreamReader = proc.StandardOutput()
        Dim std_err As StreamReader = proc.StandardError()

        ' Get the results.
        Dim sOut As String = std_out.ReadToEnd()
        Dim sErr As String = std_err.ReadToEnd()

然后，您可以在 Winform 中显示来自 sOut 的结果。