Easily lets you add a link from you VB application or open default email program.
Original Author: Ej Jones
Inputs
textbox
Assumptions
Follow these instructions and you should have no problems.
1. Open new project
2. Place two text boxes on the form
3. Place two command buttons on form
4. Copy and paste code on form
Returns
Open specific web site, or default email
Code
Private Sub Command1_Click()
Dim x
x = Shell("start.exe " & Text1, 0)
End Sub
Private Sub Command2_Click()
Dim x
x = Shell("start.exe mailto:" & Text1, 0)
End Sub