IBM Lotus Symphony
|
Deklaruje premennú alebo pole.
Ak sú premenné oddelené čiarkami (napríklad DIM sPar1, sPar2, sPar3 AS STRING), definovať môžete len premenné Variant. Použite osobitný definičný riadok pre každú premennú.
DIM sPar1 ako typ STRING
DIM sPar2 ako typ STRING
DIM sPar3 ako typ STRING
Dim deklaruje lokálne premenné v podprogramoch. Globálne premenné sú deklarované pomocou príkazu PUBLIC alebo PRIVATE.
[ReDim ] Dim} názov premennej [(začiatok To koniec)] [ako typ premennej][, názov premennej 2 [(začiatok To koniec)] [ako typ premennej][,...]]
Názov_premennej: ľubovoľný názov premennej alebo poľa.
Začiatok, Koniec: Numerické hodnoty alebo konštanty, ktoré definujú počet prvkov (Počet_prvkov=(koniec-začiatok)+1) a rozsah indexu.
Začiatok a koniec môžu byť numerické výrazy, ak sa na úrovni procedúr použije ReDim.
Typ_premennej: kľúčové slovo deklarujúce typ údajov premennej.
Kľúčové slovo: typ premennej
Bool: boolovská premenná (hodnota true, hodnota false)
Currency: premenná_meny (mena má 4 desatinné miesta)
Date: premenná typu Date
Double: Premenná s pohyblivou čiarkou dvojnásobnej presnosti (1,79769313486232 x 10E308 - 4,94065645841247 x 10E-324)
Integer: premenná typu Integer (-32768 - 32767)
Long: premenná typu Long Integer(-2.147.483.648 - 2.147.483.647)
Object: premenná objektu (poznámka: túto premennú je možné až následne definovať pomocou Set!)
Single: premenná s jednoduchou presnosťou a s pohyblivou rádovou čiarkou (3,402823 x 10E38 - 1,401298 x 10E-45).
String: reťazcová premenná, môže sa skladať maximálne zo 64,000 ASCII znakov.
[Variant]: premenná typu Variant (zahrňuje všetky typy špecifikované definíciou). Ak nie je špecifikované kľúčové slovo, premenné sú automaticky definované ako typ Variant, ak sa nepoužije príkaz DefBool až DefVar.
V aplikácii Lotus® Symphony™ Basic nemusíte deklarovať premenné explicitne. Musíte však deklarovať pole predtým, ako ho môžete použiť. Môžete deklarovať premennú pomocou príkazu Dim a použiť čiarky na oddelenie viacerých deklarácií. Na deklarovanie typu premennej zadajte znak typu deklarácie po názve alebo použite príslušné kľúčové slovo.
Lotus Symphony Basic podporuje jednorozmerné alebo viacrozmerné polia, definované podľa zadaného typu premennej. Polia sú vhodné, ak program obsahuje zoznamy alebo tabuľky, ktoré chcete upravovať. Výhodou polí je, že je možné adresovať jednotlivé prvky podľa indexov, ktoré sa môžu tvoriť ako numerické výrazy alebo ako premenné.
Polia sa deklarujú príkazom Dim. Rozsah indexov je možné definovať dvomi metódami:
DIM text(20) ako typ String REM 21 prvkov je očíslovaných od 0 do 20
DIM text(5 to 25) ako typ String REM 21 prvkov je očíslovaných od 5 do 25
DIM text(-15 to 5) ako typ String REM 21 prvkov (vrátane 0)
REM očíslované od -15 do 5
Dvojrozmerné údajové pole
DIM text(20,2) ako typ String REM 63 prvkov; od 0 do 20 úroveň 1, od 0 do 20 úroveň 2 a od 0 do 20 úroveň 3.
Je možné deklarovať typy polí ako dynamické, ak príkaz ReDim definuje počet rozmerov v podprograme alebo vo funkcii, ktorý obsahuje pole. Vo všeobecnosti je možné definovať rozmer poľa iba raz a nie je možné ho modifikovať. V rámci podprogramu je možné deklarovať pole pomocou príkazu ReDim. Rozmery je možné definovať iba pomocou numerických výrazov. Toto zabezpečuje, že polia majú iba takú veľkosť, aká je pre ne potrebná.
Sub Príklad_Dim_1
Dim sVar ako typ String
Dim iVar ako typ Integer
sVar = "Lotus Symphony"
End Sub
Sub Príklad_Dim 2
REM Dvojrozmerné pole údajov
Dim stext(20,2) ako typ String
Const sDim ako typ String = " Rozmer:"
for i = 0 to 20
for ii = 0 to 2
stext(i,ii) = str(i) & sDim & str(ii)
next ii
next i
for i = 0 to 20
for ii = 0 to 2
msgbox stext(i,ii)
next ii
next i
End Sub