Foxtable(狐表)用户栏目专家坐堂 → 无响应和菜单变灰色问题


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

主题:无响应和菜单变灰色问题

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


加好友 发短信
等级:一尾狐 帖子:454 积分:3241 威望:0 精华:0 注册:2019/11/3 22:21:00
无响应和菜单变灰色问题  发帖心情 Post By:2022/7/11 17:31:00 [显示全部帖子]

高级开发版
1、有个表,2千多行,全选后点删除键,结果长时间无响应,啥也点不动,只好杀掉主程序
2、用代码读取文件到表,约3万行,读完后所有菜单变灰色
3、合并数据也无反应

已更新到最新版, 以上情况无论客户端还是开发端皆如此,请版主解答下!
[此贴子已经被作者于2022/7/11 17:39:49编辑过]

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


加好友 发短信
等级:一尾狐 帖子:454 积分:3241 威望:0 精华:0 注册:2019/11/3 22:21:00
  发帖心情 Post By:2022/7/11 17:59:00 [显示全部帖子]

1、PrepareEdit表事件:
If User.IsRole("管理员") = False  Then '非管理员
    e.Cancel = True  '禁止编辑
End If

2、AfterSelRangeChange表事件

For c As Integer = e.NewRange.ColSel To e.NewRange.ColEnd
    If e.Table.Cols(c).name <> "序号" Then '禁止复制序号以为的列
        e.Table.DataTable.AllowClipBoard = False
        Return
    End If
Next
e.Table.DataTable.AllowClipBoard = True

3、DoubleClick表事件

Forms("入河排污口清单").Open()

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


加好友 发短信
等级:一尾狐 帖子:454 积分:3241 威望:0 精华:0 注册:2019/11/3 22:21:00
  发帖心情 Post By:2022/7/11 18:03:00 [显示全部帖子]

去掉后测试,如故......

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


加好友 发短信
等级:一尾狐 帖子:454 积分:3241 威望:0 精华:0 注册:2019/11/3 22:21:00
  发帖心情 Post By:2022/7/11 18:07:00 [显示全部帖子]

没有表达式

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


加好友 发短信
等级:一尾狐 帖子:454 积分:3241 威望:0 精华:0 注册:2019/11/3 22:21:00
  发帖心情 Post By:2022/7/11 21:38:00 [显示全部帖子]

实例所有表都是接SQL数据库服务器的,无法上发

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


加好友 发短信
等级:一尾狐 帖子:454 积分:3241 威望:0 精华:0 注册:2019/11/3 22:21:00
  发帖心情 Post By:2022/7/11 21:42:00 [显示全部帖子]

以前不会有这个问题

 回到顶部