[VB6] Lettura file di testo con blocchi contrassegnati da parole chiave

[mdnet]

Inanzitutto BUON ANNO a tutti.

Premetto che non sono un esperto di VB ma mi trovo a dover sviluppare un piccolo programma in VB6 che mi permetta di leggere i valori delle ultime due colonne del file (quelle per caperci dove i valori sono -0.35 -0.74 -6.81 92.48 ecc. ecc. ecc. ) che allego. Personalmente veramente non saprei da dove partire, qualcuno di voi mi sa dare un aiuto gentilmente.

TABELLA DI ESEMPIO

Grazie

[MItaly]

Salta le righe fino a quando non trovi BEGIN_DATA, quindi leggi una riga per volta, separa i numeri in base agli spazi con la funzione Split() (o individua l'ultimo spazio con InStrRev e taglia fuori l'ultimo numero con la Right$), fai quello che devi fare con l'ultimo numero e vai avanti così fino alla fine.

[mdnet]

Intanto ti ringrazio per la risposta, ti chiedo una gentilezza, sapresti indicarmi dove trovare un esempio con le funzioni che tu mi hai indicato, cosi' almeno lo guardo e cerco di venirne fuori senza disturbare piu' del dovuto.

ciao e grazie

[MItaly]

Cerca all'interno del forum o nella MSDN, della Split abbiamo parlato molte volte.

[alka]

Ho aggiunto il linguaggio nel titolo, ma andrebbe specificato, come da Regolamento, in fase di apertura della discussione.

[wallrider]

Dim percorsoFile As String, buff As String, fileNum As Integer
Dim arr() As String, readingData As Boolean

percorsoFile = "C:\pippo.txt"
fileNum = FreeFile
readingData = False
'apro il file in modalità lettura
Open percorsoFile For Input As fileNum
    'ciclo tutto il file
    Do While Not EOF(fileNum)
        'leggo la riga del file
        Line Input #fileNum, buf
        If readingData Then
            'divido la riga in un array
            arr = Split(buf, " ")
            'fai quello che devi
        End If
        If Trim(buf) = "BEGIN_DATA" Then
            readingData = True
        End If
    Loop
Close fileNum

DOVREBBE funzicare

[mdnet]

Grazie wallrider, in questo momento sto provando il pezzo di codice che tu gentilmente mi hai postato e per questo ti ringrazio anticipatamente, spero di capire il tutto anche perchè questo piccolo programma adesso mi serve velocemente.

Grazie ancora.

ciao