以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  列字段窗口设置？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=116190)
--  作者：有点甜
--  发布时间：2018/3/21 9:04:00
--  

执行这个代码设置

 

For Each a As OBJECT In Tables("表A").grid.parent.controls
    For Each b As OBJECT In a.controls
        If b.text = "备注" OrElse b.Text = "第十列" Then
            b.controls(1).controls(0).font = new font("宋体", 16)
        End If
    Next
Next
--  作者：有点甜
--  发布时间：2018/3/21 10:22:00
--  

1、grid 是foxtable未开放说明的对象，parent是获取对象的父容器，controls是获取容器的全部控件；

 

2、整个代码的意思是，获取表A页面全部的控件，循环，然后把需要修改的控件用代码控制。