AndAlso和OrElse应该是vb.net引入的新运算符。
因为用vb。net的时间还不是很长，之前我一直以为他们和and，or根本没有区别。
现在终于明白，他们之间还是有很大区别的：
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
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）了。
类似的情况还有：
当出现以上情况时，AndAlso和OrElse的效率要高于and，or。
所以，在大多数情况下，我们可以使用AndAlso和OrElse替换and，or，以提高运算效率。
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
原文链接：https://www.f2er.com/vb/259815.html2 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