以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求:在窗口表“入库表窗口_入库表”中,也可以直接点击第二行的该列按钮,打开的窗口,显示第二行对应的数据。  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=140170)

--  作者:fengwenliuyan
--  发布时间:2019/8/30 17:53:00
--  求:在窗口表“入库表窗口_入库表”中,也可以直接点击第二行的该列按钮,打开的窗口,显示第二行对应的数据。
“入库编号”列的单元格按钮,单击打开窗口“窗口1”,“窗口1”绑定的是“过磅表”的数据,

要求:
如点击“入库表”的第n行的“入库编号”列的单元格按钮,打开的“窗口1”中,显示该行对应在“过磅表”的“入库编号”相同的行。

我自己尝试编写:
1、在入库表的CellButtonClick表事件中设置代码:
If e.Col.Name = "入库编号" Then
    e.Cancel = True \'取消默认动作
    Forms("窗口1").Open()
End If

2、在入库表的CurrentChanged表事件中设置代码:

If forms("窗口1").opened AndAlso e.Table.Current IsNot Nothing Then

    Tables("窗口1_过磅表").filter = "入库编号 = \'" & e.Table.Current("入库编号") & "\'"

End If


3、在“窗口1”的AfterLoad事件中设置代码:

Tables("入库表").RaiseCurrentChanged


尝试结果:

1、

在主表“入库表”中,按钮可用,

但在窗口表“入库表窗口_入库表”中,如直接点击第二行的该列按钮,打开的窗口,显示的却是第一行对应的数据。


2、

求:

在窗口表“入库表窗口_入库表”中,也可以直接点击第二行的该列按钮,打开的窗口,显示第二行对应的数据。




 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.zip








--  作者:有点蓝
--  发布时间:2019/8/30 20:18:00
--  
“窗口1”的AfterLoad事件:
If CurrentTable.DataTable.Name = "入库表"
    CurrentTable.RaiseCurrentChanged
Else
    Tables("入库表").RaiseCurrentChanged
End If

或者做联动:http://www.foxtable.com/webhelp/topics/2631.htm