Senin, 05 Agustus 2013
0 komentar

Cara 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.. ^.^

0 komentar:

Poskan Komentar

 
Toggle Footer
Top