This article was previously published under Q162719
Retired KB Content Disclaimer
This article was written about products for which Microsoft no longer offers support. Therefore, this article is offered "as is" and will no longer be updated.
Microsoft Internet Explorer 3.0 includes a custom ActiveX control called"WebBrowser." When you use WebBrowser in combination with Microsoft VisualBasic 5.0, you can design powerful custom solutions that include InternetWeb browsing features. This article illustrates how to use the WebBrowsercontrol within Microsoft Visual Basic 5.0.
The following example creates a mini-browser:
Create a new Standard .exe project in Microsoft Visual Basic 5.0. Form1 is added automatically.
On the Project menu, click Components.
Select the Microsoft Internet Controls component. Click OK.
Add the following controls to Form1:
Control Name -------------- --------- Text Box Text1 Command Button Command1 WebBrowser WebBrowser1
In Form1's code window, add the following code:
Option Explicit Private Sub Command1_Click() If Text1.Text <> "" Then WebBrowser1.Navigate Text1.Text If WebBrowser1.Visible = False Then WebBrowser1.Visible = True End If End If End Sub Private Sub Form_Load() Me.Width = 5325 Me.Height = 5400 Me.Caption = "Mini browser" With WebBrowser1 .Visible = False .Width = 4575 .Height = 3375 .Top = 600 .Left = 240 End With With Text1 .Top = 240 .Left = 1680 .Height = 285 .Width = 3135 .Text = "http://www.microsoft.com" End With With Command1 .Top = 120 .Left = 240 .Height = 375 .Width = 1215 .Caption = "Navigate" .Default = True End With End Sub
On the File menu, click Save Project1.
On the Run menu, click Start.
When you click Navigate, the WebBrowser appears and automatically loads theURL displayed in the TextBox.
NOTE: Distribution of a Microsoft Visual Basic 5.0 application that usesthe WebBrowser control requires that Microsoft Internet Explorer 3.0 (orlater) be installed on the target system prior to installation.
For additional information, please see the following article in theMicrosoft Knowledge Base: