If...Or...Then

[Matt Paffel]

Hello

I have Multiple slideslates that I'm tring to change based on the
script below, however the script isn't performing as I'd like it to.

The message from the output window after debugging states:

3Lose3
False
2Lose3
False
1Lose3
False

This tells me that it's collecting the responses correctly and setting
a slide state but it looks as though the program is going through the
arguments and declaring them all false, which is not the case. Is
there something I need to include as the arguments make use of the
"OR" statement or is something else such as my overzealous use of the
If...Then statement?

Note: I've added indents here to make it easier to look at.


If LotteryChoice.RESP = "1" And c.GetAttrib("FeedBack1") = "0"_
 OR c.GetAttrib("FeedBack2") = "0" OR c.GetAttrib("FeedBack3") = "0"
Then
 Set Slide1.ActiveState = "Default1"
End If
If LotteryChoice.RESP = "2" And c.GetAttrib("FeedBack1") = "0" OR
c.GetAttrib("FeedBack2") = "0" OR c.GetAttrib("FeedBack3") = "0" Then
 Set Slide1.ActiveState = "Default2"
End If
If LotteryChoice.RESP = "3" And c.GetAttrib("FeedBack1") = "0" OR
c.GetAttrib("FeedBack2") = "0" OR c.GetAttrib("FeedBack3") = "0" Then
 Set Slide1.ActiveState = "Default3"
End If
If LotteryChoice.RESP = "1" And c.GetAttrib("FeedBack1") = "1" OR
c.GetAttrib("FeedBack2") = "1" OR c.GetAttrib("FeedBack3") = "1" Then
 Set Slide1.ActiveState = "Victory1"
End If
If LotteryChoice.RESP = "2" And c.GetAttrib("FeedBack1") = "1" OR
c.GetAttrib("FeedBack2") = "1" OR c.GetAttrib("FeedBack3") = "1" Then
 Set Slide1.ActiveState = "Victory2"
End If
If LotteryChoice.RESP = "3" And c.GetAttrib("FeedBack1") = "1" OR
c.GetAttrib("FeedBack2") = "1" OR c.GetAttrib("FeedBack3") = "1" Then
 Set Slide1.ActiveState = "Victory3"
End If
If LotteryChoice.RESP = "1" And c.GetAttrib("FeedBack1") = "2" OR
c.GetAttrib("FeedBack2") = "2" OR c.GetAttrib("FeedBack3") = "2" Then
 Set Slide1.ActiveState = "Lose1"
End If
If LotteryChoice.RESP = "2" And c.GetAttrib("FeedBack1") = "2" OR
c.GetAttrib("FeedBack2") = "2" OR c.GetAttrib("FeedBack3") = "2" Then
 Set Slide1.ActiveState = "Lose2"
End If
If LotteryChoice.RESP = "3" And c.GetAttrib("FeedBack1") = "2" OR
c.GetAttrib("FeedBack2") = "2" OR c.GetAttrib("FeedBack3") = "2" Then
 Set Slide1.ActiveState = "Lose3"
End If

-- 
You received this message because you are subscribed to the Google Groups "E-Prime" group.
To post to this group, send email to e-prime at googlegroups.com.
To unsubscribe from this group, send email to e-prime+unsubscribe at googlegroups.com.
For more options, visit this group at http://groups.google.com/group/e-prime?hl=en.