Set WshShell = WScript.CreateObject ("WScript.Shell") Name = InputBox("Write your name below","Hello!","Type your name here") x=MsgBox ("Hi " & Name & " !",0+16,"Hi!") WScript.sleep 5 x=msgbox ("Hello" ,1+32) WScript.sleep 5 x=msgbox ("Hello" ,2+48) WScript.sleep 5 x=msgbox ("Hello" ,3+64) WScript.sleep 5 x=msgbox ("Hello" ,4) WScript.sleep 5 x=msgbox ("Hello" ,5) WScript.quit [IntError code]