Note that there are some explanatory texts on larger screens.

plurals
  1. POMost Efficient Way To Write This Loop VB.Net
    primarykey
    data
    text
    <p>Good afternoon all, I am beginning my first forays into programming and have decided to begin with VB.net as I can get VS2010 professional free through MS Dreamspark program.</p> <p>I have been following some basic tutorials online and am now writing a small program that runs a loop to add all the numbers together between two numbers input by the user.</p> <p>Below is the code I have written:</p> <pre><code>Public Class Form1 Private Sub cmdAddNumbers_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdAddNumbers.Click Dim NumberOne As Integer Dim NumberTwo As Integer Dim Result As Integer Dim i As Integer If Not IsNumeric(txtNumberOne.Text) Then MsgBox("Please Enter A Valid Number For Number One") txtNumberOne.Clear() Exit Sub ElseIf txtNumberOne.Text = 0 Then MsgBox("Please Enter A Valid Number For Number One") txtNumberOne.Clear() Exit Sub ElseIf txtNumberOne.Text &gt; 0 And IsNumeric(txtNumberOne.Text) Then NumberOne = txtNumberOne.Text End If If Not IsNumeric(txtNumberTwo.Text) Then MsgBox("Please Enter A Valid Number For Number Two") txtNumberTwo.Clear() Exit Sub ElseIf txtNumberTwo.Text &lt; NumberOne Then MsgBox("Please Enter A Valid Number For Number Two") txtNumberTwo.Clear() Exit Sub ElseIf txtNumberTwo.Text &gt; NumberOne And IsNumeric(txtNumberTwo.Text) Then NumberTwo = txtNumberTwo.Text End If For i = NumberOne To NumberTwo Result = Result + i Next i txtResult.Text = Result txtNumberOne.Clear() txtNumberTwo.Clear() End Sub End Class </code></pre> <p>Now, I am wondering if I have written the most efficent If statements to execute this code or if they can be written any simpler with <code>AND</code>/<code>OR</code> statements to possibly remove some of the <code>ElseIf</code>'s.</p> <p>Any insight is greatly appreciated.</p> <p>Thank you,</p> <p>Alex</p>
    singulars
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    plurals
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. This table or related slice is empty.
 

Querying!

 
Guidance

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload