Foxtable(狐表)用户栏目专家坐堂 → [求助]


  共有3783人关注过本帖树形打印复制链接

主题:[求助]

帅哥哟,离线,有人找我吗?
xybcxh
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:92 积分:824 威望:0 精华:0 注册:2017/11/23 8:55:00
[求助]  发帖心情 Post By:2023/4/18 9:45:00 [显示全部帖子]

老师,你好,今天遇到一怪事,我的数据表始终有一列被隐藏,把这列被隐藏的列显示出来保存后,返回重新登录又原样,这一列又被隐藏了。是不是数据库坏了?是不是列太多了(总数65列)?老师能帮看一下吗???谢谢了。

 回到顶部
帅哥哟,离线,有人找我吗?
xybcxh
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:92 积分:824 威望:0 精华:0 注册:2017/11/23 8:55:00
  发帖心情 Post By:2023/4/18 10:09:00 [显示全部帖子]

没有表视图,代码把隐藏的列显隐后,就是“出产编号”这一列不显示(其他的列都可显示)。

 回到顶部
帅哥哟,离线,有人找我吗?
xybcxh
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:92 积分:824 威望:0 精华:0 注册:2017/11/23 8:55:00
  发帖心情 Post By:2023/4/18 10:25:00 [显示全部帖子]

一直使用的,就今天出了问题,代码也没动过

AfterClose代码:

If DataTables("列宽").haschanges Then
    DataTables("列宽").save
End If



Dim kd As String = ""
For Each r As Row In Tables("列宽").rows
    If r("显隐") = True Then
        kd = kd & r("列名") & "|" & r("宽度") & "|"
    End If
Next
Kd =kd.trim("|")
Tables("总表").setcolvisiblewidth(kd)

其他的没有什么代码了。

 回到顶部
帅哥哟,离线,有人找我吗?
xybcxh
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:92 积分:824 威望:0 精华:0 注册:2017/11/23 8:55:00
  发帖心情 Post By:2023/4/18 10:38:00 [显示全部帖子]

图片点击可在新窗口打开查看
这个结果是对的
图片点击可在新窗口打开查看
[此贴子已经被作者于2023/4/18 10:43:48编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
xybcxh
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:92 积分:824 威望:0 精华:0 注册:2017/11/23 8:55:00
  发帖心情 Post By:2023/4/18 12:56:00 [显示全部帖子]

不好意思,列名错误了,不知怎么这列名被改了。原来是出厂,现在是出产了。。。晕

 回到顶部