查看: 152|回复: 0
打印 上一主题 下一主题

[eprime] IAT实验问题 [复制链接]

Rank: 2

水晶
79
心级
71
精华
0
主题
12
帖子
28
跳转到指定楼层
楼主
发表于 5?天前 |只看该作者 |倒序浏览
想在被试反应错误的时候加一个叉号,并纠正,代码如下:
Dim theSlide As Slide
Dim theState As SlideState
Dim theSlideText As SlideText
Set theSlide=CSlide(Rte.GetObject("Slide1"))
Set theState=theSlide.States("Default")
Set theSlideText=CSlideText(theState.Objects("Text1"))


if Slide1.ACC=0 Then
TheSlideText.ForeColor=CColor("red")
TheSlideText.Text="X"
theSlideText.Draw
Else
theSlideText.Text = "??"

GoTo Again

End If


现在是无论被试反应正确还是错误,叉号都出现,应该怎么修改呢?望大神指点,急!急!急!

转发到微博
今天在我爱脑科学的网站上,发现了长久以来一直想找的好东东,开心!
您需要登录后才可以回帖 登录 | 注册

bottom

Powered by Discuz! X2

? 2001-2011 Template By Yeei. Comsenz Inc.

回顶部