HOWTO: Use the WebBrowser Control from Visual Basic 5.0

• Control Creation and Enterprise Editions of Microsoft Visual Basic for Windows, version 5.0

SUMMARY

Microsoft Internet Explorer 3.0 includes a custom ActiveX control called "WebBrowser." When you use WebBrowser in combination with Microsoft Visual Basic 5.0, you can design powerful custom solutions that include Internet Web browsing features. This article illustrates how to use the WebBrowser control within Microsoft Visual Basic 5.0.

MORE INFORMATION

The following example creates a mini-browser:

1. Create a new Standard .exe project in Microsoft Visual Basic 5.0. Form1 is added automatically.

2. On the Project menu, click Components.

3. Select the Microsoft Internet Controls component. Click OK.

4. Add the following controls to Form1:

      Control           Name
      --------------    ---------
      Text Box          Text1
      Command Button    Command1
      WebBrowser        WebBrowser1
   
   

5. 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
   
   

6. On the File menu, click Save Project1.

7. On the Run menu, click Start.

NOTE: Distribution of a Microsoft Visual Basic 5.0 application that uses the WebBrowser control requires that Microsoft Internet Explorer 3.0 (or later) be installed on the target system prior to installation.

REFERENCES

For additional information, please see the following article in the Microsoft Knowledge Base: