以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 表的请教 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=97272) |
-- 作者:cuicuibing -- 发布时间:2017/3/9 7:50:00 -- 表的请教 表的样式如下: 表a: 第一列 第二类 第三列 第四列 第五列 a001 b012 c001 d010 e006 表b 第一列 第二类 第三列 第四列 第五列 b012 的 号 吃 五 表c 第一列 第二类 第三列 第四列 第五列 c001 王 刘 找 吗 表d 第一列 第二类 第三列 第四列 第五列 d010 想 赛 了 额 表e 第一列 第二类 第三列 第四列 第五列 e006 箱 好 聊聊 我 通过表a,如何生成 , 表b,表c,表d,表e 的组合表。有哪几种方式。 sql数据库。
|
-- 作者:有点蓝 -- 发布时间:2017/3/9 8:39:00 -- 生成的逻辑是什么? |
-- 作者:cuicuibing -- 发布时间:2017/3/9 9:01:00 -- 表a第一列等于 a001 表b.第一列 = 表a.第二列 表c.第一列 = 表a.第三列 表d.第一列 = 表a.第四列 表e.第一列 = 表a.第五列 组合为一行数据 |
-- 作者:有点蓝 -- 发布时间:2017/3/9 9:28:00 -- Dim t As Table = Tables("表A") Dim r As Row = t.Current If r IsNot Nothing Then Dim r2 As Row Dim tbarr() As String = {"表B","表C","表D"} For i As Integer = 0 To tbarr.Length - 1 r2 = Tables(tbarr(i)).AddNew r2("第一列") = r(t.Cols(i+1).Name) Next End If
|