以文本方式查看主题 -  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=150074)

--  作者：Xin0101203 --  发布时间：2020/5/20 10:33:00 --  如何根据所选内容跨表引用内容实现自动输入 此主题相关图片如下：1.png 此主题相关图片如下：2.jpg

--  作者：Xin0101203 --  发布时间：2020/5/20 10:36:00 --   请教老师，如何根据窗口的下拉选择框，实现跨表引用内容自动填充？

--  作者：有点蓝 --  发布时间：2020/5/20 10:43:00 --   下拉选择框valuechanged事件，类似 dim ss as list(of string) = datatables("票种消息").getvalues("票名","售卖窗口=\'" & e.sender.text & "\'") for i as integer =0 to math.min(ss.count,tables("窗口表").rows.count) tables("窗口表").rows(i)("票名") = ss(i) next

--  作者：Xin0101203 --  发布时间：2020/5/26 9:27:00 --    下载信息  [文件大小：   下载次数： ] 点击浏览该文件:管理项目1.table 老师，请您帮我看下，新增按钮的代码应该如何设置，才能不循环增加票名为空的行呢？

--  作者：Xin0101203 --  发布时间：2020/5/26 9:43:00 --   还有个问题，如何在窗口中点完保存后，窗口中的table不加载已经保存的行，只显示点完新增按钮之后新增的行，datatable（“票务销售”）不受影响，显示所有行？

--  作者：有点蓝 --  发布时间：2020/5/26 9:56:00 --   新增 Dim cmb As WinForm.ComboBox cmb = Forms("每日销售记录").Controls("日销部门选框") Dim str As String = cmb.Value Dim drs As List(Of String) = DataTables("票种信息").GetValues("票名","售卖窗口 = \'" & str & "\' And 票名 Is not null") For Each ss As String In drs     Dim r As Row = Tables("票务销售").AddNew()     r("票名") = ss Next 帮助 保存按钮 e.Form.Controls("日销table").Table.save

--  作者：Xin0101203 --  发布时间：2020/5/26 10:19:00 --   谢谢老师解答，我想做的是点击保存后，窗口表不再显示已经保存的行，但是非窗口表datatable（“票务销售”）这个表可以显示所有行，我试过“[_Identify] is null”，设置完之后就都不显示了

--  作者：有点蓝 --  发布时间：2020/5/26 10:24:00 --   e.Form.Controls("日销table").Table.filter = “false”

--  作者：Xin0101203 --  发布时间：2020/5/26 10:41:00 --   这个我也试过，不行，点完保存之后窗口就不显示新增的行了

--  作者：有点蓝 --  发布时间：2020/5/26 10:47:00 --   保存按钮 Dim t As Table = e.Form.Controls("日销table").Table t.save t.filter = "_Identify > " & t.Compute("max(_Identify)")