另见堆栈溢出问题:我应该总是使用AndAlso和OrElse操作符吗?

另外:对那些提到使用And的人的评论，如果表达式的右侧有副作用，你需要:

如果右侧有你需要的副作用，只需将其移到左侧，而不是使用“And”。只有在双方都有副作用的情况下你才需要"并且"如果你有那么多的副作用你可能做错了其他事情。一般来说，你应该更喜欢AndAlso。

对于我们大多数人来说，除了少数令人困惑的例外(不到1%的情况下，我们可能不得不使用Or和and)， OrElse和AndAlso可以做到这一点。

尽量不要被那些炫耀布尔逻辑的人带着走，让它看起来像火箭科学。

这是非常简单和直接的，偶尔你的系统可能不会像预期的那样工作，因为它首先不喜欢你的逻辑。然而，你的大脑一直告诉你，他的逻辑是100%经过测试和证明的，它应该是有效的。在那一刻，不要再相信你的大脑，让他重新思考，或者(不是OrElse，也可能是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将停止任何进一步求值。

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

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


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

对于所有那些说副作用是邪恶的人来说:在一种情况下有两个副作用是好的，那就是同时读取两个文件对象。

While File1.Seek_Next_Row() And File2.Seek_Next_Row()
    Str1 = File1.GetRow()
    Str2 = File2.GetRow()
End While

使用And可以确保每次检查条件时都使用一行。而AndAlso可能会读取File1的最后一行，而不消耗File2的行。

当然，上面的代码不会起作用，但我一直在使用这样的副作用，不会像有些人让你相信的那样，认为它是“坏”或“邪恶”的代码。它易于阅读和高效。

理解:用语言而不是用密码来理解:

用例:使用“And”，编译器将检查所有条件，所以如果你检查一个对象可能是“Nothing”，然后你检查它的一个属性，你将会有一个运行时错误。 但是对于AndAlso，如果条件中第一个“false”，它会检查下一个，这样就不会出现错误。