Foxtable(狐表)用户栏目专家坐堂 → [求助]请教代码的问题


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

主题:[求助]请教代码的问题

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


加好友 发短信
等级:小狐 帖子:384 积分:2706 威望:0 精华:0 注册:2015/11/27 19:09:00
[求助]请教代码的问题  发帖心情 Post By:2018/7/11 17:54:00 [只看该作者]

老师,我的窗口有两个副表,我在第一个副表的CurrentChanged事件中编写如下代码:

'窗口主副表联动<<<<<<<<<<<<<<(通用代码,无需更改)
If e.Table.Current Is Nothing Then '如果Current为Nothing
    Return '则返回
End If
Dim dr As DataRow = e.Table.Current.DataRow
Dim wz As Integer = Tables(e.Table.DataTable.name).FindRow(dr)
If wz >= 0 Then
    Tables(e.Table.DataTable.name).Position = wz
End If
''>>>>>>>>>>>>>>>>>>>>>推荐用于窗口的表(副表)的 CurrentChanged 事件中

Tables(e.Form.name & "_Table2").filter = "订单编号 = '" & e.Table.Current("订单编号") & "'"


执行的时候,出现运行错误

图片点击可在新窗口打开查看此主题相关图片如下:无标题.png
图片点击可在新窗口打开查看

如果我将红色代码部分注释掉就不出错,而且出错的时候,都是在“table2”筛选不到对应数据行的情况下,为什么会出现这样的情况?如果没有满足表达式的条件,table2的表数据不应该是空白的吗?为什么会出现运行错误的提示?请老师解惑

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


加好友 发短信
等级:小狐 帖子:384 积分:2706 威望:0 精华:0 注册:2015/11/27 19:09:00
  发帖心情 Post By:2018/7/11 18:09:00 [只看该作者]

打扰了老师,问题解决了,做了一个实例,发现运行正常,再找别的地方,再找别的地方的代码,发现下级联动的代码出现了问题,抱歉,打扰了

 回到顶部