怎樣實(shí)現(xiàn)在VB窗體中有Html頁面

字號(hào):

在您的代碼中,您首先調(diào)用了WebBrowser1.Navigate "about:blank",此時(shí)Webbrowser開始獲取”about:blank”頁,此時(shí)webbrowser并不等待這條命令的返回而直接運(yùn)行下面的語句,當(dāng)?shù)谝痪浞祷匾院螅琖ebbrowser將再次變成blank,這就是為什么您的代碼不起作用的原因。
    您只需要將在執(zhí)行第一句語句的以后通過判斷WebBrowser1的Busy屬性,如果為假則表示頁面已經(jīng)完全打開,然后再繼續(xù)執(zhí)行以下您自己的語句就可以了。注意您需要通過DoEvents語句讓系統(tǒng)有時(shí)間執(zhí)行打開頁面的操作,請參考以下代碼:
    WebBrowser1.Navigate "about:blank"
    Do While (WebBrowser1.Busy = True)
     DoEvents
     Loop