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


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

主题：如何绘制整行
帅哥哟，离线，有人找我吗？
zchlln
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：118 积分：1161 威望：0 精华：0 注册：2013/9/9 14:34:00 		如何绘制整行  发帖心情 Post By：2017/2/8 9:48:00 [只看该作者]

DrawCell 我目前设置条件显示的是一个单元格，我想符合条件的整行都显示出来

 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/2/8 10:20:00 [只看该作者]

把 If e.Col = "第一列" Then 这样的条件去掉

 回到顶部
帅哥哟，离线，有人找我吗？
烟斗木木
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | 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编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
烟斗木木
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

无地自容……
费死脑子改了代码，原来去掉就行了图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2017/2/8 10:28:00 [只看该作者]

 你这样写也对。可以区别某几列绘制。

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04590 秒, 4 次数据查询