主题：标识已售数据

这个效果?

 

 

 

 

此主题相关图片如下：25p6f{es`3w`d~iflb0epb.jpg

 

If e.col.name = "第一列" Then
    If e.Row("第二列")="已售出" Then
        e.StartDraw()
        e.Graphics.FillRectangle(Brushes.yellow,e.x ,e.y , e.Width, e.Height)
        e.Graphics.DrawLine(Pens.Red,e.x +3 ,e.y+20,e.Width-5 ,e.y+20)
        e.EndDraw()
    End If
End If

 

 

DrawCell

 

e.Height = 40

 

BeforeDrawRow