以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]请教代码的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=121698) |
-- 作者:5159518 -- 发布时间: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("订单编号") & "\'" 执行的时候,出现运行错误 如果我将红色代码部分注释掉就不出错,而且出错的时候,都是在“table2”筛选不到对应数据行的情况下,为什么会出现这样的情况?如果没有满足表达式的条件,table2的表数据不应该是空白的吗?为什么会出现运行错误的提示?请老师解惑 |
-- 作者:5159518 -- 发布时间:2018/7/11 18:09:00 -- 打扰了老师,问题解决了,做了一个实例,发现运行正常,再找别的地方,再找别的地方的代码,发现下级联动的代码出现了问题,抱歉,打扰了 |