Ссылка на сайт!?

[Flex]

Как сделать в VB6 URLссылку на сайт??
В любых примерах хоть с лейбла, кто знает пишите всё.. 8о)

[val]

Public 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


Dim lRet As Long

lRet = ShellExecute(0, "open", "www.vbstreets.ru", "", vbNull, SW_SHOWNORMAL)

[A.A.Z.]

Ты забыл!

Код: Выделить всё

Const SW_SHOWNORMAL As Long = 1