怎样定义一个Table并实例化? - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 怎样定义一个Table并实例化?

共有3363人关注过本帖树形打印复制链接主题：怎样定义一个Table并实例化?

wwwzhucom

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：91 积分：844 威望：0 精华：0 注册：2013/6/1 14:59:00

怎样定义一个Table并实例化? 发帖心情

Post By：2014/6/23 10:00:00 [只看该作者]

怎样定义一个Table并实例化?如:

dim dt as table=new tables("表1");

"表1"是随便命名的表名

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/6/23 10:01:00 [只看该作者]

参考 http://www.foxtable.com/help/topics/1919.htm

wwwzhucom

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：91 积分：844 威望：0 精华：0 注册：2013/6/1 14:59:00

Post By：2014/6/23 10:24:00 [只看该作者]

Dim tb1 As WinForm.Table
tb1=e.Form.CreateSQLQuery("Table3",sql,"cdgl")
e.Form.AddControl(tb1)
Tables("Table3").Sort="采集时间2 Desc"
Dim dt As Table=Tables("Table3")
Dim dlg As new SaveFileDialog
dlg.Filter="Excel格式文件|*.xls"
If dlg.ShowDialog=DialogResult.ok Then
    Dim ex As new Exporter
    ex.SourceTableName=dt.Name
    ex.Format="Excel"
    ex.FilePath=dlg.FileName
    ex.Filter=strFilter
    ex.Export()
End If

提示找不到“Table3”这个表，在该页面已经有两个table控件分别是Table1和Table2,这是怎么原因?不存在Table3啊