Foxtable(狐表)用户栏目专家坐堂 → 跨表应用代码报错


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

主题:跨表应用代码报错

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/7 11:22:00 [显示全部帖子]

If e.NewValue Is Nothing Then

 

改成

 

If e.NewValue = Nothing Then

 

不行,就做个例子上来测试。


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/7 14:30:00 [显示全部帖子]

加判断

 

        Dim dr As DataRow

        dr = DataTables("进口业务进度表").Find("[fa piao号码] = '" & e.NewValue & "'")
        If dr IsNot Nothing AndAlso dr("海关查验") = True
            e.DataRow("海关查验") = 500
        End If

 回到顶部