如何关掉msgbox的提示框？

在调试脚本的时候，通常会用采用很多msgbox函数，但是这些提示框必须要手动关闭，否则脚本不会继续往下执行，你可以设计一个函数，在几秒钟之后自动关闭提示框吗？
答案：
Set WshShell = CreateObject(“Wscript.Shell”)
WshShell.Popup “请等待5秒钟，5秒后该窗口自动关闭”, 5, “Title”