Foxtable(狐表)用户栏目专家坐堂 → 如何用代码创建表视图?


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

主题:如何用代码创建表视图?

美女呀,离线,留言给我吧!
yangming
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/6/9 11:22:00 [显示全部帖子]

Visible

返回或设置列是否可见,设为False,列将被隐藏。

例如隐藏订单表的折扣列:

Tables("订单").Cols("折扣").Visible = False

显示订单表的折扣列:

Tables("订单").Cols("折扣").Visible = True


 回到顶部
美女呀,离线,留言给我吧!
yangming
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/6/9 11:48:00 [显示全部帖子]

另表某列显示:

For Each cl As DataCol In DataTables("表B").DataCols
    Dim dr As DataRow = DataTables("表A").AddNew()
    dr("第一列")=cl.Name
Next

 回到顶部
美女呀,离线,留言给我吧!
yangming
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/6/9 12:01:00 [显示全部帖子]

发文件看看吧

 回到顶部