Wednesday 19 December 2012

Cara Membuat Link Pada Visual Basic

Hay gan sekarang aku Frkom10 mau membuat/ memasukan alamat Link Web dengan Visual Basic
Pertama kita harus punya yang namanya Microsoft Visual Basic Di Komputer/ Laptop anda.
Jika Belum Punya VB nya silahkan anda Download dulu VB nya.
Nah klau yang udah punya kita langsung sajah buat Link dengan VB.
Langkah pertama Buka dulu Visual Basicnya, dengan cara klik Start > All Programs> Microsoft Visual Basic.
Langkah kedua kita buat lembat baru/ Project dengan Klik File New Project> Pilih Setandar.EXE
Langkah ketiga. Buat tampilanya seperti di bawah ini dengan menggunakan 3 Komponent.
Label ( A)
Command Button ([])
Frame ([])


Kalau sudah membuat tampilan Seperti Gambar di atas, kita lanjutkan lagi dengan memasukan Codingnya.
Klik View Code, di sebelah kanan atas, tampilan VB anda yang gambar kotak kecil.
Setelah itu masukan kode di bawah ini, kode Ini adalah untuk mengaktifkan “Shell”.
Private Declare Function shellexecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal IpOperation As String, ByVal IpFile As String, ByVal IpParameters As String, ByVal IpDirectory As String, ByVal nShowCmd As Long) As Long
Dim X As String

Setelah itu masukan lagi code di  bawah ini, code ini untuk memanggil “shell” .
Sub buka()
Dim link As Long
link = shellexecute(0, vbNullString, X, "", "", vbNormalFocus)
End Sub

Dan koding berikutnya adalah untuk memanggil alamat link yang anda tuju.
Pertama Doblle klik pada commandButton 1. Masukan koding di bawah.
Private Sub Command1_Click()
X = "http://google.com/"
Call buka
End Sub
Kedua Doblle Klik Pada CommandButton2. Lalu masukan koding di bawah ini.
Private Sub Command2_Click()
X = "http://Frkom10.blogspot.com/"
Call buka
End Sub
Dan selesai juga kita membuatnya Cara Membuat Alamat Link Pada Visual Basic.
Jika ingin tau atau ingin jelasnya, silahkan Download Programnya yang telah FR Buat tdi. Klik Disini.
SEMOGA BERMANFAAT>>>
Terimakasih Kesumuanya ….????
By: FRKOM10. (FaRid).