| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 跨表条件勾选的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=87631) |
| -- 作者：douglas738888 -- 发布时间：2016/7/15 12:34:00 -- 跨表条件勾选的问题 请教老师，下列代码黄色部分，想加上一个条件，然后实现跨表勾选逻辑列，没有实现，如果 编制类型 为 “编制” 和 任务完成=True 时，同一个编号下的另一个表 的 流转 逻辑列 进行勾选 Dim pr1 As DataRow Dim cr1 As Row = Tables("投标商务副表").current Dim c11 As Integer = cr1.Table.DataTable.Compute("count(信息编号)", "信息编号 = \'" & cr1("信息编号") & "\'") Dim c21 As Integer = cr1.Table.DataTable.Compute("count(信息编号)", "信息编号 = \'" & cr1("信息编号") & "\' and 任务完成 = True and 编制类型=编制 ") \'20160712 pr1 = DataTables("投标汇总文件").find("信息编号 = \'" & cr1("信息编号") & "\'") If pr1 IsNot Nothing Then pr1("流转") = (c11 = c21) End If [此贴子已经被作者于2016/7/15 12:35:17编辑过]
|
| -- 作者：Hyphen -- 发布时间：2016/7/15 13:57:00 -- Dim c21 As Integer = cr1.Table.DataTable.Compute("count(信息编号)", "信息编号 = \'" & cr1("信息编号") & "\' and 任务完成 = True and 编制类型=\'编制\' ") |
| -- 作者：douglas738888 -- 发布时间：2016/7/15 15:26:00 -- 请教老师，关于上述代码要在关联表中勾选的问题 该代码如果把DataTables("投标汇总文件"）改成DataTables("投标汇总文件主表.投标汇总文件"） 报错，找不到“投标汇总文件主表.投标汇总文件” 如果在上述代码最前面加 If forms("窗口A").Opened Then..... 不报错，但是窗口中的 投标汇总文件主表.投标汇总文件 表 也不会勾选 把DataTables改成Tables也报错 是什么原因？
[此贴子已经被作者于2016/7/15 15:42:15编辑过]
|
| -- 作者：Hyphen -- 发布时间：2016/7/15 15:51:00 -- Tables("投标汇总文件主表.投标汇总文件").DataTable.find("信息编号 = \'" & cr1("信息编号") & "\'") 具体上个例子看看
|