- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 如何将Datetable中单元格的加载到窗口的label中 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=24656)
-- 发布时间：2012/10/19 14:28:00
-- 如何将Datetable中单元格的加载到窗口的label中
我有一个难题不知道怎么操作，我在A表中有一个窗口，需要根据A表中的一个单元格的值在B表中找到对应的行，并将此行中后一列的值添加到A表的窗口中一个Label控件中。
-- 发布时间：2012/10/19 14:32:00
--
找到那一行，然后取值。
http://www.foxtable.com/help/topics/0396.htm
-- 发布时间：2012/10/19 14:39:00
--
我用过Find了。代码如下
Dim a As String=Tables("产品报价单").Current("部件名称")
Forms("通用规格设计器").controls("部件名称").text=a
Dim b As DataRow
b=DataTables("部件结构表").Find("部件名称"= a)
Forms("通用规格设计器").controls("属性1").text=b
窗口显示的是空白
-- 发布时间：2012/10/19 14:46:00
--
Dim a As String=Tables("产品报价单").Current("部件名称")
Forms("通用规格设计器").controls("部件名称").Value = a
Dim b As DataRow
b = DataTables("部件结构表").Find("部件名称 = \'"& a & "\'")
If b IsNot Nothing Then
Forms("通用规格设计器").controls("属性1").Value = b("取值列名")
End If
你的错误不是一点点，甚至可以说一塌糊涂。
看帮助一定要按顺序，头一两遍可以不求甚解，第三遍开始要将每个例子实际操作演练一遍，不明白的就上论坛求助。三遍之后才开始做系统，遇到问题在帮助找答案，找不到的在论坛提问。
此外一定要先掌握《使用指南》，然后再看《开发指南》
-- 发布时间：2012/10/19 15:28:00
--
上面的代码，我把Value改成Text了，结果实现了。实在抱歉啊，狐表我下载了4个月了。为了说服公司买一套开发版，只能赶鸭子上架了，弄点成果出来了啊。关于连接符的章节我又仔细看了一遍，还是有些不太明白，我再仔细研究研究吧。见笑了
-- 发布时间：2012/10/19 15:31:00
--
以下是引用shijiaxu在2012-10-19 15:28:00的发言：
上面的代码，我把Value改成Text了，结果实现了。实在抱歉啊，狐表我下载了4个月了。为了说服公司买一套开发版，只能赶鸭子上架了，弄点成果出来了啊。关于连接符的章节我又仔细看了一遍，还是有些不太明白，我再仔细研究研究吧。见笑了
上面的代码，我把Value改成Text了，结果实现了。实在抱歉啊，狐表我下载了4个月了。为了说服公司买一套开发版，只能赶鸭子上架了，弄点成果出来了啊。关于连接符的章节我又仔细看了一遍，还是有些不太明白，我再仔细研究研究吧。见笑了
鼓励一下。