Programos kūrimas naudojant „Visual Basic“: žiniatinklio naršyklė: 9 veiksmai
Programos kūrimas naudojant „Visual Basic“: žiniatinklio naršyklė: 9 veiksmai

Turinys:

Anonim

Ši instrukcija paaiškina paprastos žiniatinklio naršyklės programos kūrimo procesą VB. NET. Jis sukurtas kaip tolesnis mano pirmasis „VB. NET Instructable“: pirmosios programos kūrimas naudojant „Visual Basic“. Rekomenduojama pirmiausia perskaityti tą instrukciją, nes šioje instrukcijoje daroma prielaida, kad turite pagrindinių žinių apie „Visual Basic Express Edition“sąsają, kaip aprašyta mano kitoje instrukcijoje. Nors „Visual Basic 2005 Express Edition“puikiai tinka šiam nurodymui, aš naudoju „Visual Basic 2008 Express Edition“, prieinama iš „Microsoft“

1 žingsnis: sukurkite projektą

Sukurkite naują „Windows“formų projektą ir pavadinkite jį žiniatinklio naršykle. Pakeiskite formos dydį pagal savo skonį.

2 veiksmas: pridėkite valdiklius ir pakeiskite ypatybes

Įrankių juostoje vilkite TextBox, WebBrowser ir A mygtuką į formą. Padėkite juos taip, kaip jie yra paveikslėlyje. Tada redaguokite „TextBox“ir „WebBrowser“ypatybę „Inkaras“, kad būtų pažymėti visi langeliai aplink pilką kvadratą (rodomi redaguojant inkaro ypatybę), todėl valdikliai gali „ištempti“keičiant formos dydį. Padarykite tą patį su mygtuku, bet nustatykite jį tik į „Viršų, į dešinę“. Taip pat pakeiskite Form1 teksto ypatybę į žiniatinklio naršyklę arba kažką panašaus, kad pakeistumėte pavadinimo juostą.

3 žingsnis: kodas

Dukart spustelėkite mygtuką 1 ir pridėkite šį kodą prie redaktoriaus po eilutės „Privatus antraštė“ir prieš eilutę „Pabaigos antraštė“

WebBrowser1. Navigate (TextBox1. Text)Šis kodas tiesiog pasako programai: Kai kas nors spustelės mygtuką 1, gaukite „WebBrowser“, kad galėtumėte pereiti prie bet kurios „TextBox1“esančios informacijos! Turite veikiančią interneto naršyklę. Spustelėkite paleidimo mygtuką, kad jį išbandytumėte.

4 žingsnis: daugiau dalykų

Dabar jūs nemanėte, kad aš jums duosiu tik vieną kodo eilutę - ar ne? Per kelis kitus veiksmus mes įgyvendinsime šiuos veiksmus:

  • Adreso juosta, kuri keičiasi keičiantis puslapiui
  • Atgal, pirmyn ir atnaujinimo mygtukai
  • Būsenos juosta.

5 žingsnis: adresų juosta

Šiuo metu visa adreso juosta rodo puslapį, kurį įvedate; jei spustelite nuorodą, pakeitimas neatsispindi adreso juostoje. Norėdami tai išspręsti, turime pridėti dar vieną kodąGrįžkite į dizaino rodinį, spustelėkite „Forma 1.vb (dizainas)“, tada dukart spustelėkite „WebBrowser“valdiklį. Jis grįš į kodo rodinį, tačiau ten bus dar keli kodai, pastebėkite, kad sakoma: „WebBrowser1_DocumentCompleted“, tai yra kodas, kurio norime, todėl mums nereikia atlikti jokių pakeitimų, bet yra tuščias eilutę po tuo, prieš „End Sub“sakinį, ir mes norime ten pridėti kodą. Ten įveskite toliau nurodytą informaciją

TextBox1. Text = WebBrowser1. Url. ToStringTai nurodo programai, kad kai „WebBrowser1_DocumentCompleted“, turėtume pakeisti „TextBox1. Text“į „WebBrowser1. Url“. ToString yra, nes pagal numatytuosius nustatymus žiniatinklio naršyklės URL nuosavybė nėra tas pats duomenų tipas (eilutė), kaip to reikia mūsų teksto laukelyje. „ToString“įrašo URL į „TextBox“eilutę.

6 veiksmas: veiksmų mygtukai

Grįžkite į dizaino rodinį ir vilkite 3 naujus mygtukus į formą ir padėkite juos. Pakeiskite kiekvieno teksto ypatybę: Button2 = Atgal, Button3 = Pirmyn ir Button4 = Atnaujinti. Jei juos išdėstysite kaip mano, sureguliuokite atnaujinimo inkaro ypatybę į viršų, dešiniuoju pelės mygtuku spustelėkite mygtuką Atgal ir įveskite šį kodą.

WebBrowser1. GoBack () Grįžę prie dizaino, dukart spustelėkite Pirmyn ir tip

WebBrowser1. GoForward ()Dizaino rodinys ir dukart spustelėkite, kad atnaujintumėte

WebBrowser1. Refresh ()Išbandykite naršyklę ir išbandykite naujas funkcijas.

7 veiksmas: būsenos juosta

Grįžę į dizaino rodinį, pridėkite etiketę, pakeiskite tekstą į „Įkeliamas …“(be kabučių) Dabar eikite į kodo rodinį spustelėdami skirtuką „Form1.vb“. Raskite įrašą „WebBrowser1_DocumentCompleted“ir įveskite žemiau anksčiau įvestą kodą

Label1. Text = "Atlikta"Dabar spustelėkite aukštyn, kur kodas sako „DocumentCompleted“. Perkelkite pelę aukštyn, kur yra du išskleidžiamieji langeliai. Pasirinkite antrąjį (tą, kuriame sakoma DocumentCompleted) ir pasirinkite Naršymas. Tada pasirodys naujas kodas - tip

Label1. Text = "Įkeliama"Tai tik indikatorius, kai puslapis įkeliamas. Be to, galbūt norėsite nustatyti etiketės inkaro ypatybę.

8 žingsnis: baigtas

Štai taip. Turite visiškai veikiančią interneto naršyklę. Tęskite jo pritaikymą, kaip norite. Kaip ir mano pirmoje instrukcijoje. Turiu keletą namų darbų tiems, kurie atlieka šį nurodymą. Įgyvendinkite šiuos dalykus:

  • Namų funkcija
  • Kai puslapis įkeliamas, pakeiskite atnaujinimo mygtuką į sustabdymo mygtuką.

Tikiuosi, kad šie projektai parodė jums, kaip lengva programuoti!

9 žingsnis: sprendimai

Tiems, kurie baigė savo pirmąjį VB nurodymą - turiu pabaigoje atliktų namų darbų sprendimus.

Pakeiskite fono spalvą

Tai paprasta - pakeiskite „Form1“„BackColour“savybę į kitą spalvą

Pridėkite šiek tiek informacijos apie autorių teises

Nauja etiketė su pakeista teksto ypatybe padės

Pakeiskite formos dydį naudodami vaizdą

Pakeiskite „AutoSize“į „True“ir „AutoSizeMode“į „GrowAndShrinkDone“! Tęskite kodavimą!