请教大佬，怎样把程序运行结果输出到当前的cmd窗口

我用的是VB6，已经打开了一个cmd 窗口，想在这个窗口上显示程序的运行结果（比如hello word），具体该怎样实现，求教
我现在是这样写的：
Set w = CreateObject("wscript.shell")
w.run "cmd /c echo " & "hello" & "&pause"
w.run "cmd /c echo " & "world" & "&pause"
但是这样做的话，每执行一句都会打开一个新的cmd窗口，并且不加pause的话，窗口会自动关闭，应该怎样修改呢？

在线等

我記得控制臺應用可以添加窗體的吧？

可以用批处理文件
在程序目录下新建一个文本文档,
打开, 输入:
@璐村惂鐢ㄦ埛_000076K馃惥 off
echo hello
echo world
pause
把文件重命名为print.bat
再把VB的代码改成w.run "print.bat"
就OK了

Open App.Path & "\Demon.bat" For Output As 1
Print #1, "@璐村惂鐢ㄦ埛_000076K馃惥 off"
Print #1, "echo hello"
Print #1, "echo world"
Print #1, "pause"
Close #1
Shell App.Path & "\Demon.bat"

你用模拟按键在你的cmd窗口输入不就得了.

其实调用一次cmd，就可以执行多个命令（用&符号），另外VB6自带了shell函数，根本不需要再去调用wscript。
shell "cmd /c & " & _
"echo hello & " & _
"echo world & " & _
"pause"

扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！

11回复贴，共1页

<<返回vb吧

分享到:

日	一	二	三	四	五	六