Hvis du har brukt Internet Explorer , Firefox og Safari , og tenke at du kunne gjøre en bedre jobb på å gjøre en nettleser , gjør Visual Basic det mulig å bruke det innebygde WebBrowser kontroll . Instruksjoner
en
Lag et nytt prosjekt ved å klikke File New Project. Når du blir bedt , gi den navnet " SimpleWebBrowser . " Klikk "OK". Du vil se en blank GUI skjema
2
Dra følgende tre komponenter inn i GUI skjema fra verktøykassen til venstre : . Nettleser, TextBox , og Button . WebBrowser vil vise gjeldende webinnhold. Tekstboksen blir adresselinjen. Og Button vil være hva brukeren klikker for å laste inn nettsiden .
3
Dobbeltklikk på knappen . Dette vil flytte deg til kildekoden for programmet og lage en " button1_click "-funksjon. Lim inn følgende inni den : en
Private Sub button1_click ( ByVal avsenderen som System.Object , ByVal e Som System.EventArgs ) Håndtak Button1.Click
Prøv
WebBrowser1.Url = Ny Uri ( TextBox1.Text )
Catch ex As System.UriFormatException
WebBrowser1.Url = Ny Uri ( "http://" + TextBox1.Text )
Avslutt Prøv
End Sub
forsøk på å slå teksten i tekstboksen inn en webadresse. Hvis det mislykkes den prøver igjen, men forutsetter at brukeren var lat og slapp "http://" i adressen .
Du bør se en annen hendelse allerede i kildekoden som heter " Form_Load . " Lim inn følgende i det å gjennomføre en hjemmeside : en
Private Sub Form1_Load ( ByVal avsenderen som System.Object , ByVal e Som System.EventArgs ) Håndtak MyBase.Load
TextBox1.Text = " http://www.google.com "
WebBrowser1.Url = Ny Uri ( TextBox1.Text )
End Sub
WebBrowser er implementert, men det er fortsatt noen feil : . visningsruten for nettleseren endre størrelsen ikke når brukeren endrer størrelsen på vinduet
4
Klikk WebBrowser vise ruten i GUI skjemaet. Se i egenskaper vinduet nederst i høyre og finne ankeret eiendom. Klikk på drop -down boksen og klikk på pilene inntil alle fire piler er uthevet. Dette sikrer at WebBrowser visning ruten vil endre størrelse når brukeren endrer størrelsen på vinduet.