Differenze tra le versioni di "Scrivere in un vettore i dati di un file"
Da Gambas-it.org - Wikipedia.
| Riga 2: | Riga 2: | ||
'''Public''' Sub Main() | '''Public''' Sub Main() | ||
| − | + | Dim bb As Byte[] | |
| − | + | Dim fl As File | |
| − | |||
fl = Open "<FONT color=gray>''/percorso/del/file''</font>" For Read | fl = Open "<FONT color=gray>''/percorso/del/file''</font>" For Read | ||
| − | + | ||
| − | <FONT color=gray>' ''Impostiamo il numero degli elementi che costituiranno la variabile vettoriale di tipo Byte[] | + | <FONT color=gray>' ''Impostiamo il numero degli elementi che costituiranno la variabile vettoriale di tipo Byte[] mediante la funzione "Lof()", affinché nel vettore siano contenuti tutti i dati del file:''</font> |
| − | |||
bb = New Byte[](lof(fl)) | bb = New Byte[](lof(fl)) | ||
Versione delle 15:39, 21 ago 2022
Se si intende riempire una variabile vettoriale con i dati presenti in un file, si potrà agevolmente ottenere questo risultato utilizzando il metodo .Read() disponibile per ogni tipo di variabile vettoriale:
Public Sub Main() Dim bb As Byte[] Dim fl As File fl = Open "/percorso/del/file" For Read ' Impostiamo il numero degli elementi che costituiranno la variabile vettoriale di tipo Byte[] mediante la funzione "Lof()", affinché nel vettore siano contenuti tutti i dati del file: bb = New Byte[](lof(fl)) bb.Read(fl) fl.Close End
