Foxtable(狐表)用户栏目专家坐堂 → [求助]表事件datacolchanged,为什么执行两遍命令?


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

主题:[求助]表事件datacolchanged,为什么执行两遍命令?

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


加好友 发短信
等级:三尾狐 帖子:622 积分:5303 威望:0 精华:0 注册:2022/4/4 14:42:00
[求助]表事件datacolchanged,为什么执行两遍命令?  发帖心情 Post By:2022/5/7 16:59:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看
背景:
预计总成本表中,归类列,数据修改的列,采用了下拉目录树,用代码生成的下拉窗口

代码如下:

If e.DataCol.name = "归类" Then  
    Dim f_name_list As List(of String) = e.DataTable.GetValues("一级目录")
    If f_name_list.Contains("↓") = False Then
        CurrentTable.AddNew()
    End If
End If

在选择 归类后,应该会增加一行,不知道什么原因,增加了两行??
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:56备份 - 实验.table



 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111414 积分:567140 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/7 17:14:00 [只看该作者]

下拉窗口赋值了2次

去掉下面代码
    If e.Form.DropTable IsNot Nothing Then '如果下拉窗口是从表中打开
    tr = e.Form.DropTable.Current '获取此表的当前行
    End If
    tr("归类") = dr("编码")

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


加好友 发短信
等级:三尾狐 帖子:622 积分:5303 威望:0 精华:0 注册:2022/4/4 14:42:00
回复:(有点蓝)下拉窗口赋值了2次去掉下面代码 ...  发帖心情 Post By:2022/5/7 17:20:00 [只看该作者]

去掉之后,再运行时,提示  未将对象引用设置到对象的实例。

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111414 积分:567140 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/5/7 17:23:00 [只看该作者]

我测试没有问题。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:56备份 - 实验 (1).zip


 回到顶部