Ciaocodice:Option Explicit Dim variabile As Integer Dim variabile1 As Integer Dim variabile2 As Integer Private Sub Command1_Click() variabile1 = Text1.Text ' oppure 1,8 variabile2 = Text2.Text ' oppure 1 variabile = variabile1 + variabile2 Text3.Text = variabile End Sub

Rispondi quotando