[エディットボックスを使う]

『名前』を入力するテキストボックスを表示します。

【ソースコード】
[tips0053.vbs]
Option Explicit

Dim strName     ' 入力した名前

strName = InputBox("名前を入力してください。", , "名無し")
If strName <> "" Then
    WScript.Echo "あなたの名前は「" & strName & "」さんですね。"
Else
    WScript.Echo "お名前を教えてください。"
End If

【実行結果】
C:\> cscript //NoLogo tips0053.vbs
あなたの名前は「名無し」さんですね。