Foxtable(狐表)用户栏目专家坐堂 → DRAWCELL有条件绘制单元格


  共有2151人关注过本帖树形打印复制链接

主题:DRAWCELL有条件绘制单元格

美女呀,离线,留言给我吧!
漂亮美眉vszh
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:893 积分:8064 威望:0 精华:0 注册:2013/5/30 11:27:00
DRAWCELL有条件绘制单元格  发帖心情 Post By:2018/3/22 14:39:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:123.png
图片点击可在新窗口打开查看
老师:如果图框部分,第二行与第四行都绘制了颜色,但我想第二行存在颜色时,第四行就不绘制或清除其颜色,要怎么改?

原代码:

  If dt>=dt1 AndAlso dt<=dt2 Then
            'MessageBox.Show(3)
            e.StartDraw()
            e.Graphics.FillRectangle(Brushes.Blue,e.x ,e.y+1, e.Width, e.Height-2)
            e.EndDraw()
        End If


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/22 14:50:00 [只看该作者]

需要读取第二行、第四行的数据,才能比较和绘制。

 

Dim r2 As Row = e.Table.Rows(1)

Dim r4 As Row = e.Table.Rows(3)

Dim d2 As Date = r2(xxxx)

Dim d4 As Date = r4(xxxx)

If 比较d2、d4等值的逻辑,才能判断 Then

 

End If

 

具体逻辑,请具体说明,上传具体项目测试。


 回到顶部