主题：[求助]最近狐表一直出这个错

If Forms("窗口1").Opened = True '改为您的窗口名称
    e.Table.Current.DataRow.load
End If

 

如果您是点选出错，那肯定还有别的代码问题，判断不够严谨，应该贴出您的全部代码，必要时上传示例文件！

if e.Table.Current IsNot nothing then

   e.Table.Current.DataRow.load

end if

 

再不行，就做例子发上来。

我这情况应该是和程版的环境一样的，窗口绑定到主表，窗口中是 父子表

狐爸这个代码我之前用过了，问题就是帖子一开始的那个问题 切换父表的时候 很可能出那个问题

 

不过，注销那个代码后 真心流畅啊 哈哈哈 一加上那代码 就明显慢了不少

 

此主题相关图片如下：2.png

 

代码现在是

 

此主题相关图片如下：4.png

您的代码有其他问题，全部贴出来！

程版我的环境应该和你差不多的

 

用了你的代码后

问题是在切换父表内容的时候 子表如果是空 就会弹错

 

此主题相关图片如下：3.png

您的代码在子表中？

把文件发给我：

 

QQ:475361999

上面就是 子表的 currentchanged

子表不能这么写代码的：

If Forms("生产进度管理").Opened = True '改为您的窗口名称  

    if Tables("父表.子表").Current IsNot nothing then

        Tables("父表.子表").Current.DataRow.load

    end if
End If

因为直接判断Tables("子表").Current IsNot nothing then的话，子表的Current 并不为空，但您点选的父记录下不一定有子记录！