VB6效率优化：IF

设定下面的C1仅可能与CW1-5之一相等。

算法1：

CCC = 0
If C1 = CW1 Then
  CCC = 1
End If
If C1 = CW2 Then
  CCC = 1
End If
If C1 = CW3 Then
  CCC = 1
End If
If C1 = CW4 Then
  CCC = 1
End If
If C1 = CW5 Then
  CCC = 1
End If

算法2：

CCC = 0
If C1 = CW1 Then
  CCC = 1
ElseIf C1 = CW2 Then
  CCC = 1
ElseIf C1 = CW3 Then
  CCC = 1
ElseIf C1 = CW4 Then
  CCC = 1
ElseIf C1 = CW5 Then
  CCC = 1
End If

算法3：

If C1 = CW1 Then
  CCC = 1
ElseIf C1 = CW2 Then
  CCC = 1
ElseIf C1 = CW3 Then
  CCC = 1
ElseIf C1 = CW4 Then
  CCC = 1
ElseIf C1 = CW5 Then
  CCC = 1

Else

  CCC = 0
End If

算法4：

CCC = 0
If C1 = CW1 Or C1 = CW2 Or C1 = CW3 Or C1 = CW4 Or C1 = CW5 Then
  CCC = 1
End If

实测表明：

1、2最佳，1次之，3最差；

2、2和3效率并不等同，本人的运算条件实测结论是2优于3。