ARRAY
Un array è un vettore ad una o
più dimensioni. Gli array possono essere di qualsiasi tipo di
dato, anche quelli creati dall'utente con l'istruzione TYPE. Il primo
elemento di un array ha indice 0 salvo che non sia stato impostato
diversamento con l'istruz ione OPTION BASE, che assegna l'indice di
partenza di un array. Altre istruzioni permettono di attribuire un
numero minimo di item che vengono creati con l'array. Un array si
crea con le istruzioni
REDIM
nomeArray (nroItem) |
|
o con l'istruzione DIM nelle
dichiarazioni del form e nei moduli BAS o semplicemente
scrivendo
- nomeArray(nroItem)
nelle dichiarazioni dei moduli BAS. Gli array multidimensionali si
definiscono come
- Array(dim1,dim2,
... dimx).
L'istruzione UBOUND(nomeArray) restituisce
l'ultimo elemento di un array. Per cambiare run time il numero degli
elementi di un array si usa:
- REDIM PRESERVE
nomeArray(nuovaDimensione)
L'istruzione LBOUND(nomeArray)
restituisce il primo elemento di un array. L'istruzione
- ERASE
nomeArray
cancella il contenuto di un intero
array. I valori inizialmente assegnati ad un array dipendono dal tipo
di dato: se un array contiene una stringa, il valore assegnato
sarà impostato a blank; si invece contiene un valore numerico,
sarà impostato a zero.
Esempi di array:
- TYPE
PROVA
- nome
as string * 30
- tel
as string * 12
- cap
as integer
- saldo
as long
- END
TYPE
|
|
REDIM
arrayp(10) as PROVA |
|
Operazioni con
array
Somma
- array(3).saldo
= array(3).saldo + 10000 Differenza
- array (3).saldo
= array(3).saldo - 5000 Moltiplicazione
- array (3).saldo
= 12 * 10000 Divisione
- array (3).saldo
= array(3).saldo / 12
DataRegion
|