ＨＰの読み込み完了まで待つには？ (ID:91843)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 4はREADYSTATE_COMPLETE定数の値で、Obj.ReadyStateが取る値です。 なので Do While Obj.ReadyState <> 4 DoEvents Loop または Do Until Obj.ReadyState = 4 DoEvents Loop となります。 Obj.Document.ReadyStateが取る値は文字列なので Do While Obj.Document.ReadyState = 4 DoEvents Loop とした場合は、ReadyStateが数値4になることはありませんので Loopを一度も回りません。 Do While Obj.Document.frames(1).Document.ReadyState = 4 DoEvents Loop これも Do While Obj.Document.frames(1).Document.ReadyState <> "complete" DoEvents Loop または Do Until Obj.Document.frames(1).Document.ReadyState = "complete" DoEvents Loop ですね。 ReadyStateが"complete"じゃない間Loopするか、"complete"になるまで Loopする訳です。