objIE.Document.body.innertext如何工作？

Question

我试图了解objIE.Document.body.innertext的工作原理。从我所读到的，它几乎就像CTRL+C，然而，我正试图让它发挥作用，并且缺少某些东西。这是代码：

Dim objIE
Dim strPrintText

Set objIE = CreateObject("InternetExplorer.Application")

objIE.Navigate "www.bing.com"
strPrintText = objIE.Document.body.innertext

msgbox(strPrintText)

Answer 1

您必须等到浏览器准备就绪（并且在调用Sub时不使用param list（））：

Dim objIE
Dim strPrintText

Set objIE = CreateObject("InternetExplorer.Application")

objIE.Navigate "www.bing.com"

Do Until objIE.readyState = 4 : Wscript.Sleep 10 : Loop

strPrintText = objIE.Document.body.innertext

msgbox strPrintText

请参阅this for background。

子调用中的WRT参数列表（）

>> MsgBox "No param () when calling a Sub!", vbOkOnly
>>
>> MsgBox("No param () when calling a Sub!", vbOkOnly)
>>
Error Number:       1044
Error Description:  Cannot use parentheses when calling a Sub
>>
>> MsgBox "Do you believe me now?", vbOkOnly

理论/理由cf this;在讨论编程规则时（或道德规范：偷窃工作正常，只要你没有被抓住），反思“它有效”的优点。