以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  折叠模式下收缩节点小异常  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=186165)

--  作者:z769036165
--  发布时间:2023/4/10 15:17:00
--  折叠模式下收缩节点小异常
Dim w As Row = Tables("表A").Current
w.Collapsed = True
For Each dr As Row In w.GetChildren(True)
    dr.Collapsed = True
Next


选择需要收缩的节点,执行上面的代码后,收缩后的节点显示文字字体颜色变成了白色

--  作者:有点蓝
--  发布时间:2023/4/10 15:21:00
--  
正常呀,被选中的单元格,失去焦点后,默认就是绿色背景白色字体
--  作者:z769036165
--  发布时间:2023/4/10 17:59:00
--  
图片点击可在新窗口打开查看在表里面任何地方随便鼠标点下,白色字体就变黑色字体了,本身表的字体也是黑色的
--  作者:有点蓝
--  发布时间:2023/4/10 20:10:00
--  
应该是表格的样式问题,换个样式
--  作者:z769036165
--  发布时间:2023/4/11 8:18:00
--  
其他样式也这样
--  作者:有点蓝
--  发布时间:2023/4/11 8:30:00
--  
请上传实例测试