|
|
(43 versioni intermedie di uno stesso utente non sono mostrate) |
Riga 1: |
Riga 1: |
− | Descriveremo la creazione e l'assegazione di valori ad un array monodimensionale dinamico (con quantità di elementi non definita a priori), nonché i casi in cui la definizione della quantità degli elementi viene definita successivamente in modo esplicito o in modo dinamico.
| + | #REDIRECT [[Array:_creazione,_modifica_e_riempimento]] |
− | | |
− | | |
− | ==Creazione e riempimento di un array monodimensionale dinamico==
| |
− | Un array (matrice) monodimensionale è dinamico se, non avendo definita a priori la quantità dei suoi elementi interni, è suscettibile di incrementare di volta in volta detta quantità.
| |
− | | |
− | Oltre alla dichiarazione dell'array, per ottenere l'incremento del numero di elementi interni, e dunque l'assegnazione di un determinato valore a ciascun nuovo elemento, bisognerà creare l'array utilizzando la parola ''New''. Un nuovo elemento verrà generato (incrementando così il numero di elementi dell'array in quel momento) aggiungendo un nuovo valore all'array mediante il metodo ''.Add()''.
| |
− | '''Public Sub Button1_Click()
| |
− |
| |
− | Dim bb As <FONT color=#B22222>New</font> Byte<FONT color=#B22222>[]</font> <FONT color=#006400>' ''All'interno delle paretesi quadre non è indicato alcun valore''</font>
| |
− |
| |
− |
| |
− | For j = 0 To 9
| |
− |
| |
− | <FONT color=#006400>' ''Ad ogni ciclo viene assegnato un valore all'array,
| |
− | ' ''e quindi viene creato un nuovo elemento di indice successivo all'ultimo che era stato generato:''</font>
| |
− | bb.<FONT color=#B22222>Add</font>(j)
| |
− |
| |
− | Next
| |
− |
| |
− | '''End'''
| |
− | | |
− | | |
− | | |
− | ==Definizione esplicita successiva della quantità degli elementi<font>==
| |
− | In questo caso la quantità di elementi di un array non è definita con la dichiarazione, ma lo diviene successivamente.
| |
− | | |
− | | |
− | ===In un array monodimensionale===
| |
− | '''Public''' Sub Button1_Click()
| |
− |
| |
− | Dim qnt As String
| |
− | Dim nu As Integer
| |
− | Dim ii As Integer[] <FONT color=#006400>' ''dichiara l'array, ma senza dimensionarlo''</font>
| |
− |
| |
− |
| |
− | <FONT color=#006400>' ''dimensiona "ora" l'array, in questo esempio con un "InputBox":''</font>
| |
− | qnt = InputBox("Inserisci tu la dimensione delle righe dell'array:")
| |
− | ii = New Integer[Val(qnt)]
| |
− |
| |
− | For nu = 0 To ii.Max
| |
− | <FONT color=#006400>' '' riempie ogni elemento dell'array:''</font>
| |
− | ii[nu] = nu
| |
− | Print ii[nu]
| |
− | Next
| |
− |
| |
− | '''End'''
| |
− | | |
− | | |
− | ===In un array multidimensionale===
| |
− | '''Public''' Sub Button1_Click()
| |
− |
| |
− | Dim ii As Integer[] <FONT color=#006400>' ''dichiara l'array, ma senza definirne la quantità dei propri elementi''</font>
| |
− | Dim rig As String
| |
− | Dim col, nuR, nuC As Integer
| |
− |
| |
− | <FONT color=#006400>' ''dimensiona "ora" l'array:''</font>
| |
− | rig = InputBox("Inserisci tu la dimensione delle righe dell'array:")
| |
− | col = InputBox("Inserisci tu la dimensione delle colonne dell'array:")
| |
− |
| |
− | <FONT color=#B22222>ii = New Integer[Val(rig), col]</font>
| |
− |
| |
− |
| |
− | For nuR = 0 to rig - 1
| |
− | For nuC = 0 To col - 1
| |
− | ii[nuR, nuC] = nuC
| |
− | Print ii[nuR, nuC]
| |
− | Next
| |
− | Next
| |
− |
| |
− | '''End'''
| |