Foxtable(狐表)用户栏目专家坐堂 → 建议:给临时表生成器增加"不显示表名标题"选项


  共有14683人关注过本帖树形打印复制链接

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

帅哥哟,离线,有人找我吗?
xl
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:400 积分:3961 威望:0 精华:0 注册:2009/4/28 7:39:00
建议:给临时表生成器增加"不显示表名标题"选项  发帖心情 Post By:2009/12/16 13:07:00 [只看该作者]

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

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


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/12/16 16:02:00 [只看该作者]

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


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2009/12/16 16:04:00 [只看该作者]

已经有了,将属性TableVisible设为False

 回到顶部
帅哥哟,离线,有人找我吗?
czy
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33963 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2009/12/16 16:26:00 [只看该作者]

哈,我只知道提过,可从来没去用过。

 回到顶部
帅哥哟,离线,有人找我吗?
xl
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:400 积分:3961 威望:0 精华:0 注册:2009/4/28 7:39:00
  发帖心情 Post By: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
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33963 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By: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
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:400 积分:3961 威望:0 精华:0 注册:2009/4/28 7:39:00
  发帖心情 Post By: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编辑过]

 回到顶部