Foxtable(狐表)用户栏目专家坐堂 → [求助]如何在Drawcall中用代码引用父表的关联数据


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

主题:[求助]如何在Drawcall中用代码引用父表的关联数据

帅哥,在线噢!
狐狸爸爸
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/3/4 9:13:00 [显示全部帖子]

既然DataRow可以,那么Row也可以。

因为Row有DataRow属性,可以返回对应的DataRow:

 

e.Row.DataRow.GetParentRow("父表名称")

 

不过确实不应该在DrawCell事件中有太多复杂的计算和引用工作,以免影响运行速度。


 回到顶部
帅哥,在线噢!
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/3/4 9:47:00 [显示全部帖子]

实际运行就知道了,自己能接受就行。

 回到顶部
帅哥,在线噢!
狐狸爸爸
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/3/4 10:13:00 [显示全部帖子]

Dim kmmcs As DataRow = e.Row.DataRow.GetParentRow("收入科目")
If kmmcs  IsNot Nothing Then
    Select Case e.col.name
        Case "科目名称","税款所属日期","开piao日期","税piao类型","税piao铅印号","科目代码"
            If e.Row("科目名称") = kmmcs("科目名称") And kmmcs("末级标志") = True
                e.style = "科目名称绿"
            End If
        Case "乡镇代码","乡镇名称","征收部门代码","征收部门名称"
            e.style = "黄色"
    End Select
End If


 回到顶部