Foxtable(狐表)用户栏目专家坐堂 → [求助]列宽不能保存


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

主题:[求助]列宽不能保存

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


加好友 发短信
等级:幼狐 帖子:63 积分:597 威望:0 精华:0 注册:2019/7/25 11:01:00
[求助]列宽不能保存  发帖心情 Post By:2019/8/5 11:16:00 [显示全部帖子]

请教老师们,表的列宽调整后,保存没有用,是什么原因啊

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


加好友 发短信
等级:幼狐 帖子:63 积分:597 威望:0 精华:0 注册:2019/7/25 11:01:00
  发帖心情 Post By:2019/8/5 11:40:00 [显示全部帖子]

是的,用鼠标调整后紧跟着就点保存的,但是没有用

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


加好友 发短信
等级:幼狐 帖子:63 积分:597 威望:0 精华:0 注册:2019/7/25 11:01:00
  发帖心情 Post By:2019/8/5 14:42:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:村干部系统.zip


已上传,无论是窗口界面,还是关闭窗口界面,在“村干部基本信息”表调整列宽,都没有用,特别是村居社区、年龄等列

另外,请教老师,目录树,想要保持展开状态,怎么操作?

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


加好友 发短信
等级:幼狐 帖子:63 积分:597 威望:0 精华:0 注册:2019/7/25 11:01:00
  发帖心情 Post By:2019/8/5 15:19:00 [显示全部帖子]

原来如此,谢谢版主!

另外,还发现一个问题,这个例子,只要打开设计窗口,保存后,预览的时候如果“村干部基本信息”表里面有空行,就会弹出提示窗口,
图片点击可在新窗口打开查看此主题相关图片如下:无标题3232.jpg
图片点击可在新窗口打开查看,代码已经改过了还是没用,虽然不影响使用,但是也蛮讨厌的,请教老师如何解决?



[此贴子已经被作者于2019/8/5 15:25:58编辑过]

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


加好友 发短信
等级:幼狐 帖子:63 积分:597 威望:0 精华:0 注册:2019/7/25 11:01:00
  发帖心情 Post By:2019/8/5 15:55:00 [显示全部帖子]

嗯,就是按照您这个修改的,在使用界面不会再提示了,不过依旧在设计窗口,预览的时候弹窗提示,晕死了

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


加好友 发短信
等级:幼狐 帖子:63 积分:597 威望:0 精华:0 注册:2019/7/25 11:01:00
  发帖心情 Post By:2019/8/5 16:59:00 [显示全部帖子]

收到,已经排除故障,感谢超版!!!

另外,每个表超过24列之外的列会自动隐藏?能设置吗

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


加好友 发短信
等级:幼狐 帖子:63 积分:597 威望:0 精华:0 注册:2019/7/25 11:01:00
  发帖心情 Post By:2019/8/5 17:20:00 [显示全部帖子]

再以此例请教超版老师,
另建了一个新窗口:提示窗口,同时在“村干部基本信息”表,加入了一列【转为离职】,设为逻辑列,在表AfterCheckRow事件,写入:
If e.Row.Checked  Then
    Forms("提示窗口").Open()
End If
但是此提示窗口为什么不能弹出?
麻烦老师了

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


加好友 发短信
等级:幼狐 帖子:63 积分:597 威望:0 精华:0 注册:2019/7/25 11:01:00
  发帖心情 Post By:2019/8/5 17:39:00 [显示全部帖子]

设置为独立窗口,属于表“村干部基本信息”,不知道是不是设置错了?

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


加好友 发短信
等级:幼狐 帖子:63 积分:597 威望:0 精华:0 注册:2019/7/25 11:01:00
  发帖心情 Post By:2019/8/6 10:29:00 [显示全部帖子]

谢谢超版老师

是逻辑列,写入表格datacolchanged事件后,勾选逻辑列“转为离职”能弹出窗口了,谢谢超版老师

If e.DataCol.Name = "转为离职" Then

    If e.NewValue = True Then

        Forms("提示窗口").Open()

    End If

End If

 

窗口里面有两个button,名称分别是“是”和“否”,想要实现对逻辑列“转为离职”来说点击“是”,就确认勾选,否就撤销勾选,该怎么办呢?


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


加好友 发短信
等级:幼狐 帖子:63 积分:597 威望:0 精华:0 注册:2019/7/25 11:01:00
  发帖心情 Post By:2019/8/6 11:13:00 [显示全部帖子]

是的额,messagebox更合理,试了一下

Dim Result As DialogResult
Result = MessageBox.Show("您确定将其转为离职吗?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
    e.NewValue = True
Else
    e.NewValue = False
End If

写入datacolchanging事件,表一打开不勾选就弹窗,哎,而且还会影响项目事件代码执行
[此贴子已经被作者于2019/8/6 11:16:29编辑过]

 回到顶部
总数 19 1 2 下一页