中易网

这是我写的代码

答案:2  悬赏:0  
解决时间 2021-04-27 06:29
  • 提问者网友:失败的占卜者
  • 2021-04-27 03:30
<html>
<head>
<title>无标题文档</title>
</head>
<body>
<script language="vbscript">
sub rose()
num=in.sc.to
if 0>number then
sc=负数
else 0<number then
sc=正数
else 0<number and 10<number then
sc=一位数
else 10<number and 99>number then
sc=两位数
else 99<number then
sc=三位数以上
end if
document.write(num)
end sub
</script>

<form name="form1" method="post" action="">
<label>
<input name="in" type="text" id="in">
</label>
<label>
<input name="to" type="button" id="to" value="按钮" onClick="rose">
</label>
</form>
</body>
</html>
最佳答案
  • 二级知识专家网友:说多了都是废话
  • 2021-04-27 04:32

<html>
<head>
<title>无标题文档</title>
</head>
<body>
<script language="vbscript">
sub rose()
dim num
set num = Document.forms("form1")
number = num.in.value
if 0 > number then
sc="负数"
elseif 10 > number then
sc="一位数"
elseif 100 > number then
sc="两位数"
else
sc="三位数以上"
end if
document.write(sc)
end sub
</script>


<form name="form1" method="post" action="">
<label>
<input name="in" type="text" id="in">
</label>
<label>
<input name="to" type="button" id="to" value="按钮" onClick="rose">
</label>
</form>
</body>
</html>
试试看

全部回答
  • 1楼网友:懂得ㄋ、沉默
  • 2021-04-27 04:49

<html> <head> <title>无标题文档</title> </head> <body> <script language="vbscript"> sub rose() num=in.sc.to if 0>number then sc=负数 else if 0<number then sc=正数 else if 0<number and 10<number then sc=一位数 else if 10<number and 99>number then sc=两位数 else if 99<number then sc=三位数以上 end if document.write(num) end sub </script>

<form name="form1" method="post" action=""> <label> <input name="in" type="text" id="in"> </label> <label> <input name="to" type="button" id="to" value="按钮" onClick="rose"> </label> </form> </body> </html> 我这里没有编程的工具,没法测试。你自己对比下看看能不能用吧!~

我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息!
大家都在看
推荐信息