文件名称:asp结合VML写的柱状图,饼图,折线图(注:asp+VML)
文件大小:109KB
文件格式:RAR
更新时间:2012-03-22 08:39:14
asp,vml,柱状图,饼图,折线图 给出部分代码: '画X柱子 dim PolyLine1,PolyLine2 For i = 1.5 To uboundY+1 'step 0.5 xRect = (i-1)*allX\uboundY height1 = -allY * arr(1,int(i)) / arrMax height2 = -allY * arr(2,int(i)) / arrMax 'if int(i)<>i then'画柱子 v1 = arr(1,int(i)) v2 = arr(2,int(i)) call printRect(v1,color1,thickness,height1,-height1,xRect-thickness) call printRect(v2,color2,thickness,height2,-height2,xRect) call printShape(v1,-height1-15,xRect-len(v1)*8) call printShape(v2,-height2-15,xRect+2) 'end if 'printLine j = int(i) if j