主题：[求助]关于表内显示图标的问题

此主题相关图片如下：已脱检.png

请问老师，我的某一个表内有一列名为检验到期日期，我想让当该列的日期的值小于系统日期时该列所对应的行会自动加上一个如上图一样的图标，这能做到么，该怎么做。谢谢。

drawcell事件

 

If e.Col.name= "日期" Then
    e.StartDraw
    If e.Row("日期") < Date.today Then
        e.Graphics.DrawImage(getimage("d:\test.jpg"), e.x + 3,e.y + 3) '绘制第一个图标
    End If
    e.EndDraw
End If

http://www.foxtable.com/webhelp/scr/2387.htm

 

此主题相关图片如下：qq图片20171126175302.png
提示调用的目标异常。

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

点击浏览该文件:logo.rar

代码没问题。你d盘必须有对应图片文件，才行。