Visual Basic díl 10. - Pole proměnných

Zdroj: SOOM.cz [ISSN 1804-7270]
Autor: S0meB0dy
Datum: 16.10.2004
Hodnocení/Hlasovalo: 1.2/5

V desátém díle seriálu si ukážeme jak ve Visual Basicu vytvořit a použít mnohdy užitečné pole proměnných. V článku navíc najdete také tabulku datových typů.

Pole proměnných si lze nejlépe představit jako tabulku, která obsahuje několik proměnných a ona sama je celá uložená v jedné jediné proměnné

Vytvoření jednorozměrného pole proměnných
1. Vložte do nového projektu standardní Modul a napište do něj následující řádky:

Public Promenna(4) As String

2.Vraťte se na formulář a vložte do něj dvakrát CommandButton (cmdUloz a cmdNacti)
3.Poklepejte na cmdUloz a napište následující řádky:

Promenna(0) = "A1"
Promenna(1) = "A2"
Promenna(2) = "A3"
Promenna(3) = "A4"
Promenna(4) = "A5"

4. Dále napište do procedury Click komponenty cmdNacti tyto řádky:

For p = 0 To 4
Print Promenna(p)
Next p

5. Spusťte program a klikněte na cmdUloz, zdánlivě se nic nestalo. Teď klikněte na cmdNacti a na formulář by se mělo, pod sebe, vypsat A1, A2, A3, A4 a A5.

Pozn: Všimněte si cyklu For...Next který jste se naučili ve 4. díle seriálu.

Rozbor kódu
Tím že jsme do Modulu napsali Public Promenna(4) jsme vytvořili jednorozměrné pole do kterého lze zapsat 5 proměnných (Proč 5, První je totiž 0 pokud bychom chtěli aby se začínalo od 1 museli bychom před celou deklaraci napsat Option Base 1 ) Dále jsme do určili jaká data budou v poli, napsali jsme tedy As String. Poté jsme do pole přířadili, v proceduře Click komponenty cmdUloz, proměnné A1 až A5 a nakonec jsme, v proceduře click komponenty cmdNacti, nechali jednotlivé proměnné vypsat, pomocí příkazu Print a cyklu For..Next, na formulář.

Vícerozměrná pole
Pole může být i vícerozměrné a to tak, že do závorky za název proměnné zadáte několik čísel oddělených čárkami např:

Public Pole(1, 2) As String

Tím jsme vytovřili pole proměnných o dvou řádcích a třech sloupcích. Uložení proměnné do takového pole pak vypadá např. takto:

Pole(0, 1) = "B1"

Stejně tak vypsání na formulář může vypadat třeba takto:

Print Pole(0, 1)

Vytvořit se však dá i dynamické pole, neboli pole kdy předem nevíme jak bude velké. Vytvoříme ho tak že necháme závorku, za názvem pole, prázdnou např:

Public Pole() As String

Pole nemusí být dokonce ani v modulu ale přímo v kódu, to pak ale musíte klíčové slovo Public nahradit slovem Static a navíc budete moci s polem manipulovat jen z konkrétního formuláře.

Přehled datových typů

Název datového typu	Popis	Velikost	Interval Hodnot
Integer	Celá čísla	2 bajty	- 32 768 až 32 767
Long	Dlouhá celá čísla	4 bajty	- 2 147 483 648 až 2 147 483 647
String	Textový řetězec	1 bajt na znak	0 až 65 535 znaků
Currency	Měna	8 bajtů	- 922 337 203 687 447,5808 až 922 337 203 685 447, 5807
Single	Desetinné číslo s jednoduchou přesností	4 bajty	- 3,402 823 E38 až 3,402 823 E38
Double	Desetinné číslo s dvojtou přesností	8 bajty	- 1,797 693 134 862 32D308 až 1,797 693 134 862 32D308
Date	Datum	8 bajtů	1. ledna 100 až 31. prosince 9999
Boolean	(Logický)Pravda, nepravda	2 bajty	True nebo False
Variant	Obecný datový typ	16 bajtů na číselné údaje a 22 bajtů plus jeden na každý znak	Intervaly všech typů

Úloha
Vytvářejte pole a experimentujte s různými datovými typy.