Lof: differenze tra le versioni

Versione delle 03:29, 2 set 2022

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)

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 6: / Riga 6: @@
 Esempio:
-  '''Public''' Sub Button1_Click()
+  '''Public''' Sub Main()
    Dim fl As File
-   fl = Open "''/percorso/del/file''" For Read
+  fl = Open "<FONT Color=gray>''/percorso/del/file''</font>" For Read
-   Print "La lunghezza del file è: "; Lof(fl)
+  Print "La lunghezza del file è: "; Lof(fl)
   '''End'''
+===Uso di "Lof()" con una variabile di tipo "Process"===
-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:
+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:
-  '''Public''' Sub processo_Read()
+ Private pro As Process
+ ......
+  '''Public''' Sub Processo_Read()
    Dim b As String
-   Read #Last, b, Lof(Last)
+  Read #pro, b, Lof(Last)
   '''End'''