Differenze tra le versioni di "Lof"

Versione attuale delle 14: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 1: / Riga 1: @@
-La funzione '''Lof''' restituisce un valore di tipo ''Long'' che rappresenta la lunghezza (ossia la quantità di byte) di un file aperto.
+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()
+  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)
-   Print "La lunghezza del file è: "; Lof(fl)
+   fl.Close
-  '''End'''
+  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
-   Read #pro, b, Lof(Last)
+   Read #pro, b, <FONT Color=#B22222>Lof</font>(Last)
-  '''End'''
+  End