Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]这个绘制能否优化？（大红袍老师请进，发现新问题）


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

主题：[求助]这个绘制能否优化？（大红袍老师请进，发现新问题）
帅哥哟，离线，有人找我吗？
36792209
 小大  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：241 积分：1782 威望：0 精华：0 注册：2015/7/13 14:36:00 		  发帖心情 Post By：2016/4/11 20:52:00 [显示全部帖子]

大红袍老师，您修改后的代码速度有明显提升，

因为我新增行是用回车向下新增的，因为绘制的关系，我按住回车不放，连续新增行会有点点延迟，如果没有绘制则很快。。

这怎么解决呢？
 回到顶部
帅哥哟，离线，有人找我吗？
36792209
 小大  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：241 积分：1782 威望：0 精华：0 注册：2015/7/13 14:36:00 		  发帖心情 Post By：2016/4/11 20:55:00 [显示全部帖子]

文盲一枚，完全不会图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
36792209
 小大  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：241 积分：1782 威望：0 精华：0 注册：2015/7/13 14:36:00 		  发帖心情 Post By：2016/4/11 20:56:00 [显示全部帖子]

因为我的AfterOpenProject已经有很多代码了，要是我所有表都加载辅助列会有速度上的影响么？

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


加好友 发短信
等级：童狐 帖子：241 积分：1782 威望：0 精华：0 注册：2015/7/13 14:36:00 		  发帖心情 Post By：2016/4/11 21:01:00 [显示全部帖子]

那我就直接在表里增加一列，那代码怎么写呢？

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


加好友 发短信
等级：童狐 帖子：241 积分：1782 威望：0 精华：0 注册：2015/7/13 14:36:00 		  发帖心情 Post By：2016/4/11 21:05:00 [显示全部帖子]

删除afterOpenProject事件的代码后没反映。。已经增加逻辑列了

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


加好友 发短信
等级：童狐 帖子：241 积分：1782 威望：0 精华：0 注册：2015/7/13 14:36:00 		  发帖心情 Post By：2016/4/11 21:09:00 [显示全部帖子]

有效果了，先这么用着了，继续潜水学习。。谢谢大红袍老师了，这么不厌其烦的教导我们，太感激了。

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


加好友 发短信
等级：童狐 帖子：241 积分：1782 威望：0 精华：0 注册：2015/7/13 14:36:00 		  发帖心情 Post By：2016/4/11 21:22:00 [显示全部帖子]

完蛋。。。老师，刚刚才发现一个重要的问题，重复值是标记出了，可是我删除重复值后，前面那个数据和后面的空数据都被绘制了颜色，怎么解决啊？？？

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


加好友 发短信
等级：童狐 帖子：241 积分：1782 威望：0 精华：0 注册：2015/7/13 14:36:00 		  发帖心情 Post By：2016/4/11 21:31:00 [显示全部帖子]

老师，再帮忙看下。。。急啊图片点击可在新窗口打开查看

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


加好友 发短信
等级：童狐 帖子：241 积分：1782 威望：0 精华：0 注册：2015/7/13 14:36:00 		  发帖心情 Post By：2016/4/11 21:37:00 [显示全部帖子]

If e.DataCol.Name = "客户" Then
    Dim count As Integer = e.DataTable.Compute("count(客户)", "客户 = '" & e.DataRow("客户") & "'")
    If Count > 1 Then
        e.DataTable.ReplaceFor("辅助", True, "客户 = '" & e.DataRow("客户") & "'")
    Else
        e.DataTable.ReplaceFor("辅助", False, "客户 = '" & e.DataRow("客户") & "'")
    End If e.DataRow.IsNull("客户") Then
    e.DataRow("辅助") = False
End If


If e.DataRow.IsNull("客户") Then
    e.DataRow("辅助") = False
End If

我在下面加了这个解决了，不知道合不合理
 回到顶部
帅哥哟，离线，有人找我吗？
36792209
 小大  20楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：241 积分：1782 威望：0 精华：0 注册：2015/7/13 14:36:00 		  发帖心情 Post By：2016/4/11 21:46:00 [显示全部帖子]

头疼啊。。。。虽然删除重复值，绘制是没有了。但是上面的数据颜色依然在。。。。。。。。。。。。。。

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