<html><head><script language="VBScript">Sub Output( ) Dim input_val input_val=Document.OpForm.InputText.value if input_val>=1 And input_val<=100 then alert("你输入对了，谢谢！") else alert("请输入一个1到100的数字") end if end Sub</script></head><body><center><form name="OpForm">请输入一个1到100的整数：<input type=text name="InputText"><br><input type=button onClick="Call Output( )" value="提交"></body></html>
添加回答
举报
0/150
提交
取消