Foxtable(狐表)用户栏目专家坐堂 → 如何绘制整行


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

主题:如何绘制整行

帅哥哟,离线,有人找我吗?
烟斗木木
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:44 积分:425 威望:0 精华:0 注册:2016/9/28 8:36:00
  发帖心情 Post By:2017/2/8 10:21:00 [显示全部帖子]

我用了一个蠢方法:集合
直接在到期提醒的例子上改了
原代码:
If e.col.Name = "到期日期" Then
  If
e.Row.IsNull("到期日期") = False
    If
e.Row("到期日期") < Date.Today.AddDays(10) Then
      e.Style =
"到期"
    End If
  End
If
End
If

修改后的:
把第一行代码改为:
Select Case e.Col.Name
    Case "第一列","第二列","第三列","第五列"
最后一个end if 改为 end select


更新:
此方法果然很蠢,请参照版主的方法,把第一行代码去掉就行了,已测试。
[此贴子已经被作者于2017/2/8 10:24:42编辑过]

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


加好友 发短信
等级:婴狐 帖子:44 积分:425 威望:0 精华:0 注册:2016/9/28 8:36:00
  发帖心情 Post By:2017/2/8 10:24:00 [显示全部帖子]

无地自容……
费死脑子改了代码,原来去掉就行了图片点击可在新窗口打开查看

 回到顶部