以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  求助!跨表查询取值(有多列取值及逻辑列)  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=106126)

--  作者:kmbn
--  发布时间:2017/9/2 17:34:00
--  求助!跨表查询取值(有多列取值及逻辑列)
请教老师:
     想实现在表A的“第一列”双击“102”单元格,弹窗并生成查询条件内容为“102”的条件如图:

图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看
弹窗功能实现了,但是不会写怎么获取“102”的值为查询条件的代码,请老师指点
If e.Col.Name = "第一列" Then
    e.Cancel = True \'取消默认动作
    Forms("窗口1").Open()
End If


再一个问题:
   想实现在表B中,“第二列”取{101,102,103}加上“第五列”的逻辑值为条件的查询

图片点击可在新窗口打开查看此主题相关图片如下:3.png
图片点击可在新窗口打开查看
实现单个“第二列”内容可以,可多个不知道代码怎么写,请老师指点
Tables("表B").Filter= "第二列 = \'" & 102 &  " \' And 第五列 = 1 "




--  作者:有点蓝
--  发布时间:2017/9/2 17:39:00
--  
Tables("表B").Filter= "第二列 = \'" & 102 &  " \' And 第五列 = true"
--  作者:kmbn
--  发布时间:2017/9/2 17:51:00
--  
帮助中说的

在查询表达式中用1代替True,用0代替False,效率提高超过100倍,切记切记。