vba - 替代具有多个条件的 IF 语句，这些条件都等于相同的值

Question

还有比这更好的方法吗？（假设所有变量都为零）

If var1 = 0 Or var2 = 0 Or var3 = 0 Or var4 = 0 Or var5 = 0 Or var6 = 0 Then
    'do something
End If

标签： vba

Answer 1

您可以使用Select Case. 它还会使评估短路（与If语句不同）：

Select Case 0
    Case var1, var2, var3, var4, var5, var6
        'do something
End Select