Ok chiedo scusa per il grassetto >.<!!
Riguardo a te U235 ti ringrazio tanto per la descrizione per tutto il tuo aiuto quindi ti chiedo se con un pò di pazienza e gentilmente puoi anche spiegarmi esattametne il codice che hai scritto riga per riga.... Se puoi farlo mi fai un favore
(perchè ti confesso che queste cose qui :
non le so ancora io >.<!).codice:Private Sub button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click If Not String.IsNullOrWhiteSpace(Me.TextBox1.Text) Then Dim sb As New StringBuilder() For i As Integer = 0 To Me.TextBox1.Text.Length - 1 sb.Append([Enum].GetName(GetType(Sostituti), CInt([Enum].Parse(GetType(Caratteri), Me.TextBox1.Text.Substring(i, 1).ToUpper())))) Next Me.Label1.Text = sb.ToString() End If End Sub End Class
In ogni caso grazie mille! E scusate ancora per il grassetto!


Rispondi quotando