文本居中 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 文本居中

共有2014人关注过本帖树形打印复制链接主题：文本居中

石四

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

等级：四尾狐帖子：972 积分：7048 威望：0 精华：0 注册：2013/3/31 10:33:00

文本居中

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

Tables("部门考勤_Table1").AllowEdit = True

Tables("部门考勤_Table1").SetColVisibleWidth("部门|88|员工编号|68|姓名|68|考勤日期|88|工作日|78|出勤|78|请假|78|备注|118")

Tables("部门考勤_Table1").DefaultRowHeight = 24

文本居中的代码怎么写?找不到呢.

有点甜

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

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

Post By：2014/10/30 10:34:00 [只看该作者]

居中，需要每一列设置。

Dim t As Table = Tables("表A")

For Each c As Col In t.Cols
c.TextAlign = TextAlignEnum.Center
Next

石四

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

等级：四尾狐帖子：972 积分：7048 威望：0 精华：0 注册：2013/3/31 10:33:00

Post By：2014/10/30 10:36:00 [只看该作者]

收到

主题：文本居中