请教一个用jquery解析HTML文档遇到的问题. - 编程论坛

在VBA环境中,用下列代码执行jquery函数,获取<P>的文本内容.为什么第一次运行下列代码,始终结提示错误,而以后都能正常运行?请问有没有解决办法.

程序代码：

Sub jq()
    Set oDom = CreateObject("htmlfile")
    oDom.write "<script  src='http://www.'></script>"
    oDom.write "<div><p>这是 div 中的一个段落。</p></div>"
    MsgBox oDom.parentWindow.eval("$('div p').first().text()")
End Sub