[2005] Pls help me

[thenhemadecuic]

I have this teacher that doesn't offer any help and gives things that are not in the book. Even though my problem is simple I am also a beginner at this.
I'm having trouble with a loop the accumulates odd numbers but excludes the numbers input into the to input text boxes.

Say I put 1 in the lesser text box and 6 in the greater text box. How would I go about accumulating all odd numbers between 1 and 6. They would be 3 and 5 leaving me with a sum of 8 but im getting 9 because i can't exclude the inputs.

My code is

 Private Sub calcBtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles calcBtn.Click
        Dim SumInteger As Integer = 0
        Dim lesserInteger As Integer = 0
        Dim greaterInteger As Integer = 100
        With Me
            lesserInteger = Integer.Parse(.lesserTB.Text)
            greaterInteger = Integer.Parse(.greaterTB.Text)


            Do While lesserInteger <= greaterInteger
                SumInteger += lesserInteger
                lesserInteger += 2

            Loop
            .answerlbl.Text = SumInteger.ToString("N")
        End With
    End Sub

[MaximilianMayrhofer]

Private Sub calcBtn_Click( _
    ByVal sender As System.Object, _
    ByVal e As System.EventArgs _
) Handles calcBtn.Click
    Dim total As Integer = 0
    Dim start As Integer = Integer.Parse(lesserTB.Text)
    Dim endnum As Integer = Integer.Parse(greaterTB.Text)
  
    If start mod 2 = 0 Then start -= 1
    
    Do While start < endnum - 2
        start += 2
        total += start
    Loop 

    MessageBox.Show(total.ToString())
End Sub

[Pradeep1210]

I have this teacher that doesn't offer any help and gives things that are not in the book.
...

hehe..
I think he his doing a much bigger help to you in the long run. Every teacher teaches what is in the textbooks, but only a few go above it to take pains to get you something more.

[thenhemadecuic]

Thanks that worked better then what i had figured out

[rahiparikh]

Hi,

You may simply wish to try something like this...

Private Sub calcBtn_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles calcBtn.Click
        Dim SumInteger As Integer = 0
        Dim lesserInteger As Integer = 0
        Dim greaterInteger As Integer = 0
 
        With Me
            lesserInteger = Integer.Parse(.lesserTB.Text) + 1
            greaterInteger = Integer.Parse(.greaterTB.Text) - 1
 
            For ctr As Integer = lesserInteger To greaterInteger Step 1
                        if ctr Mod 2 != 0 then
                                    sum = sum + ctr
                        End If
            Next
        End With
End Sub