[求助]如何切换表标题与列名？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]如何切换表标题与列名？

共有2858人关注过本帖树形打印复制链接主题：[求助]如何切换表标题与列名？

jnletao

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

加好友

发短信

等级：四尾狐帖子：936 积分：7725 威望：0 精华：0 注册：2013/7/7 13:37:00

[求助]如何切换表标题与列名？ 发帖心情

Post By：2015/3/17 16:53:00 [只看该作者]

原外部表-数据表列名是英文的，在狐表可以用列标题方式重命名。

但如何在列标题与列名间快速切换，以便调试时查看

Bin

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

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2015/3/17 16:57:00 [只看该作者]

'显示列名

For Each c As Col In Tables("表A").Cols

c.Caption= c.Caption & "(" & c.name & ")"

DataTables("表A").BuildHeader

'显示标题隐藏列名

For Each c As Col In Tables("表A").Cols

c.Caption= c.Caption.split("(")(0)

DataTables("表A").BuildHeader

jnletao

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

加好友

发短信

等级：四尾狐帖子：936 积分：7725 威望：0 精华：0 注册：2013/7/7 13:37:00

Post By：2015/3/17 17:00:00 [只看该作者]

好久没来，BIN老师还是一如即往的热情回复。图片点击可在新窗口打开查看

有点甜

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

加好友

发短信

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

Post By：2015/3/17 17:01:00 [只看该作者]

name转caption

For Each dc As DataCol In DataTables("表A").DataCols
    If dc.DefaultValue = "" Then
        dc.DefaultValue = iif(dc.Caption>"", dc.Caption, dc.Name)
    End If
    dc.Caption = dc.Name
Next

DataTables("表A").BuildHeader

标题转名称

For Each dc As DataCol In DataTables("表A").DataCols
    If dc.DefaultValue <> "" Then
        dc.Caption = dc.DefaultValue
    End If
Next

DataTables("表A").BuildHeader

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

主题：[求助]如何切换表标题与列名？