Lof: differenze tra le versioni

Versione attuale delle 15:48, 10 giu 2024

La funzione Lof() restituisce un valore di tipo Long che rappresenta la lunghezza (ossia la quantità di byte) di un file aperto.

La sintassi è:

lughezzaFile = Lof(file)

Esempio:

Public Sub Main()

 Dim fl As File

 fl = Open "/percorso/del/file" For Read

 Print "La lunghezza del file è: "; Lof(fl)

 fl.Close

End

Se il flusso non è un file, bensì un processo, allora la funzione "Lof()" restituisce il numero di byte che possono essere letti con una sola volta:

Private pro As Process

......

Public Sub Processo_Read()

 Dim b As String

 Read #pro, b, Lof(Last)

End

@@ Riga 3: / Riga 3: @@
 La sintassi è:
   lughezzaFile = Lof(file)
 Esempio:
-  '''Public''' Sub Main()
+  Public Sub Main()
    Dim fl As File
-   fl = Open "<FONT Color=gray>''/percorso/del/file''</font>" For Read
+   fl = Open "<FONT Color=darkgreen>''/percorso/del/file''</font>" For Read
    Print "La lunghezza del file è: "; <FONT Color=#B22222>Lof</font>(fl)
-  '''End'''
+  fl.Close
+  End
 ===Uso di "Lof()" con una variabile di tipo "Process"===
@@ Riga 22: / Riga 22: @@
   ......
-  '''Public''' Sub Processo_Read()
+  Public Sub Processo_Read()
    Dim b As String
@@ Riga 28: / Riga 28: @@
    Read #pro, b, <FONT Color=#B22222>Lof</font>(Last)
-  '''End'''
+  End