以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 表控件的使用问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=78030) |
-- 作者:zhangc2000 -- 发布时间:2015/11/30 20:41:00 -- 表控件的使用问题 我在窗口 A 中使用表控件Table1,希望在点击表控件中的数据行时,能在文本框TextBox1和TextBox2显示相应内容。截取部分代码如下: Tables("A_Table1").DataSource = DataTables("结算数据") \'绑定结算数据表 Tables("A_Table1").Filter = "[企业编码] in (" & ids & ") And [结算日期] = \'"& rq & "\'" \'给出筛选条件 Tables("A_Table1").Sort = ""& zb & " DESC" \'将结算降序排列 Tables("A_Table1").SetColVisibleWidth("企业编码|65|"& zb &"|220") \'设置表控件中显示列的宽度 Forms("A").Controls("TextBox1").BindingField = "A_Table1.企业编码" \'将结算数据表中的企业编码列内容显示在文本框TextBox1中 Forms("A").Controls("TextBox2").BindingField = "A_Table1.企业名称" \'将关联表中与企业编码对应的企业名称显示在文本框TextBox2中 问题:怎样把关联表(假设是数据表B,父表)中的企业名称显示在文本框TextBox2中?即两个文本框显示内容随着表控件点击内容的变化而变化。由于在结算数据表中有企业编码,所以文本框TextBox1可以跟随表控件变化。但企业名称不在结算数据表中,需要到关联表B中调取,并把内容显示在文本框TextBox2中。 谢谢 |
-- 作者:大红袍 -- 发布时间:2015/11/30 21:04:00 -- Forms("A").Controls("TextBox2").BindingField = "表B.企业名称" |