截取VB表單中WebBrowser控制項中之文字內容
如何截取VB表單裡WebBrowser控制項中之文字內容?
' WebBrower ( 設定使用 Microsoft Internet Controls 元件 )
' 使用 Navigate 方法瀏覽網頁
WebBrowser.Navigate "http://www.wretch.cc/blog/PowerHammer" ' URL 網址
' 使用 ExecWB 方法執行命令
WebBrowser.ExecWB OLECMDID_SELECTALL,OLECMDEXECOPT_DONTPROMPTUSER ' 全選
WebBrowser.ExecWB OLECMDID_COPY, OLECMDEXECOPT_DONTPROMPTUSER ' 複製
' 使用 Clipboard 物件 (剪貼簿) , GetText 方法 ( 預設引數為 vbCFText )
MsgBox Clipboard.GetText ' 取得網頁文字內容