如何制作将输出打印到命令提示符的 VB6 控制台应用程序

How to make VB6 console application which prints output to the command prompt

我想制作命令行 VB6 应用程序,将其结果打印到命令提示符(类似于 C 中的 printf)。但是,找到的 none 个解决方案对我不起作用。

我有 VB6 SP6,Windows7 x64。

我试过了 How to write to a debug console in VB6? 适应这一点,但在这一行

Public SIn As Scripting.TextStream

编译器returns错误:未定义用户定义类型

为什么这不起作用?有办法吗?

我更喜欢 API 解决方案(独立于系统)。

最好的解决方案是位于 http://vb.mvps.org/samples/Console/ 的 Karl E. Peterson 的代码,它具有完整的源代码、交互式调试、多个示例和许多其他强大的功能。无需编写脚本。

但是如果你制作了一个 EXE 文件(当然你会!),绝对有必要修复 生成的 EXE(解释和手册在同一个 Peterson 的页面上),即在 EXE header.
中设置 PE 位 否则,如果EXE中有任何输入等待,EXE将进入死循环,永远不会return(但在command-prompt中看起来像完成了,因为有提示)。如果您尝试多次启动 EXE,您会看到这些 never-ending 个进程填充在任务 Manager/Processes)。