Riprendo il post precedente.
Prendendo spunto da quanto indicato da MdE2005, sono riuscito a caricare un'Array (array_riga) con il valori contenuti nel File salvato con l'istruzione :
Open FileName For Output As #FileNum
For y = Form1.TxtVS1.LBound To Form1.TxtVS1.UBound Step 1
Write #FileNum, Form1.TxtVS1(y).Text,
Next y
Write #FileNum, Form1.txtMin.Text, Form1.txtMedio.Text, Form1.txtConcil.Text,
Close #FileNum

Come vedete ho usato come delimitatore dei dati ","
Ora leggo nell'array_riga:
array_riga(0) : ""1000"" : String
array_riga(1) : ""2000"" : String
...
array_riga(11) : ""300"" : String

I cui valori corrispondono a quelli inseriti in 12 Txt, di cui 9 in una matrice di controlli e 3 al di fuori della matrice.
NON riesco ad assegnare i valori della matrice ai rispettivi controlli ... Help Me. Il codice che stò provando è il seguente:
codice:
    Open FileName For Input As FileNum
            ' Ripete fino alla fine del file:
        Do While Not (EOF(FileNum) = True)
            ' Assegna la riga a una variabile:
            Line Input #FileNum, TextLine
            array_riga = Split(TextLine, ",", -1, vbTextCompare)
           
            For y = 0 To UBound(array_riga)
                'For Each y1 In array_riga(y)
                   'For j2 = Form1.TxtVS1.LBound To Form1.TxtVS1.UBound
                        Form1.TxtVS1(0) = array_riga(y)
                    'Next j2
                Next y
      Loop
VVoVe: