Ciao Totem
Ti ringrazio per le correzioni che mi hai indicato e debbo dirti che ora funziona ottimamente (nella versione portoghese) perché, devi sapere, che questo programma che ho intenzione di realizzare, gestisce due agende, una in lingua italina (per me)ed un'altra in lingua portoghese (per mia moglie).
Le correzioni che tu mi hai indicato, nella versione portoghese (che é la prima ad essere testata), funzionano benissimo, ma lo stesso listato, copiato ed incollato nella version italiana, presenta incredibilmente un errore alla riga...
"S &= Me.Controls("TextBox"(I)).Text"
e l'errore che segnala è inserito in un riquadro con un filo in direzione della riga e recita:
__________________________________________________
NullRefrenceException (Il testo é scritto in neretto)
__________________________________________________
Usa la parola "new" per creare un'istanza di oggetto,
Determinare se l'oggetto é null prima di chiamare il metodo.
__________________________________________________
Perché se nella versione portoghese funziona, non deve funzionare anche in quella italiana?
Ad ogni buon conto,ti posto nuovamente tutto il codice:
___________________________________________________
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim S As String = ""
For I As Byte = 1 To 11
S &= Me.Controls("TextBox"(I)).Text
If I < 11 Then S = S + ","
Next
S = S + vbCrLf
IO.File.AppendText("C:\Alberto.txt")
Close()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Close()
End Sub
End Class
____________________________________________________
Ultima modifica effettuata da alpi39 il 03/04/2008 alle 13:32 |