以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]页面集合固定显示内容 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=144907) |
||||
-- 作者:w823087877 -- 发布时间:2020/1/2 15:00:00 -- [求助]页面集合固定显示内容 我有三张表格,对应窗口设计里面的页面集合有三个页面,我希望添加一个查询选项,因为每一个表格里面都有一个采购订单号,所以相当于三个表是关联的,我希望在每一个集合页面里的查询选项都是固定的,然后我查询了一个表格的数据在分别的不同页面显示相应的数据。不知道我说的是不是能理解。谢谢大婶们。 此主题相关图片如下:微信图片_20200102145052.jpg 此主题相关图片如下:微信图片_20200102145058.jpg |
||||
-- 作者:w823087877 -- 发布时间:2020/1/2 15:01:00 -- 补充帖子中缺失的图片 补充帖子中缺失的图片 此主题相关图片如下:微信图片_20200102145102.jpg [此贴子已经被作者于2020/1/2 15:01:49编辑过]
|
||||
-- 作者:有点蓝 -- 发布时间:2020/1/2 15:05:00 -- 提示给多个表设置条件不就行了 dim filter as string = "某某条件" tables("表A").filter = filter tables("表B").filter = filter |
||||
-- 作者:w823087877 -- 发布时间:2020/1/2 15:20:00 -- 我可能描述的不清楚,我想在三个页面结合里面都拥有同一个查询框,我把文件发上来,大神帮我看一看。
|
||||
-- 作者:有点蓝 -- 发布时间:2020/1/2 15:30:00 -- Dim idx As Integer = Tables("经法合同").FindRow(e.Form.Controls("ComboBox9").text & "=\'" & e.Form.Controls("TextBox17").text & "\'") If idx >=0 Then Tables("经法合同").Position = idx Dim r As Row = Tables("经法合同").Current idx = Tables("多维系统").FindRow( "ERP采购订单=\'" & r("ERP采购订单号") & "\'") If idx >=0 Then Tables("多维系统").Position = idx End If idx = Tables("ERP系统").FindRow( "订单编号=\'" & r("ERP采购订单号") & "\'") If idx >=0 Then Tables("ERP系统").Position = idx End If End If
|
||||
-- 作者:w823087877 -- 发布时间:2020/1/2 15:37:00 -- 能告知我放在什么事件里吗?我是小白啊,本来看了一段时间教程了,后来好久不看都忘完了。 [此贴子已经被作者于2020/1/2 15:39:18编辑过]
|
||||
-- 作者:有点蓝 -- 发布时间:2020/1/2 15:39:00 -- 查询按钮呀 |
||||
-- 作者:w823087877 -- 发布时间:2020/1/2 15:46:00 -- 大大,还得找您啊,能不能让我那个查询那一块的东西在三个集合页面都显示啊? |
||||
-- 作者:有点蓝 -- 发布时间:2020/1/2 15:55:00 -- 那就不要放到集合页面里,放到集合控件之外 |
||||
-- 作者:w823087877 -- 发布时间:2020/1/2 16:49:00 -- 大大还在不在线?我试着不放在集合里,不知道是我调整的有问题还是语句有问题,我用这个搜索查询第二第三页的数据时提示没有该数据。 |