And / AndAlso Or / OrElse实际上非常有用。考虑下面的代码，如果函数DoSomethingWihtAandB返回False，它可能不会设置A和/或B:

Dim A,B,C,D As Object
If DoSomethingWithAandB(A,B)=True And A=1 And B=2 Then C=3

如果DoSomethingWithAandB返回False，它将崩溃，因为它将在And之后继续计算，A和B将等于Nothing

Dim A,B,C,D As Object
If DoSomethingWithAandB(A,B)=True AndAlso A=1 AndAlso B=2 Then C=3

如果DoSomethingWithAandB返回False，它不会崩溃，因为它将在DoSomethingWithAandB(A,B)=True时停止求值，因为返回的是False。AndAlso阻止对条件进行任何进一步的计算(因为第一个条件失败了)。OrElse的工作原理与此相同。逻辑链中求值的第一个True将停止任何进一步求值。

AndAlso很像And，除了它像c#和c++中的&&一样工作。

区别在于，如果第一个子句(AndAlso之前的子句)为真，那么第二个子句永远不会被求值——复合逻辑表达式是“短路的”。

这有时是非常有用的，例如在这样的表达式中:

If Not IsNull(myObj) AndAlso myObj.SomeProperty = 3 Then
   ...
End If

如果myObj为null，则在上面的表达式中使用旧的And将抛出NullReferenceException。

一种简单的思考方法是使用更简单的英语

If Bool1 And Bool2 Then
If [both are true] Then


If Bool1 AndAlso Bool2 Then
If [first is true then evaluate the second] Then

And运算符求两边的值，而AndAlso运算符求右边的值当且仅当左边为真。

一个例子:

If mystring IsNot Nothing And mystring.Contains("Foo") Then
  ' bla bla
End If

如果mystring = Nothing，则会抛出异常

If mystring IsNot Nothing AndAlso mystring.Contains("Foo") Then
  ' bla bla
End If

这个不抛出异常。

所以如果你来自c#世界，你应该像使用&&一样使用AndAlso。

更多信息请访问:http://www.panopticoncentral.net/2003/08/18/the-ballad-of-andalso-and-orelse/

除了上面的答案，AndAlso还提供了一个称为短路的调节过程。许多编程语言都像vb.net一样内置了这种功能，并且可以通过删除不必要的计算来大幅提高长条件语句的性能。

另一个类似的条件是OrElse条件，它只在左侧条件为假的情况下检查右侧条件，从而在发现真条件后省去不必要的条件检查。

我会建议你总是使用短路过程，并以最能从中受益的方式组织你的条件语句。例如，首先测试最有效和最快的条件，这样您只在绝对必须时运行长条件，而在其他时间运行短路。

And / AndAlso Or / OrElse实际上非常有用。考虑下面的代码，如果函数DoSomethingWihtAandB返回False，它可能不会设置A和/或B:

Dim A,B,C,D As Object
If DoSomethingWithAandB(A,B)=True And A=1 And B=2 Then C=3

如果DoSomethingWithAandB返回False，它将崩溃，因为它将在And之后继续计算，A和B将等于Nothing

Dim A,B,C,D As Object
If DoSomethingWithAandB(A,B)=True AndAlso A=1 AndAlso B=2 Then C=3

如果DoSomethingWithAandB返回False，它不会崩溃，因为它将在DoSomethingWithAandB(A,B)=True时停止求值，因为返回的是False。AndAlso阻止对条件进行任何进一步的计算(因为第一个条件失败了)。OrElse的工作原理与此相同。逻辑链中求值的第一个True将停止任何进一步求值。