主题：表格中的按钮

以下是引用blackzhu在2011-10-31 7:43:00的发言：
老大还是没有把真功夫传授啊.

以下是引用狐狸爸爸在2011-10-31 7:28:00的发言：

这个符合你的要求： 

下载信息  [文件大小：18.2 KB  下载次数：42]

点击浏览该文件:管理项目175.rar

 

提示，双击删除行：

 

 

此主题相关图片如下：201111.jpg

以下是引用古奇在2011-11-1 11:04:00的发言：

狐爸  以这个例子。。。如果以统计数据比例，如：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