Membuat Hyperlink Di Visual Basic

Bagi seorang Newbie pasti pernah terlintas pikiran tentang bagaimana cara membuat hyperlink pada visual basic..??

oke..seperti judul posting di atas kali ini saya akan memberikan sedikit pengetahuan bagi anda tentang hyperlink.

sebelumnya saya akan menjelaskan sedikit tentang Hyperlink.
HyperLink adalah, Bagian dari Web page yang menghubungkan Anda ke file lain, menyediakan seamless link (hubungan) ke file-file pada komputer lain. Biasa dikenal sebagai link. Mengklik hyperlink berarti mem-browse WWW dan mengunjungi berbagai lokasi baik d file web maupun file di komputer anda.

Untuk lebih jelasnya saya akan berikan source code untuk pembuatan Hyperlink. Berikut Sourcenya:

Persiapan:

• Siapkan 1 Buah Form


• Siapkan 2 Buah Command Button


• Berikan Name pada kedua CommandButton LInk dengan sebuah index


• Buat Deklarasi Function Pada General sebagai berikut :

Private 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

Const SW_SHOWNORMAL = 1


• berikan code seperti di bawah pada object CommandButton


Private Sub link_Click(Index As Integer)
Select Case Index
Case 0
result = ShellExecute(Me.hwnd, vbNullString, "http:\\www.anascode.blogspot.com", vbNullString, vbNullString, SW_SHOWNORMAL)
Case 1
result = Shell("rundll32.exe shell32.dll, Control_RunDLL", 5)

End Select
End Sub

di bawah ini adalah gambar dari project yang saya buat



Keterangan:
Ketika anda klik Button Anas Code maka anda akan masuk ke site www.anascode.blogspot.com
dan ketika anda klik button open control panel maka akan membuka control panel.

Untuk Contoh Projectnya anda bisa download disini.

Password : anascode

Semoga Bermanfaat ya.. ^.^

Posted in: source code vb