Foxtable(狐表)用户栏目专家坐堂 → DataColchanging 事件执行


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

主题:DataColchanging 事件执行

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


加好友 发短信
等级:超级版主 帖子:109387 积分:556591 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/1/3 15:44:00 [显示全部帖子]

代码在哪个表的datacolchanged事件?

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


加好友 发短信
等级:超级版主 帖子:109387 积分:556591 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/1/3 15:56:00 [显示全部帖子]

那这种叫神仙用法,只有神仙才能执行的了。

首先除了下面代码,其它代码都应该放到datacolchanged事件,每个事件都有其使用场合,不要乱用,不是所有代码都放到一个事件来解决问题的,不然Foxtable里何必有那么多事件!

Select Case cn
    Case "WO"
        Dim wo As String = e.NewValue
        Dim sn As Integer
        
        If isnumeric(wo) Then
            sn = wo
            If len(sn) <= 5 Then
                wo = "IWO" & Right("00000" & sn, 5) & "/1"
            Else
                wo = "IWO" & Right("000000" & sn, 6) & "/1"
            End If
        Else
            If Not wo.Contains("/") Then
                wo = wo & "/1" 
            Else
                wo = e.NewValue
            End If
        End If
        SystemReady = False
        e.NewValue = wo

最主要的问题是,完全不应该在表事件里加载自己,这个用法会导致很多问题

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


加好友 发短信
等级:超级版主 帖子:109387 积分:556591 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/1/3 16:05:00 [显示全部帖子]

看这个2个事件帮助的说明

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


加好友 发短信
等级:超级版主 帖子:109387 积分:556591 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/1/3 16:11:00 [显示全部帖子]

看5楼最后一句

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


加好友 发短信
等级:超级版主 帖子:109387 积分:556591 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/1/3 16:20:00 [显示全部帖子]

只能这样。嫌麻烦每个人配个机器人替他操作好了
[此贴子已经被作者于2024/1/3 16:20:01编辑过]

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


加好友 发短信
等级:超级版主 帖子:109387 积分:556591 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/1/3 16:31:00 [显示全部帖子]

关闭退出项目,删除项目所在的文件夹里的bin目录,然后重启项目试试。

 回到顶部