Dim Condition(7) As Boolean
Dim I As Long
For I = 0 To 7
Condition(I) = True
Next I
If Condition(0) = True Then
MsgBox "Condition 0 is True", vbExclamation
If Condition(1) = True Then
MsgBox "Condition 1 is True", vbExclamation
If Condition(2) = True Then
MsgBox "Condition 2 is True", vbExclamation
If Condition(3) = True Then
MsgBox "Condition 3 is True", vbExclamation
If Condition(4) = True Then
MsgBox "Condition 4 is True", vbExclamation
If Condition(5) = True Then
MsgBox "Condition 5 is True", vbExclamation
If Condition(6) = True Then
MsgBox "Condition 6 is True", vbExclamation
If Condition(7) = True Then
MsgBox "It's All True!!!",vbExclamation
End If 'End Condition 7 Block
End If 'End Condition 6 Block
End If 'End Condition 5 Block
End If 'End Condition 4 Block
End If 'End Condition 3 Block
End If 'End Condition 2 Block
End If 'End Condition 1 Block
End If 'End Condition 0 Block