以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  弹出错误  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=127976)
--  作者：yangwenghd
--  发布时间：2018/11/26 15:03:00
--  弹出错误

图片点击可在新窗口打开查看此主题相关图片如下：qq截图20181126150120.jpg
图片点击可在新窗口打开查看
老师，能请教一下这个问题吗？把图片浏览器控件绑定表的图片列，然后时不时会显示这个， 是不是我哪里没做对呀？ 感谢 感谢

图片点击可在新窗口打开查看此主题相关图片如下：qq截图20181126145920.jpg
图片点击可在新窗口打开查看
--  作者：有点甜
--  发布时间：2018/11/26 15:05:00
--  

currentChanged事件或者表事件写了什么代码？把代码删除后是否还有问题？

 

出错的项目发上来测试。
--  作者：yangwenghd
--  发布时间：2018/11/26 15:49:00
--  

currentChanged 事件里面没有代码 

然后click里面有一些代码，我把click的代码都注释了，还是会出现，但没有那么频繁，下面是click的代码，感谢 感谢


If e.Form.Controls("RadioButton1").checked Then
    Dim t As Table = e.Form.Controls("Table3").Table
    e.Form.Controls("Table4").Table.Filter = "属性_代销编号 = \'" & t.Current("商品编号") & "\'"
End If
If e.Form.Controls("RadioButton2").checked Then
    Dim t As Table = e.Form.Controls("Table3").Table
    e.Form.Controls("Table4").Table.Filter = "属性_代销编号 = \'" & t.Current("商品编号") & "\'and 平台信息_状态 = \'已分组\'"
End If

If e.Form.Controls("RadioButton3").checked Then
    Dim t As Table = e.Form.Controls("Table3").Table
    e.Form.Controls("Table4").Table.Filter = "属性_代销编号 = \'" & t.Current("商品编号") & "\'and  平台信息_状态 = \'未分组\'"
End If

If e.Form.Controls("CheckBox1").Checked = True Then
    If Tables("代销产品录入窗口_Table3").Current("平台状态_状态")="部分分组" Then
        msgbox("此产品有部分未分组")
    End If
End If
--  作者：有点甜
--  发布时间：2018/11/26 15:53:00
--  

 

Table4、Table3的所有事件代码，都删除后测试。