以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]窗体表的标题显示问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=176551)

--  作者:2900819580
--  发布时间:2022/4/18 0:59:00
--  [求助]窗体表的标题显示问题
Dim tb As Table = Tables(e.Form.Name & "_Table1")
Dim dt As DataTable = tb.DataTable
For Each c As Col In tb.Cols    
\'For Each c As dataCol In dt.dataCols      测试也不行。
    If c.name.StartsWith("Cmx") Then c.Caption = c.name.Replace("Cmx","")
    If c.name.StartsWith("CMx") Then c.Caption = c.name.Replace("CMx","")
Next


图片点击可在新窗口打开查看此主题相关图片如下:无标题20220418.png
图片点击可在新窗口打开查看

已解决,大小写问题!!
[此贴子已经被作者于2022/4/18 1:06:47编辑过]