替代IF语句,其中多个条件都等于相同的值

Sla*_*lab 2 vba

有比这更好的方法吗?(假设所有的变量都等于零)

If var1 = 0 Or var2 = 0 Or var3 = 0 Or var4 = 0 Or var5 = 0 Or var6 = 0 Then
    'do something
End If
Run Code Online (Sandbox Code Playgroud)

Com*_*ern 5

你可以用一个Select Case.它还会使评估短路(与If声明不同):

Select Case 0
    Case var1, var2, var3, var4, var5, var6
        'do something
End Select
Run Code Online (Sandbox Code Playgroud)