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

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


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

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

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 / 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将停止任何进一步求值。

使用And和Or进行逻辑位操作，例如x% = y%或3

AndAlso和OrElse是If语句:

如果x > 3 AndAlso x <= 5那么

和

If (x > 3) And (x <= 5) Then

在我看来…

同样值得注意的是，(我)建议你在If语句中包含逻辑运算符的方程，这样它们就不会被编译器误解，例如:

If x = (y And 3) And also…

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

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

这是非常简单和直接的，偶尔你的系统可能不会像预期的那样工作，因为它首先不喜欢你的逻辑。然而，你的大脑一直告诉你，他的逻辑是100%经过测试和证明的，它应该是有效的。在那一刻，不要再相信你的大脑，让他重新思考，或者(不是OrElse，也可能是OrElse)你强迫自己去找另一份不需要太多逻辑的工作。