以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 带出相关内容  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=144820)

--  作者:sanny
--  发布时间:2019/12/30 20:42:00
--  [求助] 带出相关内容

你好,老师,

 

请问一下如附件项目,打开窗口1后,双击第一列相应内容后就会出现窗口2。

 

想实现如下:

1.出现窗口后,就自动新增

2.新增记录的第一列等于双击的第一列内容,第二列等于第二列的内容,谢谢。

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


--  作者:有点蓝
--  发布时间:2019/12/30 21:02:00
--  
双击事件

If e.Col.Name ="第一列"
    e.Cancel =True
    Dim r As Row = Tables("表C").AddNew
    r("第一列") = e.Row("第一列")
    r("第二列") = e.Row("第二列")
    Forms("窗口2").open
End If