Membuat Link dari Visual basic 6 ke internet

Link yang menghubungkan dari vb ke internet biasanya dibutuhkan ketika kita membuat form "about" yang didalamnya berisi tentang profil sang developer atau bahkan profil tentang diri kita sendiri di dunia maya seperti alamat FB, Twitter dll 

untuk itu saya membuat sebuah tutorial cara membuat link ini,

langkah pertama tennunya buka Microsoft Visual basic 6 dan pilih standard.exe

tambahkan satu label dan tuliskan caption terserah anda

kemudian ketik/paste code berikut pada General

      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 2 kali pada label dan ketikan kode berikut

ShellExecute Me.hwnd, "Open", "http://twitter.com/yusuffirdaus293", vbNullString, vbNullString, 3

selanjutnya Run dngan menekan F5 pada keyboard

semoga bisa membantu.

share this article to: Facebook Twitter Google+ Linkedin Technorati Digg

Posted by Unknown, Published at 08.48 and have 0 komentar