对于下一步循环显示不正确的值

代码有两个选项。选项一以1美元开始，每天双打10天。如果这是正确的值应为$ 1024个，而是它表明两倍（$ 2046个）对于下一步循环显示不正确的值

第二个选项$ 100开始，并增加了每天100 $ 10天。这个数字应该达到1000美元，而不是显示6500美元

Public Class Form1 
    Private Sub compareButton_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles compareButton.Click 

     Dim initValue1 As Integer = 1 
     Dim value1 As Integer 
     Dim initValue2 As Integer = 100 
     Dim value2 As Integer 

     Integer.TryParse(Option1TextBox.Text, value1) 
     Integer.TryParse(Option2TextBox.Text, value2) 



     For day As Integer = 1 To 10 
      initValue1 = initValue1 * 2 
      value1 += initValue1 
     Next day 

     Option1TextBox.Text = value1.ToString("C2") 

     For day As Integer = 1 To 10 
      initValue2 = initValue2 + 100 
      value2 += initValue2 
     Next day 

     Option2TextBox.Text = value2.ToString("C2") 

    End Sub 
End Class

我觉得我犯了一个很小的错误。任何帮助？

来源

2012-02-02 Nick Balistreri

我建议你设置在For循环中断点，以便您可以实际观察发生了什么。这不是一个真正的代码问题，而是一个逻辑问题。让我知道你是否需要知道如何使用断点。祝你好运！ – SquidScareMe 2012-02-02 10:40:51

试试这个：
的值1号极品+ = initValue1和值2 + = initValue2移除，然后再试

Dim initValue1 As Integer = 1 
     Dim value1 As Integer 
     Dim initValue2 As Integer = 100 
     Dim value2 As Integer 
     Integer.TryParse(Option1TextBox.Text, value1) 
     Integer.TryParse(Option2TextBox.Text, value2) 
     For day As Integer = 1 To 9 
      initValue1 = initValue1 * 2 
     Next 
     Option1TextBox.Text = initValue1.ToString("C2") 
     For day As Integer = 1 To 9 
      initValue2 = initValue2 + 100 
     Next 
     Option2TextBox.Text = initValue2.ToString("C2")

enter image description here

来源

2012-02-02 11:15:16 Vinod

对于下一步循环显示不正确的值

回答

相关问题