" . WebBrowser " Visual Basic 2008, herunder den gratis Express version skibe med en indbygget HTML rendering opkaldt komponent , passende nok , Dette tillader en udvikler , med næsten ingen programmering eller tid investering , for at skabe en webbrowser eller tillade deres anvendelse sit eget display HTML dokumentation. Ting du skal
Visual Basic 2008
Vis Flere Instruktioner
1

Tilføj et tekstfelt til toppen af ​​din formular . Name it " adresselinjen " og ændre det tekst til " http://www.google.com " eller andre standard web -adresse, du gerne vil bruge .
2

Tilføj en knap ved siden af textbox . Name it " GoButton " og ændre det tekst ejendom til " GO ".
3

Tilføj " WebBrowser " kontrol til komponenter listen og trække sine grænser , så det fylder resten af vindue . Gå til ejendomme listen nederst til højre side af skærmen og finde " Anchor " indrejse. Det vil læse " Top, Bund . " Klik på drop down boksen for at ændre det til " Top, Bund, Venstre, Højre ". Dette vil sikre, at din web browser kontrol altid fylder vinduet hvis brugeren tilpasser det.

Dernæst gå til Url ejendom web browser kontrol og ændre det til at læse " http://www.google . com ". Hvis du valgte en anden standard hjemmeside i trin 1 , skal du bruge det i stedet.
4

Dobbeltklik på " GoButton " du oprettede i trin 2 . Dette vil skabe en begivenhed funktion med navnet " GoButton_Click " og tage dig til det automatisk . Indsæt følgende kode ind i det. REM linjer beskrive, hvad koden gør på hver linje : Hej

REM Braklægning noget hukommelse til at afholde en ny URL.Dim url Da Uri

REM Prøv at oprette en URL fra teksten i adressen bar.Tryurl = Ny Uri ( AddressBar.Text )

REM Hvis teksten i adresselinjen ikke giver mening som en URL , give brugeren warningREM og så fortælle dem, at du kommer til at Google i stedet . Catch ex Som ExceptionMsgBox ( "Ugyldig webadresse. Går til Google i stedet. " ) url = Ny Uri ( " http://www.google.com " ) AddressBar.Text = " http://www.google.com " < br >

End Prøv

REM Fortæl webbrowser komponenten for at åbne URL.WebBrowser1.Url = url