怎样在文本框输入一个1到100的数 单击提交按钮 若输入正确 则弹出对话框 显示：“你输入对了，谢谢” 若输入不正确 则弹出对话框显示：”请输入一个1到100之间的数字“ 求解答 弄了半天弄不出来 谢谢！要求使用VBscript!!!
1 回答
侠客岛的含笑
TA贡献552条经验 获得超285个赞
<HTML>
<BODY Scroll=No OnContextMenu='return false;'
OnKeyDown='if(event.keyCode==13)objButton.onclick();
if(event.keyCode==27){self.opener=null;self.close();}'>
<INPUT Type='Text' ID='objText1'
OnChange='value=value.replace(/[^\d]/g,"");'
OnKeyUp='value=value.replace(/[^\d]/g,"");'><BR>
<BUTTON ID='objButton' STYLE='WIDTH:70' onClick='xxx();'>
提交</BUTTON>
<SCRIPT Language="Vbscript">
Sub xxx
If (objText1.Value > 1 And objText1.Value < 100) Then
alert "你输入对了，谢谢！"
Else
alert "请输入一个1到100之间的数字。"
End If
End Sub
</SCRIPT>
</HTML>添加回答
举报
0/150
提交
取消