
Další díl tohoto seriálu pokračuje vysvětlováním základních funkcí proměnných. Ve Visual Basicu zůstávají tyto hodnoty během činnosti aplikace konstantní, přitom lze vedle zabudovaných konstant používat i jména, která určí autor skriptu.
Ve Visual Basicu používáme často určitá čísla na přechodnou dobu. Slouží nám třeba k poměření konkrétního výsledku, či k provedení některé operace. Pak již tyto hodnoty nepotřebujeme. Tudíž - není nutné je ukládat jako vlastnosti, slouží čistě k porovnávání. A právě k tomu byly tvůrci MSVB vymyšleny proměnné, aby mohly přechodně "konzervovat" konkrétní hodnoty, nutné k činnosti, resp. chodu aplikace.
Jak deklarujeme proměnné?
Ti, kteří znají JavaScript, nebo Windows Script Host, mi jistě dají za pravdu, že každou proměnnou je třeba předem deklarovat. U MSVB je však určitá výhoda v tom, že před použitím nemusíme proměnnou deklarovat. Všechny proměnné tedy v MSVB píšeme natvrdo - prostřednictvím příkazu Dim, za ním následuje jméno proměnné. Syntaxe vypadá takto:
- Dim zde bude _jméno proměnné [Integer]
Za proměnnou vidíte ve složené závorce datový typ proměnné, který je nepovinný. V ukázce je uvedeno "Integer", což znamená celé číslo. Mohou zde být i objekty MSVB jako "Object", "TextBox" a "Form". U deklarací proměnných ve MSVB musí být dodrženy jisté zásady. Každá proměnná musí být v oblasti formuláře - procedury originální, nesmí se opakovat! Nesmí mít tečky a musí vždy začínat písmenem!
Používejme kontrolu Explicit
V JavaScriptu či Windows Scripting Host je běžné kontrolovat správně napsaná jména proměnných (jejich explicitní deklaraci) pomocí příkazu Explicit. Takto lze předcházet chybně zapsaným jménům proměnných také v MSVB. Tento příkaz je funkční výhradně v oblastí, v níž je deklarován. Pokud chcete zajistit důslednou kontrolu všech modulů, musíte ho proto psát v každé modulu třídy formuláře. Příkaz vám podá echo, pokud napíšete jméno, které nebylo deklarováno jako proměnná. Dobrá věc! Zápis vypadá takto:
Příklad použití
Option Explicit
' Deklarace konstant a promenych
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim strNajdi, strJmenoSouboru, strRadek, strAdresa, strPom, strHead, strBody, strTitul
Dim intPocetOdkazu, intI
Dim boolNajit, boolHead, boolBody, boolFullText
Dim fso, objJmenaSouboru, objSoubor
Dim arrOdkazy()
' Nastaveni vychozich hodnot
strNajdi = Request.Form( "FORM_Text" )
If Request.Form( "FORM_FullText" ) = 1 Then
boolFullText = True
Else
boolFullText = False
End If
intPocetOdkazu = 0
Psaní komentáře v kódu
Jak můžete pozorovat shora uvedený skript (kód) má samostatné komentáře. Ty se vkládají velmi jednoduše, a to symbolem '. Jde o apostrofu, kterou použijeme k zápisu vysvětlujicího textu k napsanému skriptu. Platí zde zásada, že vše co je za touto apostrofou ', zdrojový kód jednoduše ignoruje. Tyto komentáře lze uvádět na řádku za jednotlivými příkazy, lze je psát rovněž na samostatný řádek.
- Text.Text = "Jak se máš" - ' Komentář za příkazy na řádku
- Příklad nějakého textu... - ' Komentář na samostatném řádku
Resumé
Tentokrát poněkud nezáživná, avšak důležitá lekce našeho seriálu. Příště budeme mj. rozdělovat delší příkaz na více řádku a v praxi si rovněž předvedeme, jak je to ve Visual Basicu s uchováním a získáváním dat z proměnných.
Zatím nikdo nekomentoval. Buďte proto první a vložte svůj komentář.
Aby jste mohli přidávat komentáře, musíte být přihlášený.
Musíte být registrovaný, aby jste mohli hodnotit.
Prosím přihlašte se, a nebo se zaregistrujte.
Zatím nikdo nehodnotil.