以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]窗口table加载数据问题  (http://foxtable.net/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当前行数据