我想实现表中的数据能在表格中实现模排 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 我想实现表中的数据能在表格中实现模排

共有2078人关注过本帖树形打印复制链接主题：我想实现表中的数据能在表格中实现模排

抽烟的晓晓

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：26 积分：408 威望：0 精华：0 注册：2017/9/16 12:58:00

我想实现表中的数据能在表格中实现模排 发帖心情

Post By：2024/1/2 14:27:00 [只看该作者]

我们现有有一个表，表中的记录为：20230101 ，20230102，20230103，20230104..。。。共50条记录，我现在想把这记录，当作表头标题数据，然后根据表头的标题数据，查到另一个表中的记录，显示在列中

此主题相关图片如下：1704176555897.png

一种方法：就是通过遍历，把这些数据写入指定的单元格中，可是找不到这样的控件（相当于VB中的文本表格）。

还有一种，就是通过SQL，把列值转到行值，然后再循环判断，把对应的值关联进去。这个有点麻烦，也不知能不能实现

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110810 积分：563988 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2024/1/2 14:49:00 [只看该作者]

这个【想要得到的表】，是临时表还是已经存在的表？50条记录可能就会有50个列，还会不会有500条、5000条记录？表格不可能有这么多列的

抽烟的晓晓

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：26 积分：408 威望：0 精华：0 注册：2017/9/16 12:58:00

Post By：2024/1/2 17:05:00 [只看该作者]

最多排90天的，就90个列。我本打算不用表
，只用一个容器能像表一样展示。我用循环把这个数值写到指定的单元格中。如果不行，必须得用临时表，我应该咋操作？

此主题相关图片如下：1704186292475.png

抽烟的晓晓

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：26 积分：408 威望：0 精华：0 注册：2017/9/16 12:58:00

Post By：2024/1/2 17:22:00 [只看该作者]

我想是不是，我先建一个90列的临时表，然后再填数据，标题放在第一行，其它的对应的日期的记录，放第二行，第三行最后显示出来？

有点蓝

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110810 积分：563988 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2024/1/2 17:28:00 [只看该作者]

http://www.foxtable.com/webhelp/topics/0679.htm

Dim dtb As New DataTableBuilder("统计表)

Dim Products As List(Of String) = DataTables("表1").GetValues("日期")
For Each v As String In Products
dtb.AddDef(v, Gettype(string),16)
Next
dtb.Build()

For Each v As String In Products
For Each dr As datarow In DataTables("表2").select("日期='" & v & "'")
Dim dr1 As DataRow = DataTables("统计表").find(v & " is null")

if dr1 is nothing

dr1 = DataTables("统计表").AddNew()

end if
dr1(dr("日期")) = dr("工单")

Next
MainTable = Tables("统计表")

抽烟的晓晓

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：26 积分：408 威望：0 精华：0 注册：2017/9/16 12:58:00

Post By：2024/1/2 17:46:00 [只看该作者]

谢谢版主，我按您的思路马上代码

下一主题 >> << 上一主题

主题：我想实现表中的数据能在表格中实现模排