Cara membuka link dan email di visual basic

Seperti dengan judulnya yaitu cara membuka link atau email di dalam form dengan visual basic .
Caranya tidak rumit, hanya menggunakan windows api, tapi saya akan saya kasih tau caranya ..

Nah, langkah pertama kita buka microsoft visual basic, standard exe .
buat sebuah module dengan nama modShellExecute .
Isikan code ini pada module :

Option Explicit

'''''''''''''''''''''''''''''''''''
'   Mulai Coding '

'''''''''''''''''''''''''''''''''''

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

'Batas Coding

Nah, sekarang kita langsung ke fungsinya, yaitu membuka link ..
'Buat sebuah command button
isikan code ini pada command button tadi .

  Dim ret&
  ret& = ShellExecute(Me.hwnd, "Open", "http://visualbasicfree.blogspot.com", "", App.Path, 1)

 Note: Untuk tulisan yang berwarna hijau, itu merupakan link yang ingin kita buka, jadi silahkan di ubah sama sobat .

Itu saja tutorial saat ini .
Terima Kasih .
Semoga Bermanfaat ..