以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 求助:多行、多列判定后再赋值 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=129465) |
||||
-- 作者:cxmxjwlmq -- 发布时间:2018/12/29 0:03:00 -- 求助:多行、多列判定后再赋值 各位老师们:我在一窗口中设置了下拉控件,其代码如下:我想要的结果是图2
Dim t As Table = Tables("制造质量管理")
IF,发动机号相同,检验岗不包涵终检,部门列的当前行如果和前面多行的内容不同 ELSE IF,发动机号相同,检验岗等于终检,部门列的当前行如果和检验岗为终检的前面多行的内容不同 cr("直行") = "非直行" ELSE cr("直行") = " " ENDIF ENDIF
请各位老师费心! |
||||
-- 作者:有点蓝 -- 发布时间:2018/12/29 9:30:00 -- 上传具体实例说明 |
||||
-- 作者:cxmxjwlmq -- 发布时间:2018/12/29 21:39:00 -- 实例已上传。 我想要的效果是:在窗口中选择第三列后,表中的第四列显示: 条件1:在第一列相同、第五列不包涵工检7,且第三列当前行的以上行内容没有重复时,第四列显示:非直行。如果第三列当前行的以上行内容有重复,第四列显示:空。 条件2:在第一列相同、第五列等于工检7,且第三列当前行的以上行内容没有重复时,第四列显示:非直行。如果第三列当前行的以上行内容有重复,第四列显示:空。
我想要的效果如下图: |
||||
-- 作者:有点甜 -- 发布时间:2018/12/30 9:48:00 -- datacolchanged事件
If e.DataCol.name = "第一列" OrElse e.DataCol.name = "第三列" Then |