VBScript启动可能需要很长时间

Question

我遇到了一个奇怪的问题而且我不知道它的代码或平台是否相关。我写了一个非常简单的VBScript来让我的电脑进入休眠状态：

res=MsgBox("Hbernate ?",1,"Hibernate")
if(res=1) then 
    Dim wshShell
    Set wshShell = CreateObject("WScript.Shell")

    REM hibernate computer
    strResult = wshShell.Run("C:\Windows\SysWOW64\shutdown.exe /h")

end if

有时显示消息框可能需要10秒钟，有时会立即开始。

我的（相当旧的）PC（Win 8.1 x64）与我正在使用的所有其他程序一起运行顺畅，你知道是什么导致了这个问题或者如何解决这个问题？