Mega Code Archive

 

Categories / VB.Net Tutorial / Statements

 

Using ForNext structure to demonstrate summation

Imports System.Windows.Forms Module Tester     Sub Main()         Dim sum = 0, number As Integer         ' add even numbers from 2 to 100         For number = 2 To 100 Step 2          sum += number         Next       Console.WriteLine("The sum is " & sum & "Sum even integers from 2 to 100")     End Sub  End Module The sum is 2550Sum even integers from 2 to 100