a=thisform.text1.value
b=thisform.text2.value
n=thisform.optiongroup1.value
do case
case n=1
thisform.text3.value=a+b
case n=2
thisform.text3.value=a-b
case n=3
thisform.text3.value=a*b
case n=4
thisform.text3.value=a/b
endcase
thisform.refresh
你在计算按钮上双击,在其click事件中输入代码a=thisform.text1.value
b=thisform.text2.value
n=thisform.optiongroup1.value
do case
case n=1
thisform.text3.value=a+b
case n=2
thisform.text3.value=a-b
case n=3
thisform.text3.value=a*b
case n=4
thisform.text3.value=a/b
endcase
thisform.refresh
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)