I am trying to write a For... Next loop that will allow for 12 entries, or the cancel button.
Somehow intEntries is only using 1, 3, 5, 7, 9, and 11. After that is completed the calculation is being divided by 13, and not 12. I m not sure what it is I ve got wrong, but it s apparently something. Any Assistance you can give me is greatly appreciated!
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
initialize accumulator
Dim decEntries As Decimal
For loop to ask for input.
For decEntries = 1 To 12 Or strMonthlyAvg = " "
strMonthlyAvg = InputBox("Please Enter the Average for Month # " & decEntries & ":")
decEntries += 1
lstTemps.Items.Add(strMonthlyAvg)
decMontlyAvg = Convert.ToDecimal(strMonthlyAvg)
This will add the montly average to the total Average Temperature for
calculations
decTotalTemp += decMontlyAvg
Next
Calculation to provide the average temp for all entered values
decAnnualAvg = decTotalTemp / decEntries
convert annual average to string
strAnnualAvg = Convert.ToString(decAnnualAvg)
Display the results for the user
lblResults.Text = "The average annual temperature " & vbCrLf &
"based on your entries is: " & strAnnualAvg & "."
End Sub