Cercare un valore all'interno di un file aperto come un flusso di dati di tipo Stringa

Il caso è quello in cui, avendo aperto un file come tipo di dati "Stringa", si intende cercare un valore costituito da uno o anche più byte.

Mostriamo un possibile esempio in cui si cerca all'interno della stringa di dati del file un valore formato - in questo caso - da 4 byte (Tipo Integer ).

Private Const VALORE As Integer = valore-numerico-da-cercare (che occupi 4 byte)


Public Sub Main()
 
 Dim s As String
 Dim i As Integer

 s = File.Load("/percorso/del/file/da/caricare")

 i = InStr(s, MkInt(VALORE))

 If i == 0 Then 
   Print "Valore non presente nel file."
 Else 
   Print "Il valore è stato trovato al byte di indice: "; i - 1
 Endif

End