VB中怎麽單擊壹個按鈕就可以打開網頁？

用VB打開網頁有多種方法：

1)使用API函數。

Option?Explicit

Private?Declare?Function?ShellExecute?Lib?"shell32.dll"?Alias?"ShellExecuteA"?(ByVal?hWnd?As?Long,?ByVal?lpOperation?As?String,?ByVal?lpFile?As?String,?ByVal?lpParameters?As?String,?ByVal?lpDirectory?As?String,?ByVal?nShowCmd?As?Long)?As?Long

Private?Sub?Command1_Click()

ShellExecute?Me.hWnd,?"open",?"/",?"",?"",?1

End?Sub

2）使用Shell函數。

Private?Sub?Command1_Click()

Dim?RetVal

RetVal?=?Shell("C:\Program?Files\Internet?Explorer\iexplore.exe"?&?"?"?&?"www.baidu.com",?vbNormalFocus)

End?Sub

3）使用WebBrowser控件直接建立瀏覽器。

在 Visual Basic 裏還可以向工程中增加其它類型的 Internet 功能，包括：Visual Basic 應用程序的 Internet 擴展。可以使用壹些特殊控件，它們提供了和Internet 有關的功能。這些控件包括?

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

Private?Sub?Command1_Click()

WebBrowser1.Navigate?""

End?Sub

上一篇:ug10畫橢圓不完整

下一篇:請問用matlab怎麽解這個定積分方程組