Skapa ett program i Visual Basic: Webbläsare: 9 steg

2024 Författare: John Day | [email protected]. Senast ändrad: 2024-01-30 12:47

Den här instruktionsboken förklarar processen för att skapa en enkel webbläsarapplikation i VB. NETIt är utformat som en uppföljning till min första VB. NET Instructable: Skapa ditt första program i Visual Basic. Det rekommenderas att du läser igenom den instruerbara först, eftersom denna instruerbara förutsätter att du har en grundläggande kunskap om Visual Basic Express Edition -gränssnittet, som beskrivs i min andra instruerbara. Även om Visual Basic 2005 Express Edition fungerar bra för denna instruerbara, använder jag Visual Basic 2008 Express Edition, tillgänglig från Microsoft

Steg 1: Skapa projektet

Skapa ett nytt Windows Forms -projekt och kalla det webbläsare. Ändra storlek på formuläret efter eget tycke.

Steg 2: Lägg till kontrollerna och ändra egenskaper

Från verktygslådan drar du en textruta, en webbläsare och en knapp till formuläret. Placera dem som de är på bilden. Redigera sedan Anchor -egenskapen i TextBox och WebBrowser så att alla rutor runt den grå rutan (visas när du redigerar ankaregenskapen) väljs. Detta gör att kontrollerna kan "sträcka" sig när formuläret ändras. Gör samma sak för knappen, men ställ den bara till "Överst, höger". Ändra också egenskapen Text i Form1 till webbläsare, eller något liknande för att ändra titelfältet.

Steg 3: Kod

Dubbelklicka på Button1 och lägg till följande kod i redigeraren, efter "Private Sub" -raden och före "End Sub" -raden

WebBrowser1. Navigate (TextBox1. Text)Denna kod berättar helt enkelt för programmet: När någon klickar på Button1, Få WebBrowser att navigera till det som finns i TextBox1 That's It! Du har en fungerande webbläsare. Klicka på uppspelningsknappen för att testa den.

Steg 4: Mer saker

Nu trodde du inte att jag bara skulle ge dig en kodrad - eller hur? Under de närmaste stegen kommer vi att implementera följande:

• Adressfält som ändras när sidan ändras
• Bakåt, framåt och uppdatera knappar
• Statusfältet.

Steg 5: Adressfält

För närvarande visar allt adressfältet sidan du skriver in. Om du klickar på en länk återspeglas inte ändringen i adressfältet. För att åtgärda detta måste vi lägga till lite mer kod Gå tillbaka till designvyn, klicka på "Form 1.vb (Design)" och dubbelklicka sedan på WebBrowser -kontrollen. Det kommer att växla tillbaka till kodvyn, men det kommer att finnas lite mer kod där, märk att det står "WebBrowser1_DocumentCompleted", det här är koden vi vill ha, så vi behöver inte göra några ändringar här, men det finns ett tomt raden under den, före slutet Sub -satsen, och vi vill lägga till lite kod där. Skriv följande där

TextBox1. Text = WebBrowser1. Url. ToStringDetta berättar för programmet att när WebBrowser1_DocumentCompleted, bör vi ändra TextBox1. Text till WebBrowser1. Url. ToString finns där eftersom URL -egenskapen för webbläsaren som standard inte är samma datatyp (sträng) som behövs i vår textruta. ToString skriver URL: en till en sträng för TextBoxen.

Steg 6: Åtgärdsknappar

Byt tillbaka till designvyn och dra tre nya knappar till formuläret och placera dem. Ändra textegenskapen för varje: Button2 = Back, Button3 = Forward och Button4 = Refresh. Om du placerar dem som mina, justera ankaregenskapen för Uppdatera till toppen, högerklicka på knappen Tillbaka och skriv följande kod.

WebBrowser1. GoBack () Tillbaka till designen, dubbelklicka på Framåt och skriv

WebBrowser1. GoForward ()Designvy och dubbelklicka för att uppdatera

WebBrowser1. Refresh ()Testa webbläsaren och testa de nya funktionerna.

Steg 7: Statusfält

Tillbaka i designvyn, lägg till en etikett, ändra texten till "Loading …" (utan citattecken) Gå nu in i kodvy genom att klicka på fliken Form1.vb. Hitta posten WebBrowser1_DocumentCompleted och skriv under koden du placerade där tidigare

Label1. Text = "Klar"Klicka nu upp där koden säger DocumentCompleted. Flytta musen upp till de två listrutorna. Välj den andra (Den som säger DocumentCompleted) och välj Navigering. Sedan kommer en ny kod att visas - typ

Label1. Text = "Laddar"Detta ger bara en indikator när sidan laddas. Du kanske också vill ange etikettens ankaregenskap.

Steg 8: Komlet

Varsågod. Du har en fullt fungerande webbläsare. Fortsätt att anpassa det som du vill. Som i min första instruktion. Jag har lite läxor för dem som klarar detta instruerbara. Implementera följande:

• En hemmafunktion
• Ändra knappen Uppdatera till en stoppknapp när en sida laddas.

Jag hoppas att dessa projekt har visat dig hur enkelt det är att programmera!

Steg 9: Lösningar

För dem som slutförde min första VB instruerbar - jag har lösningarna för de läxor jag ställde in i slutet.

Ändra bakgrundsfärgen

Detta är enkelt - Ändra egenskapen BackColour i Form1 till en annan färg

Lägg till lite upphovsrättsinformation

En ny etikett med textegenskapen ändrad kommer att göra susen

Gör formuläret ändra storlek med bilden

Ändra AutoSize till True och AutoSizeMode till GrowAndShrinkDone! Kommer fortfarande: Jag kommer att skapa några fler VB. NET Instructables. Fortsätt kodning!