nancy Posted November 13, 2015 at 08:55 AM Report Share #589648 Posted November 13, 2015 at 08:55 AM Alguém consegue-me ajudar a resolver esta dúvida. Introduz-se números que supostamente iriam ser somados, mas o programa soma os primeiros números, mas depois a soma começa a dar incorreta. Obrigado. Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim soma, numero As Integer Do numero = numero + 1 soma = soma + numero TextBox2.Text = soma Loop Until numero = Val(TextBox1.Text) End Sub End Class Link to comment Share on other sites More sharing options...
acao Posted November 13, 2015 at 01:41 PM Report Share #589657 Posted November 13, 2015 at 01:41 PM boas, a variavel soma toda vez que o loop passa soma 1, depois soma 2, depois soma 3, etc., não soma sempre +1. se não resolveres diz o que pretendes. cumps acao Link to comment Share on other sites More sharing options...
manuel antonio Posted December 13, 2015 at 11:58 AM Report Share #590612 Posted December 13, 2015 at 11:58 AM (edited) Se ainda segues o tópico, Penso que há vários erros na tua questão. 1º - A variável soma, (se pretendes nº inteiro), deve ser declarada com integer e está como variant. Dim soma as integer, numero as integer 2º - Também deves inicializar as variáveis soma e numero antes de iniciar o ciclo, para que o código tenha o ponto de partida que pretendes. 3º - O valor a colocar em textbox, deverá ser textbox1.value e não .text e pela mesma lógica, a última linha deverá bastar: loop until numero=textbox.value. Edited December 13, 2015 at 12:02 PM by manuel antonio Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now