---

Egy kódbeolvasó példaprogram

 

Ez az oldal segítségével elkészítheted első nagyobb

programodat Visual Basicben.

 

1. rész: A vizuális tervezés

1.1) Nyisd meg a VB-t, és csinálj egy új

Windows Application-t.

1.2) A form Text tulajdonságának írdbe azt, hogy: CodeReader, majd nvezd el

frmCodeReader.vb-nek.

1.3) Helyezz el rajta egy szövegdobozt(TextBox), majd a Multiline tulajdonsága állítsd be True

értékre. Nevezd el txtCode-nak

Ezután helyezz el egy gombot (Button), és nevezd el btnOK-nak. A Text tulajdonságát állítsd be

Csináld!-ra.

 

 

---

2. rész: A programozás

2.1) Kattints duplán az ok gombra ekkor megjelenik az adott vezérlő, alapértelmezett eseménye

(Ez esetben a Click (Kattintás) esemény).

Írd be az alábbi kódot (minden sor után Entert kell nyomni!!!)

 

readcode()

 

Ha mindent jól csináltál akkor a redcode() utasítást valamilyen színnel aláhúzta. Nem baj: kijavítjuk.

Az utolsó End Sub (Nagyon fontos, hogy nem End Class !!!) után üss két Entert. Írd be ezt:

 

Sub readcode ()

 

Ha minden jól csináltál most így néz ki:

 

Sub readcode()

 

End Sub

 

Most csináltunk egy új eljárást, és a színes csík is eltünt a readcode() alól.

 

2.2) Írjuk be az alábbi kódot a redcode eseménybe:

 

If txtCode.Text = "close!" Then

If MsgBox("Biztos ki akarsz lépni?", MsgBox.Style.YesNo) = Windows.Forms.DialogResult.Yes Then

Me.Close

End If

End If

 

Elsőre bonyolultnak tűnik, pedig nem is. Nézzük csak!

 

Az első sor megvizsgálja, hogy mit írtunk a szövegdobozba. Ha a "close!" szöveget

találja ott, akkor megnyit egy üzenetablakot, kiírja, hogy "Biztos ki akarsz lépni?", majd

beállítja a gombokat (YesNo (IgenNem)). Ha a Yes lehetőséget választjuk, kilép a

programunkból.

 

További sok sikert, ha alkotasz valamit feltétlenül küld el: kovdan23@citromail.hu

---

---

 

Egy webböngésző készítése

Part 1.

 

1. rész: A vizuális tervezés:

1.1) Nyisd meg a VB-t, csinálj egy új projektet (pl. Browser Example).

1.2) Helyezz el rajta egy gombot (text: Go!), ez fogja beolvasni az URL címet és kiküldeni a WebBrowser

elemnek.

Ezután helyezz el egy szövegdobozt (text: http://www.), ez fogja tárolni az URL címet: ide kell majd

beírni.

Végül helyezz el egy WebBrowser elemet.

---

2. rész: A programozás:

2.1) Kattints duplán a Go! felirató gombra és írd be a következőket:

 

WebBrowser1.Navigate(TextBox1.Text)

 

Kész is van! Ennyire egyszerű? Igen!! :)

A folyatás hamarosan következik!

---

Egy webböngésző készítése

Part 2.

 

A második tutorialban apróbb de hasznos fejlesztéseket hajtunk majd végre a böngészőnkön!

 

1. Lehetőség: Back, Forward gombok hozzáadása:

 

1.1) Helyezzünk el egy gombot a projekt felső részén (mondjuk a szövegdoboz mellet) (text: <-),

kattintsunk rá kétszer, majd írjuk be a Click eseménybe az alábbiakat:

 

WebBrowser1.GoBack()

 

Helyezzünk el egy másik gombot a "vissza" gomb mellett (text: ->),

Majd írjuk ezeket:

 

WebBrowser1.GoForward()

 

Kész is vagyunk! Lehet, hogy lesz Part 3, még nem tudom, valószínüleg inkább egy új példaprogram lesz :)