how do i create a visual basic hyperlink in my VB interface

[latanf]

I'm having a hard time creating a web LINK on my VB interface. how can i accomplish this? please help

 

[paulbent]

I use a Label control with caption formatted blue and underlined. Find an icon that looks like a "hand" and set the MousePointer property to it. This code will open the url in the label caption in the default browser:

Private Sub lblURL_Click()

    Dim lngRtn As Long
    
    On Error GoTo ErrTrap
    
    lngRtn = Shell("rundll32.exe url.dll,FileProtocolHandler [URL unfurl="true"]http://"[/URL] & lblURL.Caption)
    
    GoTo ExitSub
    
ErrTrap:
    'General handler
    MsgBox "Error " & Format$(Err.Number, "#0") & " - message: " & _
    Err.Description & "." & vbCrLf & "Raised by object: " & Err.Source & ".", _
    vbCritical + vbOKOnly, "System Error"
    Resume ExitSub
    
ExitSub:
    
End Sub

Paul Bent
Northwind IT System

http://www.northwindit.co.uk