VB怎么打開(kāi)網(wǎng)頁(yè) ?。?！謝謝

在Form1中添加Timer1控件。

目前成都創(chuàng)新互聯(lián)公司已為上1000家的企業(yè)提供了網(wǎng)站建設(shè)、域名、網(wǎng)絡(luò)空間、成都網(wǎng)站托管、企業(yè)網(wǎng)站設(shè)計(jì)、鑲黃網(wǎng)站維護(hù)等服務(wù)，公司將堅(jiān)持客戶(hù)導(dǎo)向、應(yīng)用為本的策略，正道將秉承"和諧、參與、激情"的文化，與客戶(hù)和合作伙伴齊心協(xié)力一起成長(zhǎng)，共同發(fā)展。

Private Sub Form_Load()

Timer1.Interval = 10000 '每個(gè)10000ms=10s打開(kāi)一次

End Sub

Private Sub Timer1_Timer()

Shell "explorer " '網(wǎng)址，你可以換成其他的。

End Sub

怎么用VB打開(kāi)網(wǎng)頁(yè)？

用VB打開(kāi)網(wǎng)頁(yè)有多種方法：

方法1)可用Shell函數(shù)執(zhí)行一個(gè)可執(zhí)行文件explorer.exe來(lái)打開(kāi)網(wǎng)頁(yè)。

Shell 函數(shù)，

執(zhí)行一個(gè)可執(zhí)行文件，返回一個(gè) Variant

(Double)，如果成功的話(huà)，代表這個(gè)程序的任務(wù) ID，若不成功，則會(huì)返回 0。

Private?Sub?Command2_Click()

Shell?"explorer.exe?"

End?Sub

方法2)使用WebBrowser直接建立瀏覽器。

在 Visual Basic 里還可以向工程中增加其它類(lèi)型的 Internet 功能，包括：

Visual Basic 應(yīng)用程序的 Internet 擴(kuò)展?？梢允褂靡恍┨厥饪丶?，它們提供了和Internet 有關(guān)的功能。這些控件包括

Internet Transfer 控件、 WebBrowser 控件，以及 WinSock 控件。

Private?Sub?Command1_Click()

WebBrowser1.Navigate?""

End?Sub

VB.net中如何使webborwser只在本身打開(kāi)網(wǎng)頁(yè)，不打開(kāi)IE？

private void button1_Click(object sender, EventArgs e){webBrowser1.Navigate(textBox1.Text); webBrowser1.DocumentCompleted += new WebBrowserDocumentCompletedEventHandler(webBrowser1_DocumentCompleted);}void webBrowser1_DocumentCompleted(object sender, WebBrowserDocumentCompletedEventArgs e){if (webBrowser1.Document != null){HtmlDocument myDoc = webBrowser1.Document; HtmlElementCollection hc = myDoc.Body.GetElementsByTagName("A"); foreach (HtmlElement he in hc){he.SetAttribute("target", "_self");}}}追問(wèn)： 能否寫(xiě)成VB.net語(yǔ)言？回答： 一樣的，只是處理DocumentCompleted事件，這個(gè)在屬性窗口就可以雙擊生成了追問(wèn)： 我真是對(duì)你無(wú)語(yǔ)了 Private Sub button1_Click(sender As Object, e As EventArgs) webBrowser1.Navigate(textBox1.Text) webBrowser1.DocumentCompleted += New WebBrowserDocumentCompletedEventHandler(AddressOf webBrowser1_DocumentCompleted)End SubPrivate Sub webBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) If webBrowser1.Document IsNot Nothing Then Dim myDoc As HtmlDocument = webBrowser1.Document Dim hc As HtmlElementCollection = myDoc.Body.GetElementsByTagName("A") For Each he As HtmlElement In hc he.SetAttribute("target", "_self")NextEnd IfEnd Sub追問(wèn)： 基本可以了，webBrowser1.DocumentCompleted += New WebBrowserDocumentCompletedEventHandler(AddressOf webBrowser1_DocumentCompleted)這一句貌似有問(wèn)題。還有就是點(diǎn)擊圖標(biāo)打開(kāi)百度HI時(shí)還會(huì)彈出IE。回答：

vb.net怎樣用代碼實(shí)現(xiàn)打開(kāi)網(wǎng)址

System.Diagnostics.Process.Start("")

或者用 WebBrowser控件，代碼 WebBrowser1.Url = New System.Uri("")

如何用VB做在原窗口打開(kāi)本地網(wǎng)頁(yè)

VB 主窗體菜單[工程]--[部件]，在控件列表找到 Microsoft Internet Controls ，把它前面的鉤打上。

然后控件欄就會(huì)出現(xiàn)一個(gè) WebBrowser 控件，添加這個(gè)控件到窗體，以下代碼打開(kāi)網(wǎng)頁(yè)

Private Sub Command1_Click()

Me.WebBrowser1.Navigate ("")

End Sub

vb.net 直接通過(guò)瀏覽器操作網(wǎng)頁(yè)

你說(shuō)的操作是像人一樣用鼠標(biāo)點(diǎn)擊網(wǎng)頁(yè)？

直接應(yīng)該是不行的，可以考慮先抓包分析數(shù)據(jù)包，在模擬瀏覽器發(fā)送請(qǐng)求獲取數(shù)據(jù)，然后進(jìn)行相應(yīng)處理