Differenze tra le versioni di "Cercare un valore all'interno di un file aperto come un flusso di dati di tipo Stringa"
Da Gambas-it.org - Wikipedia.
| Riga 5: | Riga 5: | ||
| − | + | Public Sub Main() | |
Dim s As String | Dim s As String | ||
Dim i As Integer | Dim i As Integer | ||
| − | s = File.Load("<FONT Color= | + | s = File.Load("<FONT Color=darkgreen>''/percorso/del/file/da/caricare''</font>") |
i = InStr(s, MkInt(VALORE)) | i = InStr(s, MkInt(VALORE)) | ||
| Riga 20: | Riga 20: | ||
Endif | Endif | ||
| − | + | End | |
Versione attuale delle 16:13, 1 lug 2024
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
