如何实现用vb访问一个url?

偶想在vb里连接一个url,基本上只要知道能不能连上就行了
谁能告诉我如何写代码?
[47 byte] By [wowbear-斐冷翠的科斯塔] at [2008-4-11]
# 1
Open App.path & "\temp.url" For Output As #1
Print #1, " [InternetShortcut] "
Print #1, "URL=" & Me.labWebSite.Caption
Close #1
Dim IRetVal As Long
Dim IWindow As Long
IRetVal = ShellExecute(IWindow, "open", App.path & "\temp.url", "", "", SW_SHOWNORMAL)
GoldFox-金色狐狸 at 2007-10-26 > top of Msdn China Tech,visual basic,基础类...