Código:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox7.Enabled = True And TextBox10.Enabled = True Then
TextBox14.Text = TextBox4.Text * TextBox1.Text
TextBox16.Text = TextBox5.Text * TextBox2.Text
TextBox17.Text = TextBox6.Text * TextBox3.Text
TextBox15.Text = TextBox12.Text * TextBox9.Text
TextBox18.Text = TextBox11.Text * TextBox8.Text
TextBox13.Text = (TextBox14.Text) + (TextBox16.Text) + (TextBox17.Text) + (TextBox15.Text) + (TextBox18.Text) & " W"
MsgBox("A potência real de sua fonte de alimentação é de " & TextBox13.Text)
End If
End Sub
Problema: Se eu colocar 1 + 1 + 1 + 1 + 1 ele dá o resultado: 11111
Como assim?? Alguem poderia me ajudar?
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox7.Enabled = True And TextBox10.Enabled = True Then
TextBox14.Text = TextBox4.Text * TextBox1.Text
TextBox16.Text = TextBox5.Text * TextBox2.Text
TextBox17.Text = TextBox6.Text * TextBox3.Text
TextBox15.Text = TextBox12.Text * TextBox9.Text
TextBox18.Text = TextBox11.Text * TextBox8.Text
TextBox13.Text = (TextBox14.Text) + (TextBox16.Text) + (TextBox17.Text) + (TextBox15.Text) + (TextBox18.Text) & " W"
MsgBox("A potência real de sua fonte de alimentação é de " & TextBox13.Text)
End If
End Sub
Problema: Se eu colocar 1 + 1 + 1 + 1 + 1 ele dá o resultado: 11111
Como assim?? Alguem poderia me ajudar?
Comment