我的计算器程序无法获取类型值 [英] My calculator program cannot get the type value

查看:97
本文介绍了我的计算器程序无法获取类型值的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!

问题描述

<html>
<head>
<script language="vbscript">
dim op,p,mi,mu,di,md,equ
function num1()
f1.t1.value=eval(f1.t1.value+f1.b1.value)
end function
function num2()
f1.t1.value=eval(f1.t1.value+f1.b2.value)
end function
function num3()
f1.t1.value=eval(f1.t1.value+f1.b3.value)
end function
function num4()
f1.t1.value=eval(f1.t1.value+f1.b4.value)
end function
function num5()
f1.t1.value=eval(f1.t1.value+f1.b5.value)
end function
function num6()
f1.t1.value=eval(f1.t1.value+f1.b6.value)
end function
function num7()
f1.t1.value=eval(f1.t1.value+f1.b7.value)
end function
function num8()
f1.t1.value=eval(f1.t1.value+f1.b8.value)
end function
function num9()
f1.t1.value=eval(f1.t1.value+f1.b9.value)
end function
function num0()
f1.t1.value=eval(f1.t1.value+f1.b0.value)
end function
function dot1()
f1.t1.value=f1.t1.value+"."
end function

function plus()
p=eval(f1.t1.value)
op="+"
f1.t1.value=" "
end function

function minus()
p=eval(f1.t1.value)
op="-"
f1.t1.value=" "
end function

function mul()
p=eval(f1.t1.value)
op="*"
f1.t1.value=" "
end function

function div()
p=eval(f1.t1.value)
op="/"
f1.t1.value=" "
end function

fuction equal()
equ=eval(f1.t1.value)
if op="+" then
f1.t1.value=p+equ

elseif op="-" then
f1.t1.value=p-equal

elseif op="*" then
f1.t1.value=p*equal

elseif op="/" then
f1.t1.value=p/equal
end if
end function
</script>
</head>

<body bgcolor="pink">
<center>
<font color="green">
<h1>Calculator Program</h1>
</font>
<hr>
<form name=f1>
<br>
<table border="2" cellspacing="5" cellpadding="5">
<tr>
<td><input type="text" name="t1" value=" "></td>
<td><input type="reset" name="c" value="C"></td>
</tr>
</table>

<table border="2" bordercolor="blue" cellspacing="5" cellpadding="10">
<tr>
<td><input type="button" name="b1" value="1" onclick="num1()"></td>
<td><input type="button" name="b2" value="2" onclick="num2()"></td>
<td><input type="button" name="b3" value="3" onclick="num3()"></td>
<td><input type="button" name="p" value="+" onclick="plus()"></td>
</tr>
<tr>
<td><input type="button" name="b4" value="4" onclick="num4()"></td>
<td><input type="button" name="b5" value="5" onclick="num5()"></td>
<td><input type="button" name="b6" value="6" onclick="num6()"></td>
<td><input type="button" name="mi" value="-" onclick="minus()"></td>
</tr>
<tr>
<td><input type="button" name="b7" value="7" onclick="num7()"></td>
<td><input type="button" name="b8" value="8" onclick="num8()"></td>
<td><input type="button" name="b9" value="9" onclick="num9()"></td>
<td><input type="button" name="mu" value="*" onclick="mul()"></td>
</tr>
<tr>
<td><input type="button" name="b0" value="0" onclick="num0()"></td>
<td><input type="button" name="dot" value="." onclick="dot1()"></td>
<td><input type="button" name="equ" value="=" onclick="equal()"></td>
<td><input type="button" name="di" value="/" onclick="div()"></td>
</tr>
</table>
</form>
</center>
</body>
</html>

推荐答案

首先,你无法真正使用VBScript编程真实的网站。它基本上只受IE支持,那么,谁需要这样的页面呢?要在网站上发布您的作品,您真的需要用JavaScript编写。



你想使用 eval 很棒,但在接下来的步骤中你无处可去。事情比这简单得多:在整个计算器中只使用一个 eval 就足够了,结果要好得多。



请参阅我的CodeProject文章中的计算器,其中包含所有想法和技术的详细说明: JavaScript计算器 [ ^ ]。



祝你好运,

-SA
First of all, you cannot really use VBScript for programming of a "real" Web site. It is supported, basically, only by IE, so, who will need such page? To publish your work on a Web site, you really need to write in JavaScript.

You idea to use eval is great, but in your next steps you go nowhere. Things are much, much simpler than that: it's enough to use only one eval in whole calculator, with much, much better results.

Please see my calculator available in my CodeProject article, complete with detail explanations of all the ideas and techniques: JavaScript Calculator[^].

Good luck,
—SA


这篇关于我的计算器程序无法获取类型值的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!

查看全文
登录 关闭
扫码关注1秒登录
发送“验证码”获取 | 15天全站免登陆