狐爸 以这个例子。。。如果以统计数据比例,如:20% 40% 每增加20 就增加一个五星图标 代码怎么写,给点方向。。。
学习老大,大概这样:
Dim n,i As Integer
If e.col.name= "几星" Then
If e.Row("比例")>=20% Then
e.StartDraw
For n = 1 To Math.Floor(e.Row("比例")/20%)
e.Graphics.DrawImage(delimg,e.x+ 3+i*20,e.y + 3)
i+=1
Next
e.EndDraw
End If