Busy Property Example
In order to understand this example completely, run this code twice - firstly by commenting the 3 lines above msgbox line and secondly by un-commenting these 3 lines.
strLink= "http://www.google.com"
Set objIExplorer = CreateObject("internetexplorer.application")
objIExplorer.visible = True
objIExplorer.navigate strLink
Do While objIExplorer.Busy
WScript.Sleep 1000
Loop
Msgbox "Hi"
See all Methods & Properties of InternetExplorer Object here.