How to display all odd numbers from given range of numbers? VB.Net Code

Loop structures allow you to execute one or more lines of code repetitively. VB.Net support the following loop statements:

• Do.....loop
• While.....End While
• For.......Next

So we can use any one of the loop statement given above to find out the odd number  between the given range of numbers. for example, if you want to display all the odd numbers between two given numbers then you can create a Windows forms like this:

The use any one below mentioned code on the click event of the button.

1 .  Private Sub BtnFind_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnFind.Click

        Dim num1, num2 As Integer

        If Val(txtfirst.Text) Mod 2 = 0 Then

            num1 = Val(txtfirst.Text) + 1

        Else

            num1 = Val(txtfirst.Text)

        End If

        num2 = Val(txtlast.Text)

        Do While num1 < num2

            ListBox1.Items.Add(num1)

            num1 = num1 + 2

        Loop

      End Sub

2  .  Dim num1, num2 As Integer

        If Val(txtfirst.Text) Mod 2 = 0 Then

            num1 = Val(txtfirst.Text) + 1

        Else

            num1 = Val(txtfirst.Text)

        End If

        num2 = Val(txtlast.Text)

        Do Until num1 > num2

            ListBox1.Items.Add(num1)

            num1 = num1 + 2

  Loop

3  .  Dim num1, num2 As Integer

        If Val(txtfirst.Text) Mod 2 = 0 Then

            num1 = Val(txtfirst.Text) + 1

        Else

            num1 = Val(txtfirst.Text)

        End If

        num2 = Val(txtlast.Text)

        For num1 = num1 To num2 Step 2

            ListBox1.Items.Add(num1)

           

        Next