Cara Memasukkan Link Ke dalam Aplikasi - Visual Basic

Minggu, 03 November 2013

Pada kesempatan kali ini dari request teman-teman sekalian ^_^ saya akan memposting cara memasukkan link ke dalam aplikasi yang di buat melalui Visual Basic. Caranya cukup mudah berikut caranya:

Seperti biasa buka atau buat dulu projectnya pada visual basic
*caranya buka visual basic pilih Run Visual Basic kemudian pilih Standard EXE dan Open.

Kemudian setelah muncul silahkan klik 2x pada form / daerah yang abu2 :D dan masukkan kode berikut ke dalam " General "
*caranya pada kotak bagian ujung kiri bisa di ganti ke ( General ) jelasnya lihat screenshot berikut:








Setelah itu tetap pada bagian general masukkan kode 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
Private Declare Function SetWindowPos Lib "user32" (ByVal h As Long, ByVal hb As Long, ByVal X As Long, _
    ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal F As Long) As Long
Const SWP_NOMOVE = 2
Const SWP_NOSIZE = 1
Const flags = SWP_NOMOVE Or SWP_NOSIZE
Const HWND_TOPMOST = -1
Const HWND_NOTOPMOST = -2

Klik disini untuk COPY CEPAT

Pastikan semuanya sama seperti di bawah ini:


Setelah di pastikan sama close form codenya dan buat satu command button ( bebas pakai label juga boleh ) seperti ini tinggal di klik Command Button lalu di gambar ke dalam form :


Pastikan command button sudah anda buat, contoh seperti ini :


Kemudian klik 2x pada command1 dan masukkan kode berikut ke dalamnya tinggal di paste saja.

ShellExecute Me.hwnd, "Open", "http://www.kenhondar.blogspot.com", vbNullString, vbNullString, 3


*ganti tulisan yang berwarna merah dengan link yang agan mau.

Pastikan sama semuanya seperti ini setelah di paste:


Nah bagian Coding sudah selesai, sekarang kita ubah nama command1 nya menjadi nama yang agan mau caranya: klik pada command1 ingat kliknya 1x saja dan pada panel di samping bagian Caption hapus nama command1 dan ubah sesuai dengan nama yang agan mau.


Maka akan jadi seperti ini ^_^

Nah untuk mencobanya cukup mudah agan tinggal tekan tombol F5 pada keyboard agan dan lihat hasilnya ^_^
*untuk menyudahi mencobanya tinggal tekan tombol close saja pada aplikasi.

Untuk menjadikannya sebuah aplikasi permanent saya rasa belum cukup kalo cuma link saja hehe ^_^ tapi untuk caranya cukup mudah tinggal klik File " Make Project1.exe " agan bisa ganti namanya tapi ingat format [ .exe ]nya jangan di hapus ya..

Oke sekian dulu postingan saya kali ini jangan lupa lain kali berkunjung dan untuk supportingnya agan bisa follow twitter saya @kenhondar Terima Kasih :D

2 komentar :