Sub Main()
        Dim s As Integer = 0
        For i As Integer = 101 To 199 Step 2
            s += i
        Next
        Console.WriteLine("s=" & s)
        If (s Mod 2) = 0 Then
            Console.WriteLine("和是偶数")
        Else
            Console.WriteLine("和是奇数")
        End If
        Console.ReadKey()
    End Sub

由于.net平台下C#和vb@L_301_0@很相似，本文也可以为C#爱好者提供的参考。

学习更多vb.net知识，请参看 vb.net 教程 目录