以下是部分代码
    <input name="option1" type="radio" value="1" />   
    <input name="option1" type="radio" value="2" />   
    <input name="option1" type="radio" value="3" />   
    dim x
    randomize
    x = int(rnd()*3)+1
if document.getElementById("option1").value = x then
    ....（中间这段我想让符合value = x 的单选按钮被选中）
end if

<script language="vbscript">
function pk()
document.getElementById("option1").checked = false
document.getElementById("option2").checked = false
document.getElementById("option3").checked = false
dim x,y,a,w
randomize
x = int(rnd()*3)+1
select case x
case 1
document.getElementById("option1").checked = true
case 2
document.getElementById("option2").checked = true
case 3
document.getElementById("option3").checked = true
end select
end function
<input name="option1" type="radio" value="1" />       
剪刀</p>
      <p>
        <label></label>
        <input type="radio" name="option2" value="2" />
        石头 </p>
      <p>
        <input type="radio" name="option3" value="3" />
        布</p>

我自己研究了一个，可以显示，我想知道你怎么看这段代码，给点意见，我多做改进。

嗯好，谢谢