- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助][讨论]临时表生成器中name可不可以用GetComboListString的值取代？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=120677)
-- 发布时间：2018/6/21 17:38:00
-- [求助][讨论]临时表生成器中name可不可以用GetComboListString的值取代？
有个疑问，临时表生成器中，在增加列时，name的值可不可以用GetUniqueValues或者GetComboListString的值取代？ 临时表生成器中 AddDef(Name, Type)AddDef(Name, Type, Expression) AddDef(Name, Type, Expression，Caption) AddDef(Name, Type, MaxLength) AddDef(Name, Type, MaxLength，Expression) AddDef(Name, Type, MaxLength，Expression，Caption) 比如： Dim cls As List(Of String) cls = DataTables("项目").GetUniqueValues("", "名称") For Each cl As String In cls \'逐列取值 Dim dtb As New DataTableBuilder("项目查询") dtb.AddDef("cl", Gettype(String), 32) dtb.Build() MainTable= Tables("项目查询") Next 这个代码是否可行？ |
-- 发布时间：2018/6/21 17:49:00
--
改成
Dim cls As List(Of String)
cls = DataTables("项目").GetUniqueValues("", "名称")
Dim dtb As New DataTableBuilder("项目查询")
For Each cl As String In cls \'逐列取值
dtb.AddDef(cl, Gettype(String), 32)
Next
dtb.Build()
MainTable= Tables("项目查询")
-- 发布时间：2018/6/21 17:53:00
--
原来是我把顺序弄反了
