Differenze tra le versioni di "Scrivere in un vettore i dati di un file"

Da Gambas-it.org - Wikipedia.
Riga 10: Riga 10:
 
   bb = New Byte[](lof(fl))
 
   bb = New Byte[](lof(fl))
 
   
 
   
   <FONT color=B22222>bb.Read(fl)</font>
+
   <FONT color=B22222>bb.Read(fl)</font>  <FONT color=gray>' ''...o anche:'' '''bb.Read(fl, 0, bb.Count)'''</font>
 
   
 
   
 
   fl.Close
 
   fl.Close
 
   
 
   
 
  '''End'''
 
  '''End'''

Versione delle 18:50, 31 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)   ' ...o anche: bb.Read(fl, 0, bb.Count)

  fl.Close

End