• Home
 · 
• Internet/HTML
 · 
• This Code Will Allow You To Launch a Webpage With 1 Textbox & 1 Command Button Only 2 Lines Of Code

This Code Will Allow You To Launch a Webpage With 1 Textbox & 1 Command Button Only 2 Lines Of Code

This Code Will Allow You To Launch a Webpage With 1 Textbox & 1 Command Button Only 2 Lines Of Code

API Declarations


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



Rate This Code Will Allow You To Launch a Webpage With 1 Textbox & 1 Command Button Only 2 Lines Of Code

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

'Paste This Code In The Code Window
'Create A Textbox And Name It Text1
'Create A CommandButton And Name It Command1


Private Sub Command1_Click()
Me.WindowState = vbMinimized 'This Hides / Minamize's IBM Wordpad
ShellExecute GetActiveWindow(), "Open", Text1.Text, "", 0&, 1 
End Sub

Private Sub Form_Load()
Text1.Text = "www.homebuiltcomputers.tk"
End Sub