专家坐堂-[求助]窗口table加载数据问题Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]窗口table加载数据问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=122059)

--  作者：polo_luo
--  发布时间：2018/7/18 11:52:00
--  [求助]窗口table加载数据问题

此主题相关图片如下：qq图片20180718114618.png

此主题相关图片如下：qq图片20180718114503.png

窗口table绑定了关联表，但窗口table显示数据却不是当前行数据
这应该怎么设定？

--  作者：polo_luo
--  发布时间：2018/7/18 11:55:00
--
二图单号为0001934，但归还利息却是显示为第二行的金额15649，
问：是绑定错了，还是在添加载后显示代码？
代码应该怎么写？

--  作者：polo_luo
--  发布时间：2018/7/18 12:00:00
--

Forms("归还").Controls("TextBox1").value = Tables("主窗口_收支业务窗(未归还)").Current("ID号")
Forms("归还").Controls("TextBox2").value = Tables("主窗口_收支业务窗(未归还)").Current("单据编号")
Forms("归还").Controls("TextBox3").value = Tables("主窗口_收支业务窗(未归还)").Current("存款姓名")
Forms("归还").Controls("TextBox4").value = Tables("主窗口_收支业务窗(未归还)").Current("借入金额")
Forms("归还").Controls("TextBox5").value = Tables("主窗口_收支业务窗(未归还)").Current("队别")
Forms("归还").Controls("TextBox6").value = Tables("主窗口_收支业务窗(未归还)").Current("身份证号")
Forms("归还").Controls("TextBox7").value = Tables("主窗口_收支业务窗(未归还)").Current("电话")
Forms("归还").Controls("TextBox8").value = Tables("主窗口_收支业务窗(未归还)").Current("开单人")
Forms("归还").Controls("TextBox9").value = Tables("主窗口_收支业务窗(未归还)").Current("收款人")
Forms("归还").Controls("TextBox10").value = Tables("主窗口_收支业务窗(未归还)").Current("备注")
Forms("归还").Controls("DateTimePicker1").value = Date.Today

\'Dim id As String = e.Form.Controls("TextBox1").Text
\'DataTables("归还_Table1").LoadFilter = id

最下面的两行代码想把窗口"归还_Table1“显示ID为"TextBox1"的ID号，这代码错在哪？

--  作者：有点甜
--  发布时间：2018/7/18 12:30:00
--

Dim id As String = e.Form.Controls("TextBox1").Text

Tables("归还_Table1").Filter = "id列 = \'" & id & "\'"

--  作者：polo_luo
--  发布时间：2018/7/18 15:02:00
--
还是不行
图一，窗口table绑定了关联表，但窗口table显示数据却不是当前行数据
这应该怎么设定？
图二，单号为0001934，但归还利息却是显示为第二行的金额15649，不是当前行16288
问：是绑定错了，还是在添加载后显示代码？

--  作者：polo_luo
--  发布时间：2018/7/18 15:21:00
--
即是：窗口table ”归还_table1"打开后加载主窗口"主窗口_收支业务窗(未归还)“当前行的数据，应该怎么做呢？

--  作者：polo_luo
--  发布时间：2018/7/18 16:03:00
--

此主题相关图片如下：qq图片20180718155727.png

加载后代码，
但显示”不存在为“归还_table"

此主题相关图片如下：qq图片20180718155838.png

--  作者：polo_luo
--  发布时间：2018/7/18 16:04:00
--
请再帮帮忙了

--  作者：有点甜
--  发布时间：2018/7/18 16:25:00
--

那改成这样

e.form.controls("Table1").Filter = "id列 = \'" & id & "\'"

--  作者：polo_luo
--  发布时间：2018/7/18 16:39:00
--

Dim id As String = e.Form.Controls("TextBox1").Text
e.form.controls("Table1").Filter = "ID号 = \'" & id & "\'"

此主题相关图片如下：qq图片20180718163500.png

加载的数据还不是主窗口table当前行数据