| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 | 
登录
注册
用户控制面板
搜索
道具
风格
短消息
论坛展区
帮助
编程论坛 → WEB开发 → 『 ASP技术论坛 』 → 大家看看我的计算器，为什么不能运行？
我的收件箱(0)
欢迎加入我们，一同切磋技术
用户名：   
 
密　码：  
共有 1092 人关注过本帖
标题：大家看看我的计算器，为什么不能运行？
只看楼主 加入收藏
lsdm
Rank: 1
等　级：新手上路
帖　子：140
专家分：0
注　册：2006-1-7
楼主
收藏
 问题点数：0 回复次数：13 
大家看看我的计算器，为什么不能运行？

请高手指点，谢谢！！

<body>

<script language="vbscript">
sub a()
f1.t1.vaule=f1.t1.vaule & "1"
end sub
sub b()
f1.t1.vaule=f1.t1.vaule & "2"
end sub
sub c()
f1.t1.vaule=f1.t1.vaule & "3"
end sub
sub d()
f1.t1.vaule=f1.t1.vaule & "4"
end sub
sub e()
f1.t1.vaule=f1.t1.vaule & "5"
end sub
sub f()
f1.t1.vaule=f1.t1.vaule & "6"
end sub
sub g()
f1.t1.vaule=f1.t1.vaule & "7"
end sub
sub h()
f1.t1.vaule=f1.t1.vaule & "8"
end sub
sub i()
f1.t1.vaule=f1.t1.vaule & "9"
end sub
sub j()
f1.t1.vaule=f1.t1.vaule & "0"
end sub
sub k()
f1.t1.vaule=f1.t1.vaule & "+"
end sub
sub l()
f1.t1.vaule=f1.t1.vaule & "-"
end sub
sub m()
f1.t1.vaule=f1.t1.vaule & "*"
end sub
sub n()
f1.t1.vaule=f1.t1.vaule & "/"
end sub
sub cr()
f1.t1.value=""
end sub
sub compute()
f1.t1.value=eval"f1.t1.value"
end sub
</script>
<form name="f1">
<div align="center">
<table width="200" border="1" cellspacing="0" cellpadding="0">
<tr>
<td colspan="4" align="center">青蛙计算机</td>
</tr>
<tr>
<td colspan="4"><div align="center">
<input type="text" name="t1">
</div></td>
</tr>
<tr>
<td><div align="center">
<input type="button" value=" 1 " name="v1" onClick="sub a()">
</div></td>
<td><div align="center">
<input type="button" value=" 2 " name="v2" onClick="sub b()">
</div></td>
<td><div align="center">
<input type="button" value=" 3 " name="v3" onClick="sub c()">
</div></td>
<td><div align="center">
<input type="button" value=" + " name="plus" onClick="sub k()">
</div></td>
</tr>
<tr>
<td><div align="center">
<input type="button" value=" 4 " name="v4" onClick="sub d()">
</div></td>
<td><div align="center">
<input type="button" value=" 5 " name="v5" onClick="sub e()">
</div></td>
<td><div align="center">
<input type="button" value=" 6 " name="v6" onClick="sub f()">
</div></td>
<td><div align="center">
<input type="button" value=" - " name="minu" onClick="sub l()">
</div></td>
</tr>
<tr>
<td><div align="center">
<input type="button" value=" 7 " name="v7" onClick="sub g()">
</div></td>
<td><div align="center">
<input type="button" value=" 8 " name="v8" onClick="sub h()">
</div></td>
<td><div align="center">
<input type="button" value=" 9 " name="v9" onClick="sub i()">
</div></td>
<td><div align="center">
<input type="button" value=" * " name="mult" onClick="sub m()">
</div></td>
</tr>
<tr>
<td colspan="2"><div align="center">
<input type="button" value=" = " name="eqal" onClick="compute()">
</div></td>
<td><input type="button" value=" CR " name="cr" onClick="crt()"></td>
<td><div align="center">
<input type="button" value=" \ " name="divi" onClick="sub n()">
</div></td>
</tr>
</table>
</div>
</form>
</body>
</html>

搜索更多相关主题的帖子: sub　计算器　end　
2006-03-09 16:49
lsdm
Rank: 1
等　级：新手上路
帖　子：140
专家分：0
注　册：2006-1-7
第 2 楼
收藏
 得分:0 

顶一下，请高手指点啊！谢谢！！


2006-03-09 17:54
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等　级：版主
威　望：209
帖　子：12488
专家分：19042
注　册：2004-7-17
第 3 楼
收藏
 得分:0 
〈body〉
〈script language="vbscript"〉
function a()
f1.t1.value=f1.t1.value & "1"
end function
function b()
f1.t1.value=f1.t1.value & "2"
end function
function c()
f1.t1.value=f1.t1.value & "3"
end function
function d()
f1.t1.value=f1.t1.value & "4"
end function
function e()
f1.t1.value=f1.t1.value & "5"
end function
function f()
f1.t1.value=f1.t1.value & "6"
end function
function g()
f1.t1.value=f1.t1.value & "7"
end function
function h()
f1.t1.value=f1.t1.value & "8"
end function
function i()
f1.t1.value=f1.t1.value & "9"
end function
function j()
f1.t1.value=f1.t1.value & "0"
end function
function k()
f1.t1.value=f1.t1.value & "+"
end function
function l()
f1.t1.value=f1.t1.value & "-"
end function
function m()
f1.t1.value=f1.t1.value & "*"
end function
function n()
f1.t1.value=f1.t1.value & "/"
end function
function crt()
f1.t1.value=""
end function
function compute()
f1.t1.value=eval(f1.t1.value)
end function
〈/script〉
〈form name="f1"〉
〈div align="center"〉
〈table width="200" border="1" cellspacing="0" cellpadding="0"〉
〈tr〉
〈td colspan="4" align="center"〉青蛙计算机〈/td〉
〈/tr〉
〈tr〉
〈td colspan="4"〉〈div align="center"〉
〈input type="text" name="t1"〉
〈/div〉〈/td〉
〈/tr〉
〈tr〉
〈td〉〈div align="center"〉
〈input type="button" value=" 1 " name="v1" onClick="a()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 2 " name="v2" onClick="b()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 3 " name="v3" onClick="c()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" + " name="plus" onClick="k()"〉
〈/div〉〈/td〉
〈/tr〉
〈tr〉
〈td〉〈div align="center"〉
〈input type="button" value=" 4 " name="v4" onClick="d()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 5 " name="v5" onClick="e()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 6 " name="v6" onClick="f()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" - " name="minu" onClick="l()"〉
〈/div〉〈/td〉
〈/tr〉
〈tr〉
〈td〉〈div align="center"〉
〈input type="button" value=" 7 " name="v7" onClick="g()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 8 " name="v8" onClick="h()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 9 " name="v9" onClick="i()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" * " name="mult" onClick="m()"〉
〈/div〉〈/td〉
〈/tr〉
〈tr〉
〈td colspan="2"〉〈div align="center"〉
〈input type="button" value=" = " name="eqal" onClick="compute()"〉
〈/div〉〈/td〉
〈td〉〈input type="button" value=" CR " name="cr" onClick="crt()"〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" \ " name="divi" onClick="n()"〉
〈/div〉〈/td〉
〈/tr〉
〈/table〉
〈/div〉
〈/form〉
〈/body〉
〈/html〉
修改后的代码
2006-03-09 22:15
lsdm
Rank: 1
等　级：新手上路
帖　子：140
专家分：0
注　册：2006-1-7
第 4 楼
收藏
 得分:0 
[CODE]
〈body〉
〈script language="vbscript"〉
function a()
f1.t1.value=f1.t1.value & "1"
end function
function b()
f1.t1.value=f1.t1.value & "2"
end function
function c()
f1.t1.value=f1.t1.value & "3"
end function
function d()
f1.t1.value=f1.t1.value & "4"
end function
function e()
f1.t1.value=f1.t1.value & "5"
end function
function f()
f1.t1.value=f1.t1.value & "6"
end function
function g()
f1.t1.value=f1.t1.value & "7"
end function
function h()
f1.t1.value=f1.t1.value & "8"
end function
function i()
f1.t1.value=f1.t1.value & "9"
end function
function j()
f1.t1.value=f1.t1.value & "0"
end function
function k()
f1.t1.value=f1.t1.value & "+"
end function
function l()
f1.t1.value=f1.t1.value & "-"
end function
function m()
f1.t1.value=f1.t1.value & "*"
end function
function n()
f1.t1.value=f1.t1.value & "/"
end function
function crt()
f1.t1.value=""
end function
function compute()
f1.t1.value=eval(f1.t1.value)
end function
〈/script〉
〈form name="f1"〉
〈div align="center"〉
〈table width="200" border="1" cellspacing="0" cellpadding="0"〉
〈tr〉
〈td colspan="4" align="center"〉青蛙计算机〈/td〉
〈/tr〉
〈tr〉
〈td colspan="4"〉〈div align="center"〉
〈input type="text" name="t1"〉
〈/div〉〈/td〉
〈/tr〉
〈tr〉
〈td〉〈div align="center"〉
〈input type="button" value=" 1 " name="v1" onClick="a()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 2 " name="v2" onClick="b()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 3 " name="v3" onClick="c()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" + " name="plus" onClick="k()"〉
〈/div〉〈/td〉
〈/tr〉
〈tr〉
〈td〉〈div align="center"〉
〈input type="button" value=" 4 " name="v4" onClick="d()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 5 " name="v5" onClick="e()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 6 " name="v6" onClick="f()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" - " name="minu" onClick="l()"〉
〈/div〉〈/td〉
〈/tr〉
〈tr〉
〈td〉〈div align="center"〉
〈input type="button" value=" 7 " name="v7" onClick="g()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 8 " name="v8" onClick="h()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 9 " name="v9" onClick="i()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" * " name="mult" onClick="m()"〉
〈/div〉〈/td〉
〈/tr〉
〈tr〉
〈td colspan="2"〉〈div align="center"〉
〈input type="button" value=" = " name="eqal" onClick="compute()"〉
〈/div〉〈/td〉
〈td〉〈input type="button" value=" CR " name="cr" onClick="crt()"〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" / " name="divi" onClick="n()"〉
〈/div〉〈/td〉
〈/tr〉
〈/table〉
〈/div〉
〈/form〉
〈/body〉

[/CODE]

太感谢您了yms123，能耐心看完这些代码，请问这里为什么要用function呢？谢谢！！

[此贴子已经被作者于2006-3-9 22:41:00编辑过]


2006-03-09 22:39
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等　级：版主
威　望：209
帖　子：12488
专家分：19042
注　册：2004-7-17
第 5 楼
收藏
 得分:0 
回复：（lsdm）[CODE]〈body〉〈script language="v...

〈body〉
〈script language="vbscript"〉
sub a()
f1.t1.value=f1.t1.value & "1"
end sub
sub b()
f1.t1.value=f1.t1.value & "2"
end sub
sub c()
f1.t1.value=f1.t1.value & "3"
end sub
sub d()
f1.t1.value=f1.t1.value & "4"
end sub
sub e()
f1.t1.value=f1.t1.value & "5"
end sub
sub f()
f1.t1.value=f1.t1.value & "6"
end sub
sub g()
f1.t1.value=f1.t1.value & "7"
end sub
sub h()
f1.t1.value=f1.t1.value & "8"
end sub
sub i()
f1.t1.value=f1.t1.value & "9"
end sub
sub j()
f1.t1.value=f1.t1.value & "0"
end sub
sub k()
f1.t1.value=f1.t1.value & "+"
end sub
sub l()
f1.t1.value=f1.t1.value & "-"
end sub
sub m()
f1.t1.value=f1.t1.value & "*"
end sub
sub n()
f1.t1.value=f1.t1.value & "/"
end sub
sub crt()
f1.t1.value=""
end sub
sub compute()
f1.t1.value=eval(f1.t1.value)
end sub
〈/script〉
〈form name="f1"〉
〈div align="center"〉
〈table width="200" border="1" cellspacing="0" cellpadding="0"〉
〈tr〉
〈td colspan="4" align="center"〉青蛙计算机〈/td〉
〈/tr〉
〈tr〉
〈td colspan="4"〉〈div align="center"〉
〈input type="text" name="t1"〉
〈/div〉〈/td〉
〈/tr〉
〈tr〉
〈td〉〈div align="center"〉
〈input type="button" value=" 1 " name="v1" onClick="a()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 2 " name="v2" onClick="b()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 3 " name="v3" onClick="c()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" + " name="plus" onClick="k()"〉
〈/div〉〈/td〉
〈/tr〉
〈tr〉
〈td〉〈div align="center"〉
〈input type="button" value=" 4 " name="v4" onClick="d()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 5 " name="v5" onClick="e()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 6 " name="v6" onClick="f()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" - " name="minu" onClick="l()"〉
〈/div〉〈/td〉
〈/tr〉
〈tr〉
〈td〉〈div align="center"〉
〈input type="button" value=" 7 " name="v7" onClick="g()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 8 " name="v8" onClick="h()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" 9 " name="v9" onClick="i()"〉
〈/div〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" * " name="mult" onClick="m()"〉
〈/div〉〈/td〉
〈/tr〉
〈tr〉
〈td colspan="2"〉〈div align="center"〉
〈input type="button" value=" = " name="eqal" onClick="compute()"〉
〈/div〉〈/td〉
〈td〉〈input type="button" value=" CR " name="cr" onClick="crt()"〉〈/td〉
〈td〉〈div align="center"〉
〈input type="button" value=" \ " name="divi" onClick="n()"〉
〈/div〉〈/td〉
〈/tr〉
〈/table〉
〈/div〉
〈/form〉
〈/body〉
〈/html〉
用sub也可以只不过本人用function比较习惯。
2006-03-09 23:10
lsdm
Rank: 1
等　级：新手上路
帖　子：140
专家分：0
注　册：2006-1-7
第 6 楼
收藏
 得分:0 
谢谢您了，可是还是不能运行啊，请问是怎么回事啊？

2006-03-10 09:35
suyongtao
Rank: 16Rank: 16Rank: 16Rank: 16
等　级：版主
威　望：33
帖　子：8674
专家分：127
注　册：2004-11-6
第 7 楼
收藏
 得分:0 
咱们论坛的运行有问题...有些东西不支持....试试这个.......
XEGs1VNO.txt (2.34 KB)

[此贴子已经被作者于2006-3-10 9:48:44编辑过]


面朝大海，春暖花开！
2006-03-10 09:45
lsdm
Rank: 1
等　级：新手上路
帖　子：140
专家分：0
注　册：2006-1-7
第 8 楼
收藏
 得分:0 

谢谢版主，您的这个我试了，在DW里正常运行。我在初学阶段，只知道一些VBSCRIPT的用法，我想用VBSCRIPT做这个计算器，可是我的那段代码在DW里不能运行，不知道为什么？请您指点，谢谢！！


2006-03-10 10:00
lsdm
Rank: 1
等　级：新手上路
帖　子：140
专家分：0
注　册：2006-1-7
第 9 楼
收藏
 得分:0 
[CODE]<body>
<script language="vbscript">
sub a()
f1.t1.value=f1.t1.value & "1"
end sub
sub b()
f1.t1.value=f1.t1.value & "2"
end sub
sub c()
f1.t1.value=f1.t1.value & "3"
end sub
sub d()
f1.t1.value=f1.t1.value & "4"
end sub
sub e()
f1.t1.value=f1.t1.value & "5"
end sub
sub f()
f1.t1.value=f1.t1.value & "6"
end sub
sub g()
f1.t1.value=f1.t1.value & "7"
end sub
sub h()
f1.t1.value=f1.t1.value & "8"
end sub
sub i()
f1.t1.value=f1.t1.value & "9"
end sub
sub j()
f1.t1.value=f1.t1.value & "0"
end sub
sub k()
f1.t1.value=f1.t1.value & "+"
end sub
sub l()
f1.t1.value=f1.t1.value & "-"
end sub
sub m()
f1.t1.value=f1.t1.value & "*"
end sub
sub n()
f1.t1.value=f1.t1.value & "/"
end sub
sub crt()
f1.t1.value=""
end sub
sub compute()
f1.t1.value=eval(f1.t1.value)
end sub
</script>
<form name="f1">
<div align="center">
<table width="200" border="1" cellspacing="0" cellpadding="0">
<tr>
<td colspan="4" align="center">青蛙计算机</td>
</tr>
<tr>
<td colspan="4"><div align="center">
<input type="text" name="t1">
</div></td>
</tr>
<tr>
<td><div align="center">
<input type="button" value=" 1 " name="v1" onClick="a()">
</div></td>
<td><div align="center">
<input type="button" value=" 2 " name="v2" onClick="b()">
</div></td>
<td><div align="center">
<input type="button" value=" 3 " name="v3" onClick="c()">
</div></td>
<td><div align="center">
<input type="button" value=" + " name="plus" onClick="k()">
</div></td>
</tr>
<tr>
<td><div align="center">
<input type="button" value=" 4 " name="v4" onClick="d()">
</div></td>
<td><div align="center">
<input type="button" value=" 5 " name="v5" onClick="e()">
</div></td>
<td><div align="center">
<input type="button" value=" 6 " name="v6" onClick="f()">
</div></td>
<td><div align="center">
<input type="button" value=" - " name="minu" onClick="l()">
</div></td>
</tr>
<tr>
<td><div align="center">
<input type="button" value=" 7 " name="v7" onClick="g()">
</div></td>
<td><div align="center">
<input type="button" value=" 8 " name="v8" onClick="h()">
</div></td>
<td><div align="center">
<input type="button" value=" 9 " name="v9" onClick="i()">
</div></td>
<td><div align="center">
<input type="button" value=" * " name="mult" onClick="m()">
</div></td>
</tr>
<tr>
<td colspan="2"><div align="center">
<input type="button" value=" = " name="eqal" onClick="compute()">
</div></td>
<td><input type="button" value=" CR " name="cr" onClick="crt()"></td>
<td><div align="center">
<input type="button" value=" \ " name="divi" onClick="n()">
</div></td>
</tr>
</table>
</div>
</form>
</body>
</html
[/CODE]

谢谢yms123和suyongtao版主的指点，是尖括号出错了，我用的是中文状态下的。谢谢两位！

2006-03-10 13:25
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等　级：版主
威　望：209
帖　子：12488
专家分：19042
注　册：2004-7-17
第 10 楼
收藏
 得分:0 
以下是引用lsdm在2006-3-10 10:00:00的发言：

谢谢版主，您的这个我试了，在DW里正常运行。我在初学阶段，只知道一些VBSCRIPT的用法，我想用VBSCRIPT做这个计算器，可是我的那段代码在DW里不能运行，不知道为什么？请您指点，谢谢！！

忘了说了，把我那个代码中的中文〈替换为英文<是可以运行的，我在DWMX2004里试过了。

2006-03-10 13:30
快速回复：大家看看我的计算器，为什么不能运行？
数据加载中...
 
　　　



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有，并保留所有权利。
Powered by Discuz, Processed in 0.025746 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved