Conoscere la dimensione di un file

Per conoscere la dimensione di un file, scelto mediante l'apposita finestra di dialogo per l'apertura dei file, si potrà usare la proprietà .Size della Classe Stat. La Classe Stat restituisce una serie di informazioni relative ai file. Utilizzeremo la proprietà Size della Classe Stat congiuntamente alla proprietà .Path della Classe Dialog, che restituisce il percorso, il nome e l'estensione del file prescelto.

Si scriverà dunque quanto segue:

Public Sub Button1_Click()

 Dim s As String

' Apriamo la finestra di dialogo per scegliere e caricare il file:
   If Dialog.Openfile() then Return

' Estraiamo la dimensione del file scelto con la finestra di dialogo:
   s = Stat(Dialog.Path).Size

   Print "La dimensione del file scelto è: "; s; " byte"

End