怎么在VB6.0里用IE打开一个网页?

Question

我忘了怎么写代码?
请各位给我说一下吧!

Answer 1

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 Longret = ShellExecute(Me.hwnd, "open", Label2.Caption, "", strPath, 1)

Answer 2

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
ShellExecute Me.hWnd, "open", "http://www.csdn.net", vbNullString, vbNullString, SW_SHOW

Answer 3

第二种方法：Shell "explorer http://www.csdn.net"

Answer 4

Dim goweb As String
    goweb = "explorer.exe  " & "url" '在explorer.exe后面一定要加一两个空格
    Shell goweb, vbMaximizedFocus

Answer 5

Shell "rundll32.exe url.dll,FileProtocolHandler http://www.tsfigure.com.cn"