vbscript调用的参数好像没赋值啊?求了

来源:百度知道 编辑:UC知道 时间:2024/06/17 01:32:22
<script language="VBScript" type="text/VBScript">

sub A()
dim a,b,c
a=int(rnd(1)*100)
b=int(rnd(1)*100)
c=(a+b)
form1.textfield1.Value=a
form1.textfield2.Value=b

end sub

sub B()
dim d
d=form1.textfield3.value
if c=d then
alert("^_^恭喜你计算正确!")
else
alert("Sorry你算错拉~……")
End if
end sub
</script>
==============
就判断那里不行,只有textfield3是null的时候判断语句才为真,怎么搞的啊?谢谢了

这是很明显的啊。
你在sub里面的c在外面就失去作用域了,意思就是这个c的值只是在sub内部改变了,到了sub外部就为空了,c在外部始终为NULL。
为了解决这个问题,你必须把c换为地址来赋值,或者直接写一个函数返回c,然后再比较。