可以帮我一下吗？

[manp]

我自己编了一段代码，这段代码的意思是如果哪个单选按钮被选中，那么文本框就显示选中的选项：
<script language=vbscript>
sub shuaxin(parm)
dim TStr
i=parm
if parent.right.document.myform.elements("ans"&i)(0).checked then document.form1.elements("num"&i).value="a"
if parent.right.document.myform.elements("ans"&i)(1).checked then document.form1.elements("num"&i).value="b"
if parent.right.document.myform.elements("ans"&i)(2).checked then document.form1.elements("num"&i).value="c"
if parent.right.document.myform.elements("ans"&i)(3).checked then document.form1.elements("num"&i).value="d"
end sub
</script>
<form action="" name="form1" method=post>
<input type="text" name=num<%=i%>>
a
b
c
d
</form>
现在我想把这段代码改一下，就是如果哪个按钮被选中了，上面abcd哪个字母就变成红色

[GageCSDN]

<script language=vbscript>
sub shuaxin(parm)
dim TStr
i=parm
if parent.right.document.myform.elements("ans"&i)(0).checked then document.all.result.innerHTML = "<font color=""red"">a</font> b c d"
if parent.right.document.myform.elements("ans"&i)(1).checked then document.all.result.innerHTML = "a <font color=""red"">b</font> c d"
if parent.right.document.myform.elements("ans"&i)(2).checked then document.all.result.innerHTML = "a b <font color=""red"">c</font> d"
if parent.right.document.myform.elements("ans"&i)(3).checked then document.all.result.innerHTML = "a b c <font color=""red"">d</font>"
end sub
</script>
<span id="result">a b c d</span>
<form action="" name="form1" method=post>
<input type="text" name=num<%=i%>>
</form>

[GageCSDN]

或者:
<script language=vbscript>
sub shuaxin(parm)
dim TStr
i=parm
if parent.right.document.myform.elements("ans"&i)(0).checked then document.form1.elements("ans"&i).style.color="red"
if parent.right.document.myform.elements("ans"&i)(1).checked then document.form1.elements("ans"&i).style.color="red"
if parent.right.document.myform.elements("ans"&i)(2).checked then document.form1.elements("ans"&i).style.color="red"
if parent.right.document.myform.elements("ans"&i)(3).checked then document.form1.elements("ans"&i).style.color="red"
end sub
</script>

[manp]

elements("ans"&i).style.color="red"这个在哪体现?

[manp]

上面的方法确实是我想实现的，但是我最后做成是希望这样
我的代码中i=parm，i是题号，当第一题被选中了，那么对应的i 就变色，不是象刚才那样知道有abcd，

[manp]

有人在吗？