If event1 comes out as a string:

VB Code:
  1. If event1 <> "Relay" then
  2. points = 5 - position1
  3. Else
  4. points = 10 - (position1*2)
  5. End if


zaza