设为首页收藏本站
切换到宽版

 找回密码
 注册
搜索
热搜: 回贴
微赢网络技术论坛»论坛 › 学习网 知识堂 › WEB开发 › ASP › 大家看看我的计算器，为什么不能运行？ ...
  • 前程无忧官网首页 有什么好的平台可以
  • 最新的销售平台 互联网营销的平台有哪
  • 制作网页的基本流程 网页制作和网页设
  • 【帝国CMS】输出带序号的列表(数字排
  • 网站建设公司 三一，中联，极东泵车的
  • 织梦 建站 织梦网站模版后台怎么更改
  • 云服务官网 哪些网站有免费的简历模板
  • 如何建网站要什么条件 建网站要用什么
  • 吉林市移动公司电话 吉林省退休人员网
  • 设计类毕业论文 网站设计与实现毕业论
返回列表 发新帖
查看: 156|回复: 9

大家看看我的计算器，为什么不能运行？

[复制链接]
发表于 2010-1-19 06:23:12 | 显示全部楼层 |阅读模式 IP:江苏扬州
请高手指点，谢谢！！


<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>
回复

使用道具 举报

发表于 2010-1-19 06:23:16 | 显示全部楼层 IP:江苏扬州
顶一下，请高手指点啊！谢谢！！
回复

使用道具 举报

CHLOE
发表于 2010-1-19 06:23:20 | 显示全部楼层 IP:江苏扬州
〈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〉

修改后的代码
回复

使用道具 举报

发表于 2010-1-19 06:23:25 | 显示全部楼层 IP:江苏扬州


  3. 〈body〉
  4. 〈script language="vbscript"〉
  5. function a()
  6. f1.t1.value=f1.t1.value & "1"
  7. end function
  8. function b()
  9. f1.t1.value=f1.t1.value & "2"
  10. end function
  11. function c()
  12. f1.t1.value=f1.t1.value & "3"
  13. end function
  14. function d()
  15. f1.t1.value=f1.t1.value & "4"
  16. end function
  17. function e()
  18. f1.t1.value=f1.t1.value & "5"
  19. end function
  20. function f()
  21. f1.t1.value=f1.t1.value & "6"
  22. end function
  23. function g()
  24. f1.t1.value=f1.t1.value & "7"
  25. end function
  26. function h()
  27. f1.t1.value=f1.t1.value & "8"
  28. end function
  29. function i()
  30. f1.t1.value=f1.t1.value & "9"
  31. end function
  32. function j()
  33. f1.t1.value=f1.t1.value & "0"
  34. end function
  35. function k()
  36. f1.t1.value=f1.t1.value & "+"
  37. end function
  38. function l()
  39. f1.t1.value=f1.t1.value & "-"
  40. end function
  41. function m()
  42. f1.t1.value=f1.t1.value & "*"
  43. end function
  44. function n()
  45. f1.t1.value=f1.t1.value & "/"
  46. end function
  47. function crt()
  48. f1.t1.value=""
  49. end function
  50. function compute()
  51. f1.t1.value=eval(f1.t1.value)
  52. end function
  53. 〈/script〉
  54. 〈form name="f1"〉
  55. 〈div align="center"〉
  56. 〈table width="200" border="1" cellspacing="0" cellpadding="0"〉
  57. 〈tr〉
  58. 〈td colspan="4" align="center"〉青蛙计算机〈/td〉
  59. 〈/tr〉
  60. 〈tr〉
  61. 〈td colspan="4"〉〈div align="center"〉
  62. 〈input type="text" name="t1"〉
  63. 〈/div〉〈/td〉
  64. 〈/tr〉
  65. 〈tr〉
  66. 〈td〉〈div align="center"〉
  67. 〈input type="button" value=" 1 " name="v1" onClick="a()"〉
  68. 〈/div〉〈/td〉
  69. 〈td〉〈div align="center"〉
  70. 〈input type="button" value=" 2 " name="v2" onClick="b()"〉
  71. 〈/div〉〈/td〉
  72. 〈td〉〈div align="center"〉
  73. 〈input type="button" value=" 3 " name="v3" onClick="c()"〉
  74. 〈/div〉〈/td〉
  75. 〈td〉〈div align="center"〉
  76. 〈input type="button" value=" + " name="plus" onClick="k()"〉
  77. 〈/div〉〈/td〉
  78. 〈/tr〉
  79. 〈tr〉
  80. 〈td〉〈div align="center"〉
  81. 〈input type="button" value=" 4 " name="v4" onClick="d()"〉
  82. 〈/div〉〈/td〉
  83. 〈td〉〈div align="center"〉
  84. 〈input type="button" value=" 5 " name="v5" onClick="e()"〉
  85. 〈/div〉〈/td〉
  86. 〈td〉〈div align="center"〉
  87. 〈input type="button" value=" 6 " name="v6" onClick="f()"〉
  88. 〈/div〉〈/td〉
  89. 〈td〉〈div align="center"〉
  90. 〈input type="button" value=" - " name="minu" onClick="l()"〉
  91. 〈/div〉〈/td〉
  92. 〈/tr〉
  93. 〈tr〉
  94. 〈td〉〈div align="center"〉
  95. 〈input type="button" value=" 7 " name="v7" onClick="g()"〉
  96. 〈/div〉〈/td〉
  97. 〈td〉〈div align="center"〉
  98. 〈input type="button" value=" 8 " name="v8" onClick="h()"〉
  99. 〈/div〉〈/td〉
  100. 〈td〉〈div align="center"〉
  101. 〈input type="button" value=" 9 " name="v9" onClick="i()"〉
  102. 〈/div〉〈/td〉
  103. 〈td〉〈div align="center"〉
  104. 〈input type="button" value=" * " name="mult" onClick="m()"〉
  105. 〈/div〉〈/td〉
  106. 〈/tr〉
  107. 〈tr〉
  108. 〈td colspan="2"〉〈div align="center"〉
  109. 〈input type="button" value=" = " name="eqal" onClick="compute()"〉
  110. 〈/div〉〈/td〉
  111. 〈td〉〈input type="button" value=" CR " name="cr" onClick="crt()"〉〈/td〉
  112. 〈td〉〈div align="center"〉
  113. 〈input type="button" value=" / " name="divi" onClick="n()"〉
  114. 〈/div〉〈/td〉
  115. 〈/tr〉
  116. 〈/table〉
  117. 〈/div〉
  118. 〈/form〉
  119. 〈/body〉


复制代码


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

使用道具 举报

发表于 2010-1-19 06:23:29 | 显示全部楼层 IP:江苏扬州
〈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比较习惯。
回复

使用道具 举报

发表于 2010-1-19 06:23:33 | 显示全部楼层 IP:江苏扬州
谢谢您了，可是还是不能运行啊，请问是怎么回事啊？
回复

使用道具 举报

发表于 2010-1-19 06:23:39 | 显示全部楼层 IP:江苏扬州
咱们论坛的运行有问题...有些东西不支持....试试这个.......



附件: 只有本站会员才能下载或查看附件，请您 登录 或 注册
回复

使用道具 举报

发表于 2010-1-19 06:23:43 | 显示全部楼层 IP:江苏扬州
谢谢版主，您的这个我试了，在DW里正常运行。我在初学阶段，只知道一些VBSCRIPT的用法，我想用VBSCRIPT做这个计算器，可是我的那段代码在DW里不能运行，不知道为什么？请您指点，谢谢！！
回复

使用道具 举报

发表于 2010-1-19 06:23:48 | 显示全部楼层 IP:江苏扬州
  1. <body>
  2. <script language="vbscript">
  3. sub a()
  4. f1.t1.value=f1.t1.value & "1"
  5. end sub
  6. sub b()
  7. f1.t1.value=f1.t1.value & "2"
  8. end sub
  9. sub c()
  10. f1.t1.value=f1.t1.value & "3"
  11. end sub
  12. sub d()
  13. f1.t1.value=f1.t1.value & "4"
  14. end sub
  15. sub e()
  16. f1.t1.value=f1.t1.value & "5"
  17. end sub
  18. sub f()
  19. f1.t1.value=f1.t1.value & "6"
  20. end sub
  21. sub g()
  22. f1.t1.value=f1.t1.value & "7"
  23. end sub
  24. sub h()
  25. f1.t1.value=f1.t1.value & "8"
  26. end sub
  27. sub i()
  28. f1.t1.value=f1.t1.value & "9"
  29. end sub
  30. sub j()
  31. f1.t1.value=f1.t1.value & "0"
  32. end sub
  33. sub k()
  34. f1.t1.value=f1.t1.value & "+"
  35. end sub
  36. sub l()
  37. f1.t1.value=f1.t1.value & "-"
  38. end sub
  39. sub m()
  40. f1.t1.value=f1.t1.value & "*"
  41. end sub
  42. sub n()
  43. f1.t1.value=f1.t1.value & "/"
  44. end sub
  45. sub crt()
  46. f1.t1.value=""
  47. end sub
  48. sub compute()
  49. f1.t1.value=eval(f1.t1.value)
  50. end sub
  51. </script>
  52. <form name="f1">
  53. <div align="center">
  54. <table width="200" border="1" cellspacing="0" cellpadding="0">
  55. <tr>
  56. <td colspan="4" align="center">青蛙计算机</td>
  57. </tr>
  58. <tr>
  59. <td colspan="4"><div align="center">
  60. <input type="text" name="t1">
  61. </div></td>
  62. </tr>
  63. <tr>
  64. <td><div align="center">
  65. <input type="button" value=" 1 " name="v1" onClick="a()">
  66. </div></td>
  67. <td><div align="center">
  68. <input type="button" value=" 2 " name="v2" onClick="b()">
  69. </div></td>
  70. <td><div align="center">
  71. <input type="button" value=" 3 " name="v3" onClick="c()">
  72. </div></td>
  73. <td><div align="center">
  74. <input type="button" value=" + " name="plus" onClick="k()">
  75. </div></td>
  76. </tr>
  77. <tr>
  78. <td><div align="center">
  79. <input type="button" value=" 4 " name="v4" onClick="d()">
  80. </div></td>
  81. <td><div align="center">
  82. <input type="button" value=" 5 " name="v5" onClick="e()">
  83. </div></td>
  84. <td><div align="center">
  85. <input type="button" value=" 6 " name="v6" onClick="f()">
  86. </div></td>
  87. <td><div align="center">
  88. <input type="button" value=" - " name="minu" onClick="l()">
  89. </div></td>
  90. </tr>
  91. <tr>
  92. <td><div align="center">
  93. <input type="button" value=" 7 " name="v7" onClick="g()">
  94. </div></td>
  95. <td><div align="center">
  96. <input type="button" value=" 8 " name="v8" onClick="h()">
  97. </div></td>
  98. <td><div align="center">
  99. <input type="button" value=" 9 " name="v9" onClick="i()">
  100. </div></td>
  101. <td><div align="center">
  102. <input type="button" value=" * " name="mult" onClick="m()">
  103. </div></td>
  104. </tr>
  105. <tr>
  106. <td colspan="2"><div align="center">
  107. <input type="button" value=" = " name="eqal" onClick="compute()">
  108. </div></td>
  109. <td><input type="button" value=" CR " name="cr" onClick="crt()"></td>
  110. <td><div align="center">
  111. <input type="button" value=" \ " name="divi" onClick="n()">
  112. </div></td>
  113. </tr>
  114. </table>
  115. </div>
  116. </form>
  117. </body>
  118. </html
复制代码


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

使用道具 举报

阿俊
发表于 2010-1-19 06:23:56 | 显示全部楼层 IP:江苏扬州
以下是引用lsdm在2006-3-10 10:00:00的发言：

谢谢版主，您的这个我试了，在DW里正常运行。我在初学阶段，只知道一些VBSCRIPT的用法，我想用VBSCRIPT做这个计算器，可是我的那段代码在DW里不能运行，不知道为什么？请您指点，谢谢！！
忘了说了，把我那个代码中的中文〈替换为英文<是可以运行的，我在DWMX2004里试过了。
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|小黑屋|最新主题|手机版|微赢网络技术论坛 ( 苏ICP备08020429号 )

GMT+8, 2024-9-30 05:38 , Processed in 0.397275 second(s), 12 queries , Gzip On, MemCache On.

Powered by Discuz! X3.5

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表