Ciao

Ho due textbox con nomi differenti TextBox1 e TextBox2. Devo salvare il contenuto delle due textbox nello stesso file.
Poi, dal file, devo caricare il contenuto della prima riga in una variabile a e il contenuto della seconda riga in un'altra variabile b.

Sono riuscito a fare tutto ciò con una textbox sola, ma non riesco a farlo con due. Ora vi scrivo il codice che ho usato per una sola textbox:

Ho dichiarato a come variabile pubblica

codice:
' SALVA IL CONTENUTO DELLA TEXT BOX IN UN FILE
Private Sub Text1_Change()

Open "Percorso.txt" For Output As #1
    If Text1.Text <> "" Then
    
        Print #1, Text1.Text
        a = Text1.Text
       
    End If
        
Close #1
End Sub

'CARICA LA RIGA DAL FILE txt NELLA VARIABILE a
    Open "Percorso.txt" For Input As #1

    Do Until EOF(1) 'finchè non è alla fine del file
       Line Input #1, a 'carica il contenuto nella variabile a
    Loop

Close #1
If a <> "" Then
    Text1.Text = a 'VISUALIZZA LA RIGA CORRENTE NELLA TEXTBOX
End If