Dnes se seznamíme s pojmem událost a programem (skriptem) handler, který na událost reaguje. Tedy - vzhůru do tvorby první aplikace! Navazujeme plynule na předcházející díl. Tentokrát se již dostaneme k napsání prvního aplikačního skriptu s předvedením první praktické ukázky.Než začneme, trochu nezáživné teorie. Pokud v některé aplikaci kliknete na tlačítko, zvětšíte/zmenšíte dialogové okno, či kliknete myší na plochu, stisknete klávesu, atd - vzniká událost. Ve Windows je napsán program, který na tyto události reaguje. Tento program prostě dovede zjistit, kde je umístěn kurzor. Uvažujme funkci tlačítka. Když se dostane kurzor nad tlačítko, které můžeme stisknout, program provede vizuální efekt stisknutí tlačítka. Avšak program v žádném případě neví, jaká činnost se má odehrád po stisknutí tlačítka. Nu a zde přicházíme na řadu my - programátoři. Naším úkolem je napsat handler, tedy program, který Windowsu sdělí, co má dále provést.
První aplikace
Jako v minulém díle budeme potřebovat nastavení v okně "Properties". Skončili jsme kliknutím vedle Caption v pravém sloupečku. Zde jsme změnili název "Label1" na "Seznam". Nyní rovněž změníme název okna formuláře na UserForm2. Případně vytvoříme Nový formulář. Poté zavedeme do formuláře první prvek - textový box TextBox1
TextBox1
- Nejprve musíme nový formulář otevřít. V okně "Project" klikněme dvakrát na "UserForm2", pokud ho tam v adresářovém stromě máme.
- Pokud ne postupujeme z hlavního menu takto: View/Projekct Explorer. Objeví se adresářový strom. Zde klikneme pravým tlačítkem myší a zadaváme postupně: Forms/Insert/UserForm, tím automaticky vytvoříme nový modul formuláře, který se nám zobrazí. Jestliže ne, dvakrát klikněte na adresář (název) nově vytvořeného modulu formuláře!
- Otevře se (v pořadí formulář s dalším číslem) "UserForm2,3..." se stejnojmenným názvem v hlavičce; my nyní pracuje s formulářem UserForm2.
- Nyní přetáhněme z panelu "Nástroje" ikonu textu "Textové pole" (ab) na plochu formuláře. Tím vytvoříme textový box "TextBox1.
- Všimněte si, že v okně Properties nahoře se vedle "Name" objevil rovněž onen název našeho formuláře "TextBox1"
- Otevřete dále okno Properties, pokud není otevřeno. Nyní se v tomto okně zaměříme na položku v prvním řádku Name, kde ve sloupci vedle ní změňte text na txtText, čímž této položce přiřadíte důležitou hodnotu textového řetězce.
- Dále vlastnosti MultiLine v levém sloupci přířadíme hodnotu True
- A konečně si zkontrolujeme vlastnost Text v levém sloupci. Vedle ní v pravém sloupci musí zůstat prázdné místo (pro prázdný řetězec), zde budeme v aplikaci psát text do textového bloku.
| Vlastnost | Hodnota |
|---|---|
| Name (název ovládacího prvku) | txtText |
| MultiLine | True |
| Text | prázdný řetězec |
Tedy ještě jednou souhrnné vysvětlení: Name je vlastnost, která deklaruje název vybraného ovládacího prvku. Pod ním se v dalších krocích bude tento prvek ovládat programovým kódem (skriptem). MultiLine Nastavíme v okně "Properties" na "True", abychom mohli vkládat více řádku textu. "False" umožňuje vložit pouze jeden řádek. A konečně je zde Text, což je textový řetězec zakomponovaný do "TextBoxu"
CommandButton
- Pracujeme dále s oknem formuláře "UserForm2". Nyní klikněte levým tlačítkem myší na ikonu tlačítka (Příkazové tlačítko) v panelu "Nástroje", podržte stlačenou myš a ikonu přesuňte na kterékoli místo ve formuláři. Stlačení myší uvolněte. Ve formuláři se objeví CommandButton.
- Velikost tlačítka můžeme nastavit tažením za "úchytky", případně definováním "width" a "height" v okně Properties.
- Opět se v okně "Properties" objeví vedle "Name" název tlačítka "CommandButton", ale POZOR, opět jej přepisujeme, a to tentokrát na název cmdOtevri. Ten se nám také okamžitě objevi nahoře v okně Properties.
- A ještě jedno přepisování. Opět, podobně jako v předešlém postupu přepíšeme vedle Caption název "CommandButton" na text, který se má objevit na tlačítku "Ukaž text!". Prostě textová hodnota vlastnosti Caption vytvoří titulek na Příkazovém tlačítku.
- V okně Properties můžeme dále nastavit další vlastnosti tlačítka. Např. změníme příkazem "ForeColor" barvu nápisu na tlačítku na modrou, nebo příkazem Font změníme velikost písma apod.
| Vlastnost | Hodnota |
|---|---|
| Name (název ovládacího prvku) | cmdOtevri |
| Caption (text na tlačítku) | Ukaž text! |
První program (handler)
Je čas pustit se do deklarování našeho prvního skriptu. To začneme jednoduše - klikneme dvakrát v našem formuláři "UserForm2" na vytvořené tlačítko "Ukaž text!". Tzn., řekneme MSVB, že míníme psát handler. Okamžitě se nám zobrazí dialogové okno, do nějž napíšeme potřebný skript.

Ukázka vytvoření handleru s potřebnými procedurami
Definice skriptu (handleru)
- První řádek deklaruje hlavičku procedury s klíčovým názvem Private Sub
- Na prvním řádku pak je ještě název procedury, která obsahuje událostní proceduru s přesnou konvencí:
- název ovládacího prvku
- podtržítko
- název programované události
- závorky levá, pravá, případně uvnitř závorek seznam parametrů, oddělený čárkou
Jak je zřejmé z obrázku, za prvním řádkem v proceduře vidíme tělo, které obsahuje hlavní kód Visual Basicu. V tomto skriptu je klíčový název MsgBox, který se postará o zobrazení informačního okna se zobrazeným textem, který jsme uvedli v textovém řetězci "txtText", vlastnosti Text ovládacího prvku. Tudíž vlastnost ovládacího prvku se skládá:
- název ovládacího prvku
- následuje tečka (.)
- název vlastnosti
- Proceduru ukončuje příkaz End
Po vytvoření handleru (skriptu) je nutné aktivovat klávesnici F5. Zobrazí se vám vyrobený formulář ve Windows. Pokud v textovém boxu bliká kurzor, je to známka, že postupujete správně. Skript je aktivní. Nyní si ověříme funkčnost prakticky. Do textového boxu (políčka) napiště jakýkoli text. Poté klikněte myší na tlačítko Ukaž text! Na obrazovce se vám objeví druhé, menší informační okno s výsledným textem.

Ukázka funkce první vytvořené aplikace
Resumé
Dospěli jsme tedy k realizaci první velmi jednoduché aplikace ve Visual Basicu. Příklady jsou ověřovány v přidavném modulu MS Word, který rozjedete cestou: Nástroje/Makro/MSVB. Poznali jsme první spustitelný kód, který jako ostatní kódy je uložen ve formě procedury. Událostní procedury dovedou reagovat na výskyt události, ke kterým je připojíme. Čekají nás další překvapivé věci prostřednictvím klíčového slova "Sub". O tom příště.
· VBS: Jazyk .NET: Co potřebujeme?
· VBS: C++ Managed Extensions (2)
· VBS: C++ Managed Extensions (1)
· Visual Basic (díl 9.): Vkládáme obrázky
· Visual Basic (díl 8.): Procedury
· Visual Basic (díl 7.): Událost, handler
· Visual Basic (díl 6.): okno Properties
· Visual Basic (díl 5.): rozhraní MDI a SDI
· Visual Basic (díl 4.): proměnné, základy
· Visual Basic (díl 3.): editace kódu
· Visual Basic (díl 2.): Kreslení
| URL: | |
| BB-Code: | |
| HTML: | |
| Sdílet: |

Díky!OK!Zkoušel jsem. Val...