請問如何活用WebBrowser1.navigate.

Question

請問知識家VB程式設計的高手如何將下列(一)語法.改為(二)語法: (一).WebBrowser1.navigate "http://tw.yahoo.com/"(二).M_url = "http://tw.yahoo.com/"WebBrowser1.navigate  M_url註:URL使用變數的方式==== 可以作為自動依序讀取 EXCEL A欄的URL能夠用CALL來執行的 ====  CALL WebBrowser1.navigate  M_url請用一般模組[用中文程式名稱  SUB 我愛知識家()  END SUB]與一般按鈕[很方便複製來.複製去的那種]的方式[一點擊按鈕.就可開啟所需的URL] 目前使用IE7瀏覽器 EXCEL 2003 OFFICE 2003  XP 小麥來了(麥麥是也)尋找答案中……

匿名使用者 · Accepted Answer

看不懂你要的是什麼..?

1.URL使用變數的方式==== 可以作為自動依序讀取 EXCEL A欄的URL
--> 把儲存格的值放到navigate 後就好了; 你應該會基本的VBA吧?

2.能夠用CALL來執行的 ====  CALL WebBrowser1.navigate  M_url
--> 一定要用 Call function? function 裡也只有一行 WebBrowser1.nagigate 而已, 拆出來用function 有意義嗎?

2010-09-09 09:21:01 補充：
3.請用一般模組[用中文程式名稱  SUB 我愛知識家()  END SUB]與一般按鈕[很方便複製來.複製去的那種]的方式[一點擊按鈕.就可開啟所需的URL]
--> Sub 用中英文是個人自由, 別人提供程式, 你自己改一下就好了; 限定這個沒意義; 況且, sub name 用中文是不好的寫作習慣.

至於"有請問過專家 WebBrowser1.navigate 比 InternetExplorer.Application 還要底層.可能不好運作.佔用記憶體也更兇.2種語法差別很大" 云云, 也不知道是誤導你的, 不予置評

2010-09-10 14:41:26 補充：
'在表單上放上:
'一個 TextBox, name: txtURL
'一個 Button, name:cmdNavigatorTo
'一個 WebBrowser, name: WebBrowser1

'在button 的click 事件, 輸入下列程式碼

2010-09-10 14:41:33 補充：
Private Sub cmdNavigateTo_Click()
'使用者在TextBox輸入網址, 按下button , 程式將textbox 的值傳入變數(vURL), 然後WebBrowser 瀏覽該變數

Dim vURL As String
    vURL = txtURL.Text  
   
    WebBrowser1.Navigate vURL
    
End Sub

2010-09-17 23:24:08 補充：
我無法理解webbrowser 麻煩在哪, 也不了解為什麼你的電腦會連一個小小的vb 程式都"資源不足"; 不管用webbrowser 或是 internetExplorer.Application, 寫法都是一樣的

2010-09-17 23:24:44 補充：
'在表單上放上:
'一個 TextBox, name: txtURL
'一個 Button, name:cmdNavigatorTo
'一個 WebBrowser, name: WebBrowser1'在button 的click 事件, 輸入下列程式碼 Private Sub cmdNavigateTo_Click()
'使用者在TextBox輸入網址, 按下button , 程式將textbox 的值傳入變數(vURL), 然後WebBrowser 瀏覽該變數Dim vURL As String
vURL = txtURL.Text Set MyIE = CreateObject("InternetExplorer.Application")
With MyIE
.navigate vURL '就是要這個變數啦 
:
:End Sub

♡♡♡麥當勞來也♡♡ · Answer

我有問小肯啦
我剛學習
小肯學的比較久
請比照小肯的模式幫我
Set myIE = CreateObject("Internet Explorer.Application") 
.navigate  M_url
就像老師說的方式一樣 會一點點 應該是我要的答案
但不知

2010-09-09 17:20:06 補充：
WebBrowser1.navigate  M_url
可不可以 因為看的知識+題庫 把URL都訂的死死的 
不好活用
老師辦得到嗎
不行 就比照小肯的 
Dim MyIE As Object
Set MyIE = CreateObject("InternetExplorer.Application")
With MyIE
.Visible = False

2010-09-09 17:20:16 補充：
.navigate "http://tw.group.knowledge.yahoo.com/computer-computer/article/view?aid=1966"
修正成.navigate  M_url
而M_url如何在前一段 來宣告M_url
讓這2者串聯起來
小肯說會 但要我請老師教

2010-09-13 13:50:27 補充：
謝謝鄭老師
因為忙到今天才上線
抽空來測測
先延五天
等我

2010-09-17 12:00:23 補充：
WOW
WebBrowser太麻煩了 我的電腦資源又不足 只測下一個用法喔 這是老師傳給小肯的 我覺得比教簡單 老師可以可以把2個都回答一下 讓大家自己去挑選 
Public m_url         As String  
Set MyIE = CreateObject("InternetExplorer.Application")
With MyIE
.navigate m_url     '就是要這個變數啦

請問如何活用WebBrowser1.navigate.

2 個解答