VB.net 2010 AndAlso，OrElse和And，Or的区别

'*************************************************************************

'**模 块 名：VB.net 2010 AndAlso，OrElse和And，Or的区别

'**说    明：蓝凤凰设计商城 浴火凤凰-郭卫 | 蓝凤凰－魔灵 | 郭卫－icecept

'**创 建 人：浴火凤凰-郭卫

'**日    期：2015年10月11日  12:00:13

'**修 改 人：浴火凤凰-郭卫

'**日    期：

'**描    述：QQ：493405998 | 微信\旺旺：icecept

'**版    本：V1.0.0 | http://blog.sina.com.cn/icecept

'*************************************************************************

AndAlso和OrElse应该是vb.net引入的新运算符。
AndAlso，OrElse相对于and，or最大的特性是会自动实现“最短路径”。
所谓“最短路径”就是指：当第一个被比较的运算式的结果已经能决定运算的最终结果时，就不会再去比较其他运算式，因此可以避免掉额外且不需要的比较运算式。举个很简单的例子说明下： 
1 Dim a As Int16 = 1
2 Dim b As Int16 = 2
3
4 '用or的话，a=1，b=2都会被比较
5 If a = 1 Or b = 2 Then
6 'xxxxx
7 End If
8
9 '用OrElse的话，只比较了第一个条件a=1
10 If a = 1 OrElse b = 2 Then
11 'xxxx
12 End If
当用or的时候，a=1和b=2这2个条件，都会被判断。而用orelse，则当前面一个条件（a=1)已经能决定最终结果的话，程序就不会在判断第二个条件（b=2）了。类似的情况还有：
1 Dim a As Int16 = 1
2 Dim b As Int16 = 2
3
4 '用and的话，a=999，b=2,(a + b) * (b - a) = 3 都会被比较
5 If a = 999 And b = 2 And (a + b) * (b - a) = 3 Then
6 'xxxxx
7 End If
8
9 '用AndAlso的话，只比较了第一个条件a=999,由于已经是false了，所以后面的运算式不再判断
10 If a = 999 AndAlso b = 2 AndAlso (a + b) * (b - a) = 3 Then
11 'xxxx
12 End If
当出现以上情况时，AndAlso和OrElse的效率要高于and，or。
综上所述： andalso 只要第一个判断式不成立，则后面的运算符将不再判断
orelse 只要第一个判断式成立，则后面的运算符将不再判断,如果第一个判断式不成立，则继续执行第二个判断式，以次类推。

Private Sub Button10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button10.Click
        Dim i As Int32
        For i = 1 To 20
            '当第一个条件不成立，AndAlso后面的表达式将不执行。若第一个表达式成立，则进行对第二个表达式的判断
            If i < 10 AndAlso i Mod 2 = 0 Then
                Debug.Print(i & "小于10的偶数")
                '若第一个判断表达式成立，则后面的运算符将不再判断,如果第一个判断表达式不成立，
                '则继续执行第二个判断表达式　
                '以下当i<10时，第一个不成立，则去判断OrElse　后面的 i Mod 2 = 0　
                '当i>10时，第一个成立，程序将不再判断OrElse　后面的 i Mod 2 = 0
            ElseIf i > 10 OrElse i Mod 2 = 0 Then '
                Debug.Print(i & "大于10的数")
            End If
        Next
    End Sub

执行结果：

2小于10的偶数
4小于10的偶数
6小于10的偶数
8小于10的偶数
10大于10的数
11大于10的数
12大于10的数
13大于10的数
14大于10的数
15大于10的数
16大于10的数
17大于10的数
18大于10的数
19大于10的数
20大于10的数