Jump to content
Search In
  • More options...
Find results that contain...
Find results in...

Hompage Button?


Smallbro
 Share

Recommended Posts

double click label and put```
OpenWebsite "URL HERE"
```then
```
Public Sub OpenWebsite(URL As String)
Dim ret&
ret& = ShellExecute(Me.hWnd, "Open", URL, vbNullString, vbNullString, SW_SHOW)
End Sub
```at the end of the frm you added the first code.
this somwhere in the frm

```
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
```
i think this is right for default browser not sure though
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

×
×
  • Create New...