Set objShell = CreateObject("Wscript.Shell")
For i=0 To 10
cmd = "%comspec% /k echo domythingi=" & i & " >>a.txt && exit"
objShell.Run(cmd) ,vbhide
Next
说明: >> 是 DOS 下的输出重定向符号, && 是执行组合命令
转载于:https://www.cnblogs.com/infozero/archive/2009/01/15/1376346.html