Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
呵。狐爸的真功夫还多着呢!就怕你吾问!!
多问多得呀!!
这个符合你的要求:
下载信息 [文件大小:18.2 KB 下载次数:42] | |
![]() |
提示,双击删除行:
狐爸 以这个例子。。。如果以统计数据比例,如:20% 40% 每增加20 就增加一个五星图标 代码怎么写,给点方向。。。
原理一样,根据此行的内容来绘制不同的图标即可。
狐爸 以这个例子。。。如果以统计数据比例,如: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
End If