以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]多表取值赋值到窗口文本框控件 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=97099) |
-- 作者:13865161910 -- 发布时间:2017/3/6 11:14:00 -- [求助]多表取值赋值到窗口文本框控件 请教: 现有如下几个表:
设计窗口如下:
问题: 由于窗口根据产品编码表/关联表的"装车位置"列,设计了F(前片信息)尺寸/R(后片信息)尺寸,需要从表中取值做判断,将关联表中的宽高后尺寸,赋值到窗口中,使其预览主表信息时,下方的图片、尺寸随之变动。 请教: 窗口的代码如何编译?代码是否写在afterload中? [此贴子已经被作者于2017/3/6 11:16:36编辑过]
|
-- 作者:有点色 -- 发布时间:2017/3/6 11:39:00 -- 1、下面的东西,不要绑定绑定表列。
2、直接查询对应的值填入。比如
Dim fdr As DataRow = DataTables("某表").find("某列 = \'" & Tables("某表").Current("某列") & "\'") If fdr IsNot Nothing Then e.Form.Controls("Textbox1").text = fdr("某列") e.Form.Controls("Textbox2").text = fdr("某列") End If |
-- 作者:13865161910 -- 发布时间:2017/3/6 14:50:00 -- 回复:(有点色)1、下面的东西,不要绑定绑定表列。... 此窗口设计既是后台数据前台展示的窗口,又是一个产品录入的窗口
如果我想在查阅主表数据时,其下面的产品尺寸也对应显示出来,能否请教,按照您的方式代码如何编译?! 尺寸是根据装车位置列做判断赋值到对应文本框的
想学习一下,概念可能还有点模糊!
主表中有个前片编码,后片编码,这是值是与参考号表中的值有对应的!而产品编码表的值是取自参考号中的某一列的值作为代表,然后附上产品宽、高、厚尺寸等信息! [此贴子已经被作者于2017/3/6 14:51:02编辑过]
|
-- 作者:有点色 -- 发布时间:2017/3/6 15:57:00 -- 既然是产品录入窗口,那你就做错了。每种车型,对应的配置都是不同的。
你应该做一个前片明细表,一个厚片明细表,或者是把需要的信息,都弄在车型信息表里面去。 |
-- 作者:13865161910 -- 发布时间:2017/3/6 16:07:00 -- 回复:(有点色)?既然是产品录入窗口,那你就做... 主表就是他的主要信息! 每个车型,也就品牌,车型、年份、排量不同,所以对应的产品不同。
客户查询资料是已车型为条件,获取车辆的前后装配信息!
目前设计的窗口一是录入车型,而是将前后产品的信息附上,因为虽然车型不同,但很多产品是通用的!这就是通用查询的界面,所有产品本身的编码、尺寸、图片是固定的!
如果将所有信息都放入一个表中,就会形成重复录入的工作!浪费时间!
看主表中:一个车型可能因为年份或排量不同,后面的产品对应的编码就变了! 所以我将编号单独拿出来,行程个独立的表,包含尺寸、与其他通用编码!与主表关联!这样,每次我只要在主表中输入编号,就会总动关联上图片及尺寸信息! [此贴子已经被作者于2017/3/6 16:10:42编辑过]
|
-- 作者:有点色 -- 发布时间:2017/3/6 16:41:00 -- 既然只是查询信息,那就直接查核赋值
Dim fdr As DataRow = DataTables("某表").find("某列 = \'" & Tables("某表").Current("某列") & "\'") If fdr IsNot Nothing Then e.Form.Controls("Textbox1").text = fdr("某列") e.Form.Controls("Textbox2").text = fdr("某列") End If |