How to Shell out to default web browser

Kita dapat Memanggil default browser kemudian menjalankan Url yang kita inginkan.

Cara menjalankan code:

'Paste code ini pada Module
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
Public Const conSwNormal = 1

'Paste code ini pada CommanButton
ShellExecute hwnd, "open", "http://oom-vb.blogspot.com", vbNullString, vbNullString, conSwNormal