Assegnare direttamente i valori di dimensione conosciuta, letti da un file, ad una Struttura

Volendo assegnare i valori letti da un file direttamente ad una variabile di tipo Struttura, è necessario prestare attenzione a due aspetti.

Innanzitutto, si dovrà tenere conto che l'istruzione di lettura dal file e di assegnazione alla variabile di tipo Struttura non può essere la seguente:

Read #file_letto, variabile_struttura As STRUTTURA

giacché verrà sollevato un errore del tipo: " Unexpected As ".

L'istruzione per la lettura dal file e la conseguente assegnazione, invece, dovrà essere la seguente:

variabile_struttura = Read #file_letto As STRUTTURA

In secondo luogo è opportuno che si sia certi che la dimensione (ossia il tipo) di ciascun valore corrisponda - ovviamente - con il tipo di variabile del membro della Struttura, al quale detto valore deve essere assegnato.

Mostriamo un semplice esempio pratico, nel quale poniamo il caso di leggere un file contenente i seguenti valori esadecimali: 09 E7 03 9F 86 01 00, corrispondenti ad un Byte, ad un Intero-Corto e ad un Intero. Ne riproduciamo, quindi, nel codice la Struttura che dovrà poi contenere tali dati.

Public Struct STRUTTURA
 b As Byte
 s As Short
 i As Integer
End Struct


Public Sub Main()

 Dim stru As New STRUTTURA
 Dim fl As File

' Leggiamo dal file ed assegnamo i valori alla variabile di tipo "Struttura":
  stru = Read #fl As STRUTTURA

' Mostriamo in console, per verifica, i valori assegnati ai membri della "Struttura":
  With stru
    Print .b
    Print .s
    Print .i
  End With

  fl.Close

End