Domanda elementare

[Ce&s]

Ciao.
Essendo completamente inesperto ma amante della programmazione, ho creato un'applicazione (utile per il mio lavoro...) con vb 2005. Pur essendo molto soddisfatto del risultato ottenuto, riuscendo ad utilizzare array, cicli ecc...mi trovo bloccato nella parte, forse la piu semplice, ma che non sono riuscito a capire(cercando su msdn, forum, ecc...).Se possibile mi sarebbe molto utile che qualcuno mi spiegasse come fare a salvare i dati inseriti dall'utente in un form che contiene diverse textbox, oppure sovrascrivere direttamente il form in modo tale che chiudendo e riaprendo l'applicazione, i dati immessi precedentemente non vengano cancellati. So che si deve usare savefiledialog, ma non ho capito la logica di funzionamento.
Chiedo scusa per la domanda "poco tecnica", ma per completare il mio lavoro ho assolutamente bisogno di questo.
grazie.
Principiante Inesperto Alle Prime Armi

[MItaly]

Con il SaveFileDialog ottieni semplicemente il nome del file da salvare che l'utente ti fornisce tramite una finestra tipo "Salva con nome" (se cerchi nel forum trovi diversi esempi). La scrittura (e la lettura) vera e propria va fatta con le classi di IO su file, come la System.IO.FileStream.

[Ce&s]

Dim pc(14) As Integer
pc(1) = Val(txtpc1.Text)
pc(2) = Val(txtpc2.Text)
pc(3) = Val(txtpc3.Text)
pc(4) = Val(txtpc4.Text)
pc(5) = Val(txtpc5.Text)
pc(6) = Val(txtpc6.Text)
pc(7) = Val(txtpc7.Text)
pc(8) = Val(txtpc8.Text)
pc(9) = Val(txtpc9.Text)
pc(10) = Val(txtpc10.Text)
pc(11) = Val(txtpc11.Text)
pc(12) = Val(txtpc12.Text)
pc(13) = Val(txtpc13.Text)
pc(14) = Val(txtpc14.Text)

Dim nome(14) As String
nome(1) = txtp1.Text
nome(2) = txtp2.Text
nome(3) = txtp3.Text
nome(4) = txtp4.Text
nome(5) = txtp5.Text
nome(6) = txtp6.Text
nome(7) = txtp7.Text
nome(8) = txtp8.Text
nome(9) = txtp9.Text
nome(10) = txtp10.Text
nome(11) = txtp11.Text
nome(12) = txtp12.Text
nome(13) = txtp13.Text
nome(14) = txtp14.Text


pbgiac = (Val(TextBox1.Text)) * 100
i = 0
If pbgiac <= 0 Then
MsgBox("Immettere un valore > di 0")
Exit Sub
End If
For i = 1 To 14
If Val(pbgiac) < pc(i) Then
diff = pc(i) - Val(pbgiac)
For g = (i + 1) To 14
sum = (sum + pc(g))
Next g

*** MsgBox(("Mancano q.li " & (Val(diff) / 100) & " per " & NOME(i) & " (" & (i) & ")" & Chr(10) & Chr(13) & Chr(10) & Chr(13) & "Q.li " & (Val(sum) / 100) & " per il resto della produzione" & Chr(10) & Chr(13) & Chr(10) & Chr(13) & "Totale Necessario = q.li " & ((Val(sum) / 100) + (Val(diff) / 100))), MsgBoxStyle.OkOnly, "Pasta di cacao")
btnpastaconv.Text = "-" & ((Val(sum) / 100) + (Val(diff) / 100))

Exit Sub
End If
resto = Val(pbgiac) - pc(i)
pbgiac = resto
Next i
If resto > 0 Then
MsgBox("Avanzano q.li " & (Val(resto) / 100))
btnpastaconv.Text = "+" & (Val(resto) / 100)
Else
MsgBox("Q.tà di pasta nel serbatoio esatta" & Chr(10) + Chr(13) & " per la produzione odierna!")
btnpastaconv.Text = "="
End If
Dato questo codice,che spero sia leggibile, quello che non sono riuscito a fare nonostante vari tentativi è assegnare un colore diverso(rosso) alla proprieta backcolor del textbox a cui fa riferimento la matrice NOME(i),se qualcuno puo darmi una mano...grazie
Quello che ho provato erroneamente è stato cercare di assegnare a nome(i) la proprietà backcolor che ovviamente non ha funzionato.
Ribadisco che, per quanto riguarda salvare il form dopo che l'utente a inserito dei valori, sono ancora in alto mare. Se qualcuno puo darmi delucidazioni "piu pratiche"(sempre che cio non esuli daregolamento)mi farebbe un grosso favore.

[oregon]

Pero' non mischiare i problemi ... in questa discussione resta sul tema del "salvataggio dei dati" ...

Un altro problema spiegalo in un'altra discussione ...

Mostra il codice in maniera piu' leggibile (aggiungi i tag CODE, pulsante # del forum ...) e inserisci nel titolo linguaggio e qualcosa di meglio di "Domanda elementare" ...

In una parola ... Regolamento ...