<Script language="VBScript" EOR="btnShow" EVENT="onClick">
　dim x
　if form1.text1.Value=" " or form1.text2.Value=" " then
     form1.text3.Value ="请在上面两个框中各输入一个整数!"      
  else
    if CLng(form1.text1.Value)>CLng(form1.text2.Value) then
     x =form1.text1.Value
    else
   x =form1.text2.Value   
end if
  form1.text3.Value =x
  end if  
</Script>


..........

<form name="form1">
  <p>输入第一个整数
    <input type="text" name="text1">
</p>
  <p>输入第二个整数
    <input type="text" name="text2">
</p>
  <p>两者中的最大值
    <input type="text" name="text3">
  </p>
  <p>
    <input type="submit" name="btnShow" value="提交">
    <input type="reset" name="Submit2" value="重置">
</p>
</form>