Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共7 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:建议:给临时表生成器增加"不显示表名标题"选项

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

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

2楼
狐狸爸爸 发表于:2009/12/16 16:02:00

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

3楼
狐狸爸爸 发表于:2009/12/16 16:04:00
已经有了,将属性TableVisible设为False
4楼
czy 发表于:2009/12/16 16:26:00
哈,我只知道提过,可从来没去用过。
5楼
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     '先显示出"统计"表后隐藏

6楼
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() 
7楼
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编辑过]
共7 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03125 s, 2 queries.