以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  临时表中的列怎么表示？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=61832)
--  作者：zhchling
--  发布时间：2014/12/19 22:49:00
--  临时表中的列怎么表示？
Dim dt1 As Date = Date.Today.AddDays(0) 
Dim dt2 As Date =  Date.Today.AddDays(5)  

Dim dtb As New DataTableBuilder("表B")
dtb.AddDef("区间", Gettype(String), 32)


For Each v As Date In DataTables("zclxingcheng").GetValues("日期", "日期 >= #" & dt1 & "# and 日期 <= #" & dt2 & "#")
    
    dtb.AddDef(v, Gettype(Date))
Next
dtb.Build()

Dim dr1 As DataRow = DataTables("表B").AddNew()
dr1("区间") = "二道"
dr1("第2列") = "长城"

怎么表示某列？
--  作者：land089
--  发布时间：2014/12/20 1:16:00
--  
你的其他列名实际上就是DataTables("zclxingcheng")中你获取的数据
你不妨在for each中加入一个数组或者集合用集合或者数组成员来代替列名