Opprette et program i Visual Basic: Nettleser: 9 trinn

2024 Forfatter: John Day | [email protected]. Sist endret: 2024-01-30 11:26

Denne instruksen forklarer prosessen med å lage et enkelt nettleserprogram i VB. NET Det er designet som en oppfølging av min første VB. NET Instructable: Opprette ditt første program i Visual Basic. Det anbefales at du leser gjennom instruksjonene først, ettersom denne instruksjonsboken forutsetter at du har grunnleggende kunnskap om Visual Basic Express Edition -grensesnittet, som dekket i min andre instruerbare. Selv om Visual Basic 2005 Express Edition fungerer bra for denne instruerbare, bruker jeg Visual Basic 2008 Express Edition, tilgjengelig fra Microsoft

Trinn 1: Lag prosjektet

Opprett et nytt Windows Forms -prosjekt, og kall det nettleser. Endre størrelsen på skjemaet til din smak.

Trinn 2: Legg til kontrollene og endre egenskaper

Dra en tekstboks, nettleser og en knapp fra verktøykassen til skjemaet. Plasser dem som de er på bildet. Rediger deretter ankeregenskapen til tekstboksen og nettleseren slik at alle boksene rundt den grå firkanten (vises når du redigerer ankeregenskapen) velges. Dette gjør at kontrollene kan "strekke" seg når skjemaet endres i størrelse. Gjør det samme for knappen, men sett den bare til "Topp, høyre". Endre også tekstegenskapen til Form1 til nettleser, eller noe lignende for å endre tittellinjen.

Trinn 3: Kode

Dobbeltklikk på Button1, og legg til følgende kode i editoren, etter "Private Sub" -linjen og før "End Sub" -linjen

WebBrowser1. Navigate (TextBox1. Text)Denne koden forteller ganske enkelt programmet: Når noen klikker på Button1, får du WebBrowser til å navigere til det som er i TextBox1 That's It! Du har en fungerende nettleser. Klikk på play -knappen for å teste den.

Trinn 4: Mer ting

Nå trodde du ikke at jeg bare skulle gi deg en kodelinje - gjorde du? I løpet av de neste trinnene vil vi implementere følgende:

• Adresselinje som endres etter hvert som siden endres
• Tilbake, frem og oppdater knappene
• Statuslinjen.

Trinn 5: Adresselinje

For øyeblikket viser alt ut adressefeltet siden du skriver inn. Hvis du klikker på en lenke, gjenspeiles ikke endringen i adressefeltet. For å fikse dette må vi legge til litt mer kode Gå tilbake til designvisningen, klikk på "Form 1.vb (Design)" og dobbeltklikk deretter på WebBrowser -kontrollen. Det vil bytte tilbake til kodevisningen, men det vil være litt mer kode der, legg merke til at det står "WebBrowser1_DocumentCompleted", dette er koden vi vil ha, så vi trenger ikke gjøre noen endringer her, men det er et tomt linjen under den ene, før End Sub -setningen, og vi vil legge til litt kode der. Skriv inn følgende der

TextBox1. Text = WebBrowser1. Url. ToStringDette forteller programmet at når WebBrowser1_DocumentCompleted, bør vi endre TextBox1. Text til WebBrowser1. Url. ToString er der fordi URL -egenskapen til nettleseren som standard ikke er den samme datatypen (strengen) som nødvendig i tekstboksen vår. ToString skriver nettadressen til en streng for TextBox.

Trinn 6: Handlingsknapper

Bytt tilbake til designvisning og dra 3 nye knapper til skjemaet og plasser dem. Endre tekstegenskapen for hver: Button2 = Back, Button3 = Forward og Button4 = Refresh. Hvis du plasserer dem som mine, justerer du ankeregenskapen til Refresh to Top, Høyreklikker på Tilbake -knappen og skriver inn følgende kode.

WebBrowser1. GoBack () Tilbake til design, dobbeltklikk Fremover og skriv

WebBrowser1. GoForward ()Designvisning, og et dobbeltklikk for å oppdatere

WebBrowser1. Refresh ()Test nettleseren, og prøv de nye funksjonene.

Trinn 7: Statuslinje

Tilbake i designvisning, legg til en etikett, endre teksten til "Laster inn …" (uten anførselstegn) Gå nå inn i kodevisning ved å klikke på kategorien Form1.vb. Finn WebBrowser1_DocumentCompleted -oppføringen og skriv under koden du plasserte der tidligere

Label1. Text = "Ferdig"Klikk nå opp der koden sier DocumentCompleted. Beveg musen opp til de to nedtrekksboksene. Velg den andre (Den som sier DocumentCompleted) og velg Navigering. Deretter vil en ny kode vises - typ

Label1. Text = "Laster"Dette gir bare en indikator når siden lastes inn. Det kan også være lurt å angi ankeregenskapen til etiketten.

Trinn 8: Kompet

Der går du. Du har en fullt fungerende nettleser. Fortsett å tilpasse det som du ønsker. Som i min første instruks. Jeg har lekser for de som fullfører denne instruksen. Implementer følgende:

• En hjemmefunksjon
• Endre Oppdater -knappen til en Stopp -knapp når en side lastes inn.

Jeg håper at disse prosjektene har vist deg hvor enkelt det er å programmere!

Trinn 9: Løsninger

For de som fullførte min første VB instruerbare - jeg har løsningene for leksene jeg satte til slutt.

Endre bakgrunnsfargen

Dette er enkelt - Endre egenskapen BackColour i Form1 til en annen farge

Legg til litt opphavsrettsinformasjon

En ny etikett med tekstegenskapen endret vil gjøre susen

Gjør skjemaet endre størrelse med bildet

Endre AutoSize til True og AutoSizeMode til GrowAndShrinkDone! Fremover: Jeg skal lage noen flere VB. NET Instructables. Fortsett koding!