以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  列显功能出错，求助？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83373)
--  作者：zsslly
--  发布时间：2016/4/7 14:56:00
--  列显功能出错，求助？
我给一个表设置了重设列显示的功能，前面的几个表都没问题，现在却不行了，求解？
如下代码：

\'列显设置开始
Dim vs As String
For Each dr As DataRow  In DataTables("设计部个人业绩计划表列显设置表").Select("显示=TRUE", "_Sortkey")
    vs = vs & dr("列名") & "|" & dr("显示宽度") & "|"
Next

Tables("设计师个人产值计划产值汇总表_Table1").SetColVisibleWidth(vs.trim("|"))
\'列显设置结束



Forms("设计部个人业绩计划表列显设置表").Close

如图：

图片点击可在新窗口打开查看此主题相关图片如下：qq截图20160407144315.jpg
图片点击可在新窗口打开查看
--  作者：zsslly
--  发布时间：2016/4/7 14:58:00
--  
会不会“设置标置列”中设置的问题！
--  作者：大红袍
--  发布时间：2016/4/7 14:58:00
--  

For Each dr As DataRow  In DataTables("设计部个人业绩计划表列显设置表").Select("显示=TRUE", "_Sortkey")

 

改成

 

For Each dr As DataRow  In DataTables("设计部个人业绩计划表列显设置表").Select("显示=TRUE", "_Identify")
--  作者：zsslly
--  发布时间：2016/4/7 15:03:00
--  
谢谢