タイプライターのように同じ行に書き込む方法は？

Question

私はタイプライターのようなものをシミュレートするために、このハイブリッド[バッチ/ VBScriptの]（inspired by this code）

を書きました！

しかし、タイプライターのように同じ行に書き込む方法がわかりません。

@echo off 
Set Message=Hi ! StackOverFlow ! 
@cScript.EXE //noLogo "%~f0?.WSF" "%Message%" //job:info %~nx0%* 
pause 
<job id="info"> 
<script language="VBScript"> 
strText=wscript.arguments(0) 
intTextLen = Len(strText) 
intPause = 100 
For x = 1 to intTextLen 
    strTempText = Mid(strText,x,1) 
    wscript.echo strTempText 
    WScript.Sleep intPause 
    If intPause <= 500 Then 
     intPause = intPause + 100 
    Else 
     intPause = 100 
    End If 
Next 
</script> 
</job> 

Answer 1

ストリームはStdOutストリームに書き込む必要があります。

str = "hello world!" 
For i = 1 To Len(str) 
    WScript.StdOut.Write Mid(str, i, 1) 
    WScript.Sleep 50 
Next