count计算某表列数的时候怎么排除隐藏列？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → count计算某表列数的时候怎么排除隐藏列？

共有17361人关注过本帖树形打印复制链接主题：count计算某表列数的时候怎么排除隐藏列？

mr725

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

加好友

发短信

等级：MVP荣誉狐帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00

count计算某表列数的时候怎么排除隐藏列？ 发帖心情

Post By：2009/8/26 18:40:00 [只看该作者]

Output.Show(DataTables("订单").DataCols.Count) 怎么排除隐藏列？
如：总共8列，隐藏了2列，当隐藏列数不确定时，怎样用代码计算出显示列的列数

yangming

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

加好友

发短信

等级：超级版主帖子：4109 积分：23338 威望：0 精华：21 注册：2008/9/1 20:07:00

Post By：2009/8/26 19:22:00 [只看该作者]

Dim n As Integer=0
For Each cl As Col In Tables("出库明细").Cols '排除隐藏列
If cl.Visible Then
n=n+1
End If
Next
Output.Show(n)

mr725

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

加好友

发短信

等级：MVP荣誉狐帖子：5154 积分：31434 威望：0 精华：8 注册：2008/9/8 12:27:00

Post By：2009/8/26 19:26:00 [只看该作者]

以下是引用yangming在2009-8-26 19:22:00的发言：
Dim n As Integer=0
For Each cl As Col In Tables("出库明细").Cols '排除隐藏列
If cl.Visible Then
n=n+1
End If
Next
Output.Show(n)

谢谢，看过你的例子了。但DataTables("订单").DataCols.Count 后跟个参数true或false就更简便了

yangming

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

加好友

发短信

等级：超级版主帖子：4109 积分：23338 威望：0 精华：21 注册：2008/9/1 20:07:00

Post By：2009/8/26 19:30:00 [只看该作者]

以下是引用mr725在2009-8-26 19:26:00的发言：

谢谢，看过你的例子了。但DataTables("订单").DataCols.Count 后跟个参数true或false就更简便了

如能加参数当然方便了，呵呵

下一主题 >> << 上一主题

主题：count计算某表列数的时候怎么排除隐藏列？