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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 所有窗口表统一样色

共有2353人关注过本帖树形打印复制链接主题：所有窗口表统一样色

有点甜

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

加好友

发短信

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

Post By：2018/4/25 10:20:00 [显示全部帖子]

1、参考 http://www.foxtable.com/webhelp/scr/1577.htm

2、参考

Tables("表A").grid.styles.Normal.Border.Color = Color.Red
Tables("表A").grid.styles.Normal.Border.Style = 1
Tables("表A").grid.styles.Normal.Border.width = 5
Tables("表A").grid.styles.Normal.Border.Direction = 2 '0-2

3、http://www.foxtable.com/webhelp/scr/1634.htm

有点甜

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

加好友

发短信

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

Post By：2018/4/25 10:29:00 [显示全部帖子]

循环，如

For Each t As table in Tables

有点甜

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

加好友

发短信

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

Post By：2018/4/25 15:09:00 [显示全部帖子]

怎么理解你这句话？【如果窗口表当前的样式是代码】

什么样的条件、逻辑？根据什么判断？

有点甜

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

加好友

发短信

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

Post By：2018/4/25 15:33:00 [显示全部帖子]

以下是引用蓝蚂蚁在2018/4/25 15:26:00的发言：
就是窗口中的副本表设定成上面代码的样式，代码是放到窗口的AfterLoad事件中，是不是每次打开窗口时都要执行这段代码？

AfterLoad事件，就是每次打开的时候，都会执行的。

你目前遇到什么问题？要解决什么问题？

有点甜

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

加好友

发短信

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

Post By：2018/4/25 15:56:00 [显示全部帖子]

For Each zckt As Table In Tables
    If zckt.DataTable.SysStyles("CurrentRow").BackColor <> color.red Then
        zckt.DataTable.SysStyles("CurrentRow").BackColor = color.red
        zckt.Grid.Styles.Normal.Border.Color = color.black
        zckt.ListMode = True
    End If
Next

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

主题：所有窗口表统一样色