feedback object - correct answer one of many

[Matt Lenhart]

Hi Caren,

The easiest way to do this would be to place all of your words into an
array and then use a loop to check the subject's response against all
of the possible correct answers. For example:

Dim arrCorrect(40) As String
arrCorrect(1) = "x"
arrCorrect(2) = "y"
...

Then, after the response has come in, you would do:

Dim nCount As Integer

For nCount = 1 To 40
 If Stimulus.RESP = arrStim(nCount) Then
  Stimulus.ACC = 1
  Exit For
 End If
Next

This will automatically check the subject's response against every
possible answer. If there is a match, it sets the ACC property to 1,
which is what the FeedbackDisplay bases its presentation on (i.e. ACC
= 1 displays correct feedback). The Exit For command is used to jump
out of the loop if a match is made (i.e. since the response will not
match any other possibilities and there is no reason to continue
checking).

- Matt


--~--~---------~--~----~------------~-------~--~----~
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
-~----------~----~----~----~------~----~------~--~---