以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  建议:给临时表生成器增加"不显示表名标题"选项  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=5523)

--  作者:xl
--  发布时间:2009/12/16 13:07:00
--  建议:给临时表生成器增加"不显示表名标题"选项
建议:给临时表生成器增加"不显示表名标题"选项,以方便代码调用"中间过渡类表"不露任何痕迹.
语法格式如下:
DataTableBuilder类型是专为创建临时表而提供,定义DataTableBuilder变量的语法是: 

New DataTableBuilder(Name)
New DataTableBuilder(Name, Caption)
New DataTableBuilder(Name, Caption,Hide) 


--  作者:狐狸爸爸
--  发布时间:2009/12/16 16:02:00
--  

有一定的道理,以后考虑。


--  作者:狐狸爸爸
--  发布时间:2009/12/16 16:04:00
--  
已经有了,将属性TableVisible设为False
--  作者:czy
--  发布时间:2009/12/16 16:26:00
--  
哈,我只知道提过,可从来没去用过。
--  作者:xl
--  发布时间:2009/12/16 20:39:00
--  
以下是引用狐狸爸爸在2009-12-16 16:04:00的发言:
已经有了,将属性TableVisible设为False .
始终解决不了问题,我希望任何时候都不显示表名,现给段代码,看放在什么位置合适?
Dim
dtb As New DataTableBuilder("统计")
dtb.AddDef("产品", GetType(String), 32)
dtb.AddDef("客户", GetType(String), 32)
dtb.AddDef("数量", GetType(Integer))
dtb.AddDef("金额", GetType(Double))
dtb.Build
()         
Tables("统计").Visible = False     \'先显示出"统计"表后隐藏


--  作者:czy
--  发布时间:2009/12/16 20:45:00
--  
Dim dtb As New DataTableBuilder("统计")
dtb.AddDef("产品", GetType(String), 32)
dtb.AddDef("客户", GetType(String), 32)
dtb.AddDef("数量", GetType(Integer))
dtb.AddDef("金额", GetType(Double))
dtb.TableVisible = false
dtb.Build() 

--  作者:xl
--  发布时间:2009/12/16 20:52:00
--  

帮助中有详细的说明啊,看来提问之前应反复看一下帮助.

临时表生成器

DataTableBuilder类型是专为创建临时表而提供,定义DataTableBuilder变量的语法是: 

New DataTableBuilder(Name)
New DataTableBuilder(Name, Caption) 

Name:    临时表名称
Caption: 临时表标题 

DataTableBuilder类型有一个属性:

TableVisible:是否在主界面中显示生成的临时表。

DataTableBuilder类型有一个AddDef方法,用于定义新增列的属性,可以一次性的指定新增列的名称、类型、标题、长度、表达式,AddDef的语法有六种,非常灵活:

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) 

Name:        字符型,指定列的名称
Type:        Type类型,指定列的类型,用GetType函数获得指定的类型,例如:GetType(String),表示字符型
MaxLength:   整数型,指定字符列的长度
Expression: 字符型,指定计算表达式
Caption:     字符型,指定列标题

用AddDef方法添加所有列的定义后,最后用Build方法生成临时表。 

例如: 

Dim dtb As New DataTableBuilder("统计")
dtb.AddDef("产品", GetType(String), 32)
dtb.AddDef("客户", GetType(String), 32)
dtb.AddDef("数量", GetType(Integer))
dtb.AddDef("金额", GetType(Double))
dtb.Build()
MainTable
= Tables("统计")

上述的代码增加了一个名为统计表的临时表,该表包括四列: 

产品:字符型,长度为32
客户:字符型,长度为32
数量:整数型
金额:双精度小数型

用代码生成的临时表,在关闭项目后,将不复存在。

[此贴子已经被作者于2009-12-16 20:53:03编辑过]