範例位址:點我連結
修改出處:http://big5.webasp.net/article/7/6036.htm
增加的功能是 破千的數長度下降
<? $b = array(9,1500,500,1250,300,200,775,1230,550); ?>
<!–規則: (組數,數值1,數值2…) –>
<html>
<head>
<title>直 條圖製作</title>
<style>
<!–
td{ font-size:9pt }
–>
</style>
</head>
<body>
<?
$t=1;
$tt=1;
for($i=1;$i<$b[0];$i++) {
for($j=1;$j<10;$j++) {
if(($b[$i]/$tt)/10>100 and $tt*10>$t and $b[$i]!=0){
$t=$t*10;
$tt=$tt*10;
}
}
}
?>
<table border=0>
<tr><td colspan="<?echo $b[0];?>"><p align="center">(1)直條圖</p></td></tr>
<tr valign="bottom">
<?for($i=1;$i<$b[0];$i++) { ?><td align="center">
<table height="<?echo $b[$i]/$t;?>" border=0>(2)<?echo $b[$i];?>
<tr>
<td bgcolor="#3F7F9F" width="40"></td>(3)點
</tr>
</table><br>
<font color="#3F7F9F"><?echo $b[$i];?></font>(4)
</td><? } ?>
</tr>
</table>
</body>
</html>