<div dir="ltr"><div><br>This is very similar to what I posted yesterday (to another question), but I will extent the script a bit to make it more clear:<br><br>Dim strName as String<br>Dim theState as SlideState<br>Dim theText as SlideText<br>
strName = "Odp" & Slide1.RESP<br>Set theState = Slide1.States (Slide1.ActiveState)<br>Set theText = CSlideText(theState.Objects(strName))<br>If Not theText Is Nothing Then<br></div>   ' just changing a few properties here...<br>
<div>   theText.BackColor = CColor("silver")<br>   theText.FontBold = CLogical("Yes")<br>   theText.FontUnderline = CLogical("Yes")<br><div>   theText.Draw<br></div><div>Else<br></div><div>   '  oops: unexpected response<br>
</div>End If<br><div><br></div><div>Make sure to replace Slide1 with the name of your slide. Also ,you still have to make sure that the changed graphics will be visible for some time. (E.g. use a wait object)<br></div><div>
<br></div><div>Paul<br></div><div><br></div></div></div><div class="gmail_extra"><br><br><div class="gmail_quote">On 4 July 2013 15:41, Anna <span dir="ltr"><<a href="mailto:osowska.anna@gmail.com" target="_blank">osowska.anna@gmail.com</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><p class="MsoNormal"><span lang="EN-GB">Hi David,<u></u><u></u></span></p>

<p class="MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt"><span lang="EN-GB">thank you for your reply but it’s
not exactly what I’m looking for. I’m interested in a solution which will allow
to underline text objects with the numbers of possible responses after
respondent makes a choice using keyboard. For example, if respondent presses “1”,
the text object with number “1”will be underlined/highlighted or its backcolor
will change.<u></u><u></u></span></p>

<p class="MsoNormal"><span lang="EN-GB">Have you
got any idea how to do this?<u></u><u></u></span></p>

<p class="MsoNormal" style="margin-bottom:0cm;margin-bottom:.0001pt"><span lang="EN-GB">Regards,<u></u><u></u></span></p>

<p class="MsoNormal"><span lang="EN-GB">Anna<span class="HOEnZb"><font color="#888888"><u></u><u></u></font></span></span></p><span class="HOEnZb"><font color="#888888">

<p></p>

-- <br>
You received this message because you are subscribed to the Google Groups "E-Prime" group.<br>
To unsubscribe from this group and stop receiving emails from it, send an email to <a href="mailto:e-prime%2Bunsubscribe@googlegroups.com" target="_blank">e-prime+unsubscribe@googlegroups.com</a>.<br>
To post to this group, send email to <a href="mailto:e-prime@googlegroups.com" target="_blank">e-prime@googlegroups.com</a>.<br>
To view this discussion on the web visit <a href="https://groups.google.com/d/msgid/e-prime/98d3fef9-9a87-45df-8883-b93290ce926d%40googlegroups.com" target="_blank">https://groups.google.com/d/msgid/e-prime/98d3fef9-9a87-45df-8883-b93290ce926d%40googlegroups.com</a>.<br>

For more options, visit <a href="https://groups.google.com/groups/opt_out" target="_blank">https://groups.google.com/groups/opt_out</a>.<br>
 <br>
 <br>
</font></span></blockquote></div><br></div>

<p></p>

-- <br />
You received this message because you are subscribed to the Google Groups "E-Prime" group.<br />
To unsubscribe from this group and stop receiving emails from it, send an email to e-prime+unsubscribe@googlegroups.com.<br />
To post to this group, send email to e-prime@googlegroups.com.<br />
To view this discussion on the web visit <a href="https://groups.google.com/d/msgid/e-prime/CAKAdR-tiEUjRKHg3apttYQs6eyzv7mGF%3DP4NYLqarLT2qYHyTw%40mail.gmail.com">https://groups.google.com/d/msgid/e-prime/CAKAdR-tiEUjRKHg3apttYQs6eyzv7mGF%3DP4NYLqarLT2qYHyTw%40mail.gmail.com</a>.<br />
For more options, visit <a href="https://groups.google.com/groups/opt_out">https://groups.google.com/groups/opt_out</a>.<br />
 <br />
 <br />