Voeg een TextBox aan de bovenkant van uw formulier . Noem het " adresbalk " en verander het is de tekst op " http://www.google.com " of elke andere standaard web- adres dat u wilt gebruiken . Kopen van 2

Voeg een knop naast de tekstvak . Noem het " GoButton " en verander het is tekst eigenschap in op " GO ".
3

Voeg de " WebBrowser " drukken om de lijst met onderdelen en sleept haar grenzen , zodat het de rest van de vullingen venster . Ga naar de lijst met eigenschappen aan de onderkant rechts van het scherm en vind de " Anchor " entry . Het leest " Top , Bottom . " Klik op het drop-down box om het te veranderen naar " Boven, Onder , Links, Rechts . " Dit zal ervoor zorgen dat uw webbrowser controle vult altijd het raam als de gebruiker verandert de grootte van het.

Vervolgens gaat u naar de eigenschap url van de webbrowser controle en verander het om te lezen " http://www.google . com . " Als u een andere standaard website in stap 1 gekozen , gebruik dat in plaats .
4

Dubbelklik op het " GoButton " u hebt gemaakt in stap 2 . Dit zal een gebeurtenis functie met de naam " GoButton_Click " te creëren en automatisch nemen u mee naar het. Plak de volgende code in het. De REM- lijnen beschrijven wat de code doet op elke regel :

REM
Reserveer wat geheugen naar een nieuwe URL.Dim url vasthouden Zoals Uri

REM
Probeer een URL te maken uit de tekst in Omschrijving bar.Tryurl = Nieuwe Uri ( AddressBar.Text )

REM
als de tekst in de adresbalk heeft geen zin als een URL , geven de gebruiker warningREM en dan vertel hen dat je gaat Google in plaats . Catch ex Zoals ExceptionMsgBox ( " Ongeldige URL . Going to Google plaats . " ) url = Nieuwe Uri ( " http://www.google.com " ) AddressBar.Text = " http://www.google.com " < br

End > Probeer

REM
Vertel de webbrowser component aan de URL.WebBrowser1.Url = url

openen