以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]更改列标题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=118926)
--  作者：lgj716330
--  发布时间：2018/5/14 15:10:00
--  [求助]更改列标题

With CurrentTable
Dim XBT As String
XBT = e.Form.Controls("TextBox1").Text 
     .Cols(.ColSel).Caption =  XBT 
     .BuildHeader()
End With

 

标题改了之后，系统重新进去发现又变回原来的标题了，这要如何解决

 
--  作者：有点甜
--  发布时间：2018/5/14 15:11:00
--  
设置一个表格，把各个表、各个列的标题值保存一下。afterOpenProject事件，所有表都设置一下。
--  作者：lgj716330
--  发布时间：2018/5/14 15:33:00
--  
感觉好麻烦，有没有例子参考下
--  作者：有点甜
--  发布时间：2018/5/14 15:36:00
--  
以下是引用lgj716330在2018/5/14 15:33:00的发言：
感觉好麻烦，有没有例子参考下

 

弄一个表格【表名】【列名】【标题名】，然后afteropenProject事件，循环每一行

 

Tables(dr("表名")).Cols(dr("列名")).Caption = dr("标题名")

Tables(dr("表名")).BuildHeader