以文本方式查看主题
-
Foxtable(狐表)
(http://foxtable.com/bbs/index.asp)
--
专家坐堂
(http://foxtable.com/bbs/list.asp?boardid=2)
----
复制临时表时
(http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=145522)
-- 作者:蓝蚂蚁
-- 发布时间:2020/1/28 9:24:00
-- 复制临时表时
此主题相关图片如下:image 1.jpg
想复制临时表的内容到内部表,有如下代码:
\'Dim Cols1BQK001() As String = {"手术月份","计划类型_1","总金额_平均_1","计划类型_2","总金额_平均_2"} ‘临时表结构
\'Dim Cols2BQK001() As String = {"手术月份","半髋_例数_台","半髋_平均费用_均费","全髋_例数_台","全髋_平均费用_均费"} ’内部表结构
遇到问题:临时表结构是不定的,但内部表时固定的,如何才能正确的把临时表复制到内部表?谢谢了
-- 作者:y2287958
-- 发布时间:2020/1/28 9:35:00
--
这个必须要有一个对应复制关系,也可以使用列序方式
-- 作者:有点蓝
-- 发布时间:2020/1/28 9:39:00
--
至少要有一定的规律,如果列名不定,那要保证列的顺序是一致的
Dim dr2 As DataRow = DataTables("表B").AddNew()
For i As Integer = 0 To Cols1.Length -1
dr2(Cols2BQK001(i)) = dr1(i)
Next