<html>
<head><title>求一组数的max,min,sum,avg</title>
<style type="text/css">
<!--
.STYLE1 {
color: #FFFFFF;
font-weight: bold;
}
#mystr,#tmax,#tmin,#tsum,#tavg {border:0px
width:50px}
-->
</style>
<script
type="text/vbscript">
sub
mypreviously()
mystr.focus
end
sub
sub
myexam()
mynum=mystr.value
myarray=split(mynum,",")
'字符串分割函数:split(字符串,"分割符")
mymax_result=csng(myarray(0))
mymin_result=csng(myarray(0))
for i=0
to ubound(myarray)
mysum_result=mysum_result+csng(myarray(i))
'求sum
if
csng(myarray(i))>mymax_result
then
'求max
mymax_result=csng(myarray(i))
end
if
if
csng(myarray(i))<mymin_result
then
'求min
mymin_result=csng(myarray(i))
end
if
next
myavg_result=mysum_result/5
'求avg
'输出结果:
tmax.value=mymax_result
tmin.value=mymin_result
tsum.value=mysum_result
tavg.value=myavg_result
end sub
</script>
</head>
<body
onload=mypreviously>
<table width="494" height="130"
border="0" align="center" cellpadding="5" cellspacing="1"
bgcolor="#0033CC">
<tr>
<td colspan="2" align="center"
bgcolor="#0066FF"><span
class="STYLE1">求一组数的sum,avg,max,min 程序
</span></td>
</tr>
<tr>
<td width="155" align="center"
bgcolor="#FFFFFF">请输入一组数:</td>
<td width="336"
bgcolor="#FFFFFF">
<input type="text" name="textfield"
id="mystr"><span style="color:
#999999;
font-size:
12px;">格式如(1,2,3)</span>
</td>
</tr>
<tr>
<td align="center"
bgcolor="#FFFFFF">最大值(max):
</td>
<td
bgcolor="#FFFFFF"><input type="text"
id="tmax" name="textfield2"
readonly></td>
</tr>
<tr>
<td align="center"
bgcolor="#FFFFFF">最小值(min):</td>
<td
bgcolor="#FFFFFF"><input type="text"
id="tmin"
name="textfield3"readonly></td>
</tr>
<tr>
<td align="center"
bgcolor="#FFFFFF">总和(sum):</td>
<td
bgcolor="#FFFFFF"><input type="text"
id="tsum"
name="textfield4"readonly></td>
</tr>
<tr>
<td align="center"
bgcolor="#FFFFFF">平均值(average):</td>
<td
bgcolor="#FFFFFF"><input type="text"
id="tavg"
name="textfield5"readonly></td>
</tr>
<tr>
<td colspan="2" align="center"
bgcolor="#FFFFFF"><input
type="submit" name="Submit" value="提交" onclick="myexam()"style="kground-color:#CCCC33;font-weight:bold">
</td>
</tr>
</table>
</body>
</html>
加载中,请稍候......