以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]如何实现表中数据读取。 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=27173) |
-- 作者:guoqi1129 -- 发布时间:2012/12/24 11:10:00 -- [求助]如何实现表中数据读取。 dr1 = DataTables("达标").Find("序号" = 1) 现在表中有20列,我需要取得dr1行中第5列到第10列值到数列a()中,请问如何实现?均为double型 |
-- 作者:狐狸爸爸 -- 发布时间:2012/12/24 11:18:00 -- Dim dt As DataTable = DataTables("表名") Dim dr as DataRow Dim a(5) As Double For i as integer = 4 to 9 a(i - 4) = dr(dt.DataCols(i).Name) Next |
-- 作者:guoqi1129 -- 发布时间:2012/12/24 11:19:00 -- 谢谢 |
-- 作者:guoqi1129 -- 发布时间:2012/12/24 11:29:00 -- 您好,大神,经使用,foxtable 提示表“达标”不存在名为4的列。这个如何弄? |
-- 作者:guoqi1129 -- 发布时间:2012/12/24 11:40:00 -- 以下是引用狐狸爸爸在2012-12-24 11:18:00的发言:
Dim dt As DataTable = DataTables("表名") Dim dr as DataRow Dim a(5) As Double For i as integer = 4 to 9 a(i - 4) = dr(dt.DataCols(i).Name) Next 您好,狐爸,经使用,foxtable 提示表“达标”不存在名为4的列。这个是怎么回事啊? |
-- 作者:lin_hailun -- 发布时间:2012/12/24 11:51:00 -- Dim t As Table = Tables("表名") Dim dr as DataRow Dim a(5) As Double For i as integer = 4 to 9 a(i - 4) = dr(t.Cols(i).Name) Next |